vb + access 如何换成 vb + sql

Question

  用 vb + access 做个系统 如何 换成 vb + sql server 2000
  access 数据库连接 是用 ADO 对象实现的！

Answer 1

1，ado与SQL的连接：
dim conn as new adodb.connection
conn
    If .State = adStateOpen Then .Close
    .ConnectionString = "driver=SQL Server;server=计算机名或IP地址;uid=sa;pwd=sa的密码;database=数据库名"
    .CommandTimeout = 120
    .Open
End With2，ACCESS数据库与SQL数据库对日期变量的处理不一样：
   ACCESS中日期变量引用："select * from tablename where 日期字段=# " & 日期变量 & " #"
   SQL中日期变量引用：   "select * from tablename where 日期字段='"& 日期变量 &"'"
 

Answer 2

如果你不是一开始就有意识地用标准 SQL 写查询，那么两个数据库的部分函数是不一样的。
Office 系列的帮助一直很烂，幸好是 SQL Server 的帮助还可以，建议将里面的函数浏览一遍。第一次做这种事情基本上就是边调试边修改。

Answer 3

Private Sub Form_Load() 
    '连接字符串 
    Adodc1.ConnectionString = "driver={sql server};server=" + Trim(server) + ";uid=" + Trim(user) + ";pwd=" + Trim(password) + ";database=erp1" 
    '查询users表中全部信息 
    Adodc1.RecordSource = "select * from businessman" 
    '用datagrid显示查询信息 
    Set DataGrid1.DataSource = Adodc1 
 
End Sub