Skip to main content

AccessTr.neT


Sql Bağlı tabloda türkçe "iİıI" problemi

Sql Bağlı tabloda türkçe "iİıI" problemi

#22
nasıl oldu bilmiyorum ama şimdi olması gerektiği gibi çalışıyor
sıkıntı çözülmüş oldu

Kod:
Public Function turkcem(Metin As String) As String

    Dim result As String
    result = ""
   
    For i = 1 To Len(Metin)
        If (Asc(Mid(Metin, i, 1)) = Asc("İ")) Then
            result = result & "i"
        ElseIf (Asc(Mid(Metin, i, 1)) = Asc("I")) Then
            result = result & "ı"
        ElseIf (Asc(Mid(Metin, i, 1)) = Asc("i")) Then
            result = result & "i"
        ElseIf (Asc(Mid(Metin, i, 1)) = Asc("ı")) Then
            result = result & "ı"
        Else
            result = result & Mid(Metin, i, 1)
        End If
    Next
   
    turkcem = result
   
End Function


[Resim: do.php?img=10038]


sn. @alicimri   @berduş  @feraz
yardımlarınız için teşekkür ederim arkadaşlar
@benbendedeilem
Son Düzenleme: 14/04/2020, 12:28, Düzenleyen: accessman.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Re: Sql Bağlı Tabloda Türkçe "iiıı" Problemi - Yazar: accessman - 14/04/2020, 11:12