旷世爱情电影:急求..VB操作MySql出错

来源：百度文库编辑：杭州交通信息网时间：2024/04/26 06:02:33

Dim Conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim SqlStr As String

Private Sub W2Mysql()

Conn.Open "DRIVER={MySQL ODBC 3.51 Driver};SERVER=" & Txt_Server.Text & ";DATABASE=" & Txt_Database.Text & "; USER=" & Txt_UserName.Text & ";PASSWORD=" & Txt_PassWord.Text & ";OPTION=;"

StrSql = "select * from cry_threads"
Set rs.ActiveConnection = Conn
rs.LockType = adLockOptimistic
rs.CursorLocation = adUseClient
rs.CursorType = adOpenStatic
rs.Open StrSql

rs.AddNew
rs("author") = Txt_Author.Text
rs.Update
Tid = rs("tid")
rs.Close

End Sub

请注意，如果 Txt_Author.Text 为英文和数字，完全正常，但是如果 Txt_Author.Text 为中文，会出现 Data too long for .... 错误（哪怕只有1个汉字）

估计是编码问题，但是不知道该如何解决呢？
呵呵 superxs ，我总不能因为这个就修改数据库结构哈，数据库是一个大型论坛，不好自己改动的，有没有别的办法

author改成备注型，肯定不会出错

急求..VB操作MySql出错求mysql linux版本的一系列操作关于VB操作，跪求！求解答MYSQL安装在LINUX上出错解答急求一条mysql查询语句.. php5 连接mysql出错 mysql语法出错，求救！ mysql语法出错，求救！急求vb源代码急求VB教程