-
Üyelik
28.03.2016
-
Yaş/Cinsiyet
42 / E
-
Meslek
Emlak
-
Konum
Antalya
-
Ad Soyad
İ** Y**
-
Mesajlar
112
-
Beğeniler
3 / 2
-
Ticaret
0, (%0)
Merhaba Arkadaşlar
Aşağıdaki kodda Kelimeden sonra başka bir kelime varsa o kelimden önce kelime arasına virgül koymak, bunu aşağıdaki kodla bir türlü yapamadım, bu konuda yardımlarınızı bekliyorum
teşekkür ederim.
<% If not >= Then : comma = "," : Else : comma = "" : End If %>
kelime1<%=comma%>kelime2<%=comma%>
ontedi
www.ontedi.com
Kullanıcı
-
Üyelik
03.10.2013
-
Yaş/Cinsiyet
44 / E
-
Meslek
Yazılım Uzmanı, Matematikçi
-
Konum
Ankara
-
Ad Soyad
S** T**
-
Mesajlar
1119
-
Beğeniler
325 / 324
-
Ticaret
2, (%100)
strKelime = strKelime1
If (strKelime1 <> "" AND strKelime2 <> "") Then
strKelime = strKelime1 & ", " & strKelime2
End If
Böyle bir dene istersen, doğru anlamışımdır umarım.
www.ontedi.com
www.cizgi.site
-
Üyelik
28.03.2016
-
Yaş/Cinsiyet
42 / E
-
Meslek
Emlak
-
Konum
Antalya
-
Ad Soyad
İ** Y**
-
Mesajlar
112
-
Beğeniler
3 / 2
-
Ticaret
0, (%0)
ontedi Hocam yardım için çok teşekkür ederim benim yapmak istediğim, veritabanımın ayrı ayrı sütunlardan çektiğim kelimeleri virgül ile ayırmak, her kelimeden sonra kelime gelecek ise 2 kelimenin arasını virgül ile ayırsın
<%
if rs("deniz")<>"" or rs("gol")<>"" or rs("sehir")<>"" or rs("doga")<>"" or rs("orman")<>"" or rs("dag")<>"" then
Response.Write "
"
Response.Write "Manzara"
Response.Write ""
If rs("deniz")= "1" then Response.write "Deniz" End If
If rs("gol")= "1" then Response.write "Göl" End If
If rs("sehir")= "1" then Response.write &"Şehir" End If
If rs("doga")= "1" then Response.write Doğa" End If
If rs("orman")= "1" then Response.write "Orman " End If
If rs("dag")= "1" then Response.write "Dağ" End If
Response.Write ""
Response.Write ""
End if
%>
ontedi
www.ontedi.com
Kullanıcı
-
Üyelik
03.10.2013
-
Yaş/Cinsiyet
44 / E
-
Meslek
Yazılım Uzmanı, Matematikçi
-
Konum
Ankara
-
Ad Soyad
S** T**
-
Mesajlar
1119
-
Beğeniler
325 / 324
-
Ticaret
2, (%100)
strKelime = ""
If (rs("deniz") <> "") Then
strKelime = strKelime & " " & rs("deniz")
End If
If (rs("gol") <> "") Then
strKelime = strKelime & " " & rs("gol")
End If
If (rs("sehir") <> "") Then
strKelime = strKelime & " " & rs("sehir")
End If
If (rs("orman") <> "") Then
strKelime = strKelime & " " & rs("orman")
End If
If (rs("dag") <> "") Then
strKelime = strKelime & " " & rs("dag")
End If
strKelime = Trim(strKelime)
strKelime = Repalce(strKelime, " ", ", ", 1, -1, 1)
İstediğin olur gibi.
1 kişi bu mesajı beğendi.
www.ontedi.com
www.cizgi.site
-
Üyelik
28.03.2016
-
Yaş/Cinsiyet
42 / E
-
Meslek
Emlak
-
Konum
Antalya
-
Ad Soyad
İ** Y**
-
Mesajlar
112
-
Beğeniler
3 / 2
-
Ticaret
0, (%0)
Muhteşemsin Hocam Allah razı olsun.
-
Üyelik
28.03.2016
-
Yaş/Cinsiyet
42 / E
-
Meslek
Emlak
-
Konum
Antalya
-
Ad Soyad
İ** Y**
-
Mesajlar
112
-
Beğeniler
3 / 2
-
Ticaret
0, (%0)
ontedi Hocam Allah razı olsun, Virgül ile ayırma işlemimiz tamamdır, Hocam yanlız şöyle bir sorunum var, çektiğim verilerin hiç biri olmadığında Manzara Başlığını göstermenin bir anlamı yok, Bunu nasıl yaparız Hocam
ontedi
www.ontedi.com
Kullanıcı
-
Üyelik
03.10.2013
-
Yaş/Cinsiyet
44 / E
-
Meslek
Yazılım Uzmanı, Matematikçi
-
Konum
Ankara
-
Ad Soyad
S** T**
-
Mesajlar
1119
-
Beğeniler
325 / 324
-
Ticaret
2, (%100)
strKelime = ""
If (rs("deniz") <> "") Then
strKelime = strKelime & " " & rs("deniz")
End If
If (rs("gol") <> "") Then
strKelime = strKelime & " " & rs("gol")
End If
If (rs("sehir") <> "") Then
strKelime = strKelime & " " & rs("sehir")
End If
If (rs("orman") <> "") Then
strKelime = strKelime & " " & rs("orman")
End If
If (rs("dag") <> "") Then
strKelime = strKelime & " " & rs("dag")
End If
strKelime = Trim(strKelime)
strKelime = Repalce(strKelime, " ", ", ", 1, -1, 1)
If (strKelime <> "") Then
strKelime = "Manzara " & strKelime
End If
www.ontedi.com
www.cizgi.site
-
Üyelik
28.03.2016
-
Yaş/Cinsiyet
42 / E
-
Meslek
Emlak
-
Konum
Antalya
-
Ad Soyad
İ** Y**
-
Mesajlar
112
-
Beğeniler
3 / 2
-
Ticaret
0, (%0)
ontedi Hocam Manzara kelimesini başka bir değişkene sabitleme şansımız varmı, çünkü Manzara Başlığı diğer kelimeler içinde çağırıyor
ontedi
www.ontedi.com
Kullanıcı
-
Üyelik
03.10.2013
-
Yaş/Cinsiyet
44 / E
-
Meslek
Yazılım Uzmanı, Matematikçi
-
Konum
Ankara
-
Ad Soyad
S** T**
-
Mesajlar
1119
-
Beğeniler
325 / 324
-
Ticaret
2, (%100)
Hocam mumkunse ozelden yazmayiniz. Musait olunca bakarim zaten.
www.ontedi.com
www.cizgi.site
-
Üyelik
28.03.2016
-
Yaş/Cinsiyet
42 / E
-
Meslek
Emlak
-
Konum
Antalya
-
Ad Soyad
İ** Y**
-
Mesajlar
112
-
Beğeniler
3 / 2
-
Ticaret
0, (%0)
Tamam Hocam, yardımını bekliyorum