AccessTr.neT
İnternetten Veri Çekerken Değerin Sonundaki Boşlukların Silinmesi - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: İnternetten Veri Çekerken Değerin Sonundaki Boşlukların Silinmesi (/konu-internetten-veri-cekerken-degerin-sonundaki-bosluklarin-silinmesi.html)



İnternetten Veri Çekerken Değerin Sonundaki Boşlukların Silinmesi - Mecnun24 - 02/11/2018

Merhabalar, basit bir borsa programı çalışmam var. formdaki yenile tuşuyla iş yatırımın sitesindeki hisse bilgileri tabloya yazılıyor. Ancak hisse adlarının sonunda illaki bir boşluk oluyor. Trim fonksiyonunu denedim ancak bir sonuç alamadım. Boşluk olmadan datayı nasıl kaydedebiliriz tabloya. Yardımcı olursanız sevinirim.


Cvp: İnternetten Veri Çekerken Değerin Sonundaki Boşlukların Silinmesi - ozanakkaya - 02/11/2018

Merhaba, Trim ve RTrim fonksiyonları veri çekerken çalışmıyor. Vba sayfasında en alta

Public Function BoslukSil(ByVal GVeri As String) As String
If InStr(GVeri, Chr(160)) > 0 Then
   BoslukSil = Replace(GVeri, Chr(160), "")
ElseIf InStr(GVeri, Chr(32)) > 0 Then
   BoslukSil = Replace(GVeri, Chr(32), "")
Else
   BoslukSil = GVeri
End If
End Function

kodu ekle, 

rc!HISSE = Trim(MyTable.rows(L).cells(0).innerText)

kodunu da 
rc!HISSE = BoslukSil(MyTable.rows(L).cells(0).innerText)

Kodu ile değiştir.


Cvp: İnternetten Veri Çekerken Değerin Sonundaki Boşlukların Silinmesi - Mecnun24 - 02/11/2018

teşekkürler, elinize sağlık. öğrenmenin yaşı yok.