用什么控件,什么对象、什么方法?
听说要什么驱动的,
谁要是能全程帮助我完成这个部分,我愿意给他5QB(10QB也可以考虑)
联系我:jingyingbox@jingyingbox.cn
用什么控件,什么对象、什么方法?
听说要什么驱动的,
谁要是能全程帮助我完成这个部分,我愿意给他5QB(10QB也可以考虑)
联系我:jingyingbox@jingyingbox.cn
ODBC加载.
vb中添加一个Adodc的控件.
Public Function conn() As String
conn = "Provider=SQLOLEDB.1;Password=数据库管理密码;Persist Security Info=True;User ID=数据库管理帐号;Initial Catalog=数据库名;Data Source=计算机名"
End Function
Dim rs As New ADODB.Recordset
Dim con As New ADODB.Connection
Dim sql As String
Set con = CreateObject("ADODB.Connection")
con.Open conn
sql = "select * from Admin where username='" & username.Text & "' and password='" & password.Text & "'"
rs.Open sql, con, 1, 1
ODBC加载. vb中添加一个Adodc的控件. conn = "Provider=SQLOLEDB.1;Password=数据库管理密码;Persist Security Info=True;User ID=用户名;Initial Catalog=数据库名;Data Source=计算机服务器名称" Dim rs As New ADODB.Recordset Dim con As New ADODB.Connection Dim sql As String Set con = CreateObject("ADODB.Connection") con.Open conn
注:不管用什么方法都要有MySql驱动!!!
方法1:使用DSN(数据源)方式
方法2: http://hi.baidu.com/zhenghongan/blog/item/d232dbd360d730dea8ec9a8c.html
去 mysql 下载 mysql 的 ODBC 驱动程序进行安装
然后用上面的 ADO 方法连接数据库就可以了
驱动发你邮件了,你收下