帮忙看看啊，急啊

[rick47]

<%
'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就出错，为何？

[ar7_top]

conn 打开了没有？
好像没有看见你的 conn.open

另外最好能够把出错的代码贴出来

[coffee_cn]

打印出来你的 SQLQuery 放到查询分析器中运行！！！

[rick47]

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

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