VB多用户连接数据库代码

Question

一般用SQL Server数据库来完成，但连接代码和客户端的设置如何，要方法好用设置简单，求各位高手帮忙。

Answer 1

'连接数据库
dim conn as new adodb.connection
With conn
    If .State = adStateOpen Then .Close
    .ConnectionString = "driver=SQL Server;server=计算机名或IP地址;uid=SA;pwd=SA的密码;database=数据库名"
    .CommandTimeout = 0
    .Open
End With

Answer 2

'对数据库的增删改可以用事务来控制
private sub command1_click()
on error goto errhandle
     conn.begintrans    '开启事务
     conn.execute "insert into tb(...) values(...)"    '增加记录
     conn.execute "delete from tb where ..."           '删除记录
     conn.execute "update tb set ... where ..."        '修改记录
     conn.committrans   '提交事务
     exit sub
'错误处理
errhandle:
    conn.rollbacktrans    '出错，回滚事务
     exit sub
end sub

Answer 3

 我用的是
Adodc1.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=IQC"
    Adodc1.RecordSource = "SELECT * from IQC报表"

Answer 4

你就只管连接SQL就可以了,至于多少用于连接那是SQL的事了

Answer 5

现在只连上SQL就可以了。不过你的连接字符串中缺少服务器，用户名和登录密码，格式不正确，改一改，可以参照2楼的格式