主页

帮忙看看啊，急啊

rick47 2002-07-30 04:28:03

<%
'Anzahl=cdbl(tag_zahl)
Anzahl = Tag_Zahl
strDate = DatePart("d",Datum) & "." & DatePart("m",Datum) & "." & DatePart("yyyy",datum)
SQLQuery = "INSERT INTO urlaub (MaID,Datum,Anzahl) VALUES (" & id & ",'" & strDate & "','" & Anzahl & "')"
Set rs = Conn.Execute(SQLQuery)
Conn.close
%>
到了Set rs = Conn.Execute(SQLQuery)
Conn.close就出错，为何？

...全文

3 条回复

切换为时间正序

请发表友善的回复…

发表回复

rick47 2002-07-30

conn.open是写在别的文件里的。应该是没有问题，别的地方都不出错，就这里。
Sub MakeDBConn
Dim StrConn
Set Conn = Server.CreateObject("ADODB.Connection")
strConn = "Driver={Microsoft Access Driver (*.mdb)};DriverID=25;DBQ="
strConn = strConn & Server.MapPath("/~db/aspintranet.mdb")
strConn = strConn & ";FIL=MS Access;MaxBufferSize=512;PageTimeout=5;"
Conn.Open strConn
End Sub

没有出错代码，就说页面无法显示。

回复赞