UC知道access改为sql
来源：百度知道 编辑：UC知道 时间：2024/05/17 19:20:07
我已经在sql中实现把mdb，导入mdf和ldf,但不会写conn,请详细告知，原mdb时代中的conn是这么写的<%
Dim startTime,ZD_AccessTimes,ZD_OpenCache
startTime=Timer()
ZD_AccessTimes=0
set conn=server.CreateObject("adodb.connection")
DBPath = Server.MapPath(ZD_Dataname)
conn.open "provider=microsoft.jet.oledb.4.0; data source="&DBpath
'On Error Resume Next
%>现在我应该怎么写？还有我只是靠sql完成了转换，要不要修改？
Dim startTime,ZD_AccessTimes,ZD_OpenCache
startTime=Timer()
ZD_AccessTimes=0
set conn=server.CreateObject("adodb.connection")
DBPath = Server.MapPath(ZD_Dataname)
conn.open "provider=microsoft.jet.oledb.4.0; data source="&DBpath
'On Error Resume Next
%>现在我应该怎么写？还有我只是靠sql完成了转换，要不要修改？
把你的最后一行改成:conn.open "Provider = Sqloledb; User ID = " & SqlUsername & "; Password = " & SqlPassword & "; Initial Catalog = " & SqlDatabaseName & "; Data Source = " & SqlLocalName & ";"
然后还要:
1.数据库导入以后，自动增加字段需要重写，所有的数字类型需要增加长度，最好用bigint。
2.所有的默认值都丢失了。主要是数字类型和日期类型。
3.所有sql语句中的now()，time()，date()要改成getdate()。
4.所有sql语句中的datediff('d', time1, time2)要改成datediff(day, time1, time2)，相应的其他日期属性也需要更改。
5.有可能一些true/false的判断语句不能正常使用了，这里是指用整数型来表达bool的情况，要变为1/0。
6.备注类型要通过cast(column as varchar)来使用。
7.CursorType要改成1,也就是打开数据库时要给出第一个数字参数为1，否则记录可能
显示不完整。也就是说，一般要写成rs.open sql, conn, 1。
8.isnull(rowname)要改成rowname = null
9.程序里如果有直接对整型变量的判断,也需要进行显示的转换,如:
if rs("id") = 0 then
要变为
if clng(rs("id")) = 0 then