VB连接SQL数据库代码

连接SQL数据库的方法一： sql Sub Main() On Error GoTo On_error 'frmWelcome.Show Set con = New ADODB.Connection con.ConnectionString = ("Provider=SQLOLEDB;User ID=sa;PWD=;Initial Catalog=human;Data Source=.") con

>>阅读原文<<