vb + access 如何换成 vb + sql
用 vb + access 做个系统 如何 换成 vb + sql server 2000access 数据库连接 是用 ADO 对象实现的! --------------------编程问答-------------------- 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 With
2,ACCESS数据库与SQL数据库对日期变量的处理不一样:
ACCESS中日期变量引用:"select * from tablename where 日期字段=# " & 日期变量 & " #"
SQL中日期变量引用: "select * from tablename where 日期字段='"& 日期变量 &"'"
--------------------编程问答-------------------- 如果你不是一开始就有意识地用标准 SQL 写查询,那么两个数据库的部分函数是不一样的。
Office 系列的帮助一直很烂,幸好是 SQL Server 的帮助还可以,建议将里面的函数浏览一遍。第一次做这种事情基本上就是边调试边修改。 --------------------编程问答-------------------- 修改的地方不是很多,网上查一下两个数据库功能相同的函数,然后在出错的地方替换就可以了! --------------------编程问答-------------------- 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
补充:VB , 数据库(包含打印,安装,报表)