zaqwe adlı üyeden alıntı: mesajı görüntüle
Function DT(strGelen)
TRD = Replace(strGelen, Chr(34), "")
TRD = Replace(TRD, Chr(39), "")
End Function
bu foksiyon ile " karakterini kaldrımam lazım ama olmuyor 

Function DT(strGelen)
TRD = Replace(strGelen, Chr(34), "")
TRD = Replace(TRD, Chr(39), "")
DT=TRD
 End Function
..........