为何用inet1提交东西到access数据库，总乱码啊解决立即结贴！该如何解决

为何用inet1提交东西到access数据库，总乱码啊？解决立即结贴！！！
Inet1.Execute "http://www.xxxxx.com/hd/add.asp?title=" & Text1 & "&pd=" & Text2 & ""

我用这样提交到数据库，中文总是变为问号，英文和数字正常。。。

求解决方法！！！具体点，谢谢！解决立即结贴！！！

------解决方案--------------------
估计和网站用的字符编码不一样,将字符串的编码格式转为和网站的一致,或者将字符串加密为英文的密文提交,入库时转换回来
------解决方案--------------------
把中文或有空格的参数编码一下，函数如下：

VB code



'┏〓〓〓〓〓〓〓〓〓 URLEncode,start 〓〓〓〓〓〓〓〓〓┓
Function URLEncode(ByVal urlText As String) As String
   '[mycode_id:591],edittime:2007-4-22 下午 12:27:39
'帮你写函数，帮你写代码，帮你写模块，帮你设计软件
联系QQ：1085992075--需要什么函数或功能，可以联系我。
   '［详介］：
   '可用中文
       Dim I As Long
       Dim ansi() As Byte
       Dim ascii As Integer
       Dim encText As String
   
       ansi = StrConv(urlText, vbFromUnicode)
   
       encText = ""
           For I = 0 To UBound(ansi)
           ascii = ansi(I)
   
           Select Case ascii
           Case 48 To 57, 65 To 90, 97 To 122
               encText = encText & Chr(ascii)
   
           Case 32
               encText = encText & "+"
   
           Case Else
               If ascii < 16 Then
                   encText = encText & "%0" & Hex(ascii)
               Else
                   encText = encText & "%" & Hex(ascii)
               End If
   
           End Select
       Next I
       
       URLEncode = encText
End Function
'┗〓〓〓〓〓〓〓〓〓  URLEncode,end  〓〓〓〓〓〓〓〓〓┛

为何用inet1提交东西到access数据库，总乱码啊解决立即结贴！该如何解决

相关推荐