Ich habe folgendes Script auf eine Seite drauf und erhalte die
Fehlermeldung:
Kompilierungsfehler in Microsoft VBScript-Fehler '800a03f6'
'End' erwartet
/dbd/f2001_mP.asp, Zeile 277
Code:
----- schnipp
<%
Session.LCID = 1031
strID = Request.QueryString("IMG_ID")
Function DBConnect(strDBName)
Set DBConnect = Server.CreateObject("ADODB.Connection")
path = Server.MapPath("../") + "\cgi-bin\dbdrag_content.mdb" & strDBName
DBConnect.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & path
End Function
Set ConnSQL = DBConnect(Application("db_name"))
sqlEasyQuery = "SELECT * FROM IMG WHERE IMG_ID = 1"
Set RS = server.CreateObject("adodb.recordset")
Set RS = ConnSQL.execute(sqlEasyQuery)
if RS.eof then
%>Ein Fehler ist aufgetreten! </font><%
else
%>
.....
<%
end if
ConnSQL.Close <---- Zeile 277
Set ConnSQL = nothing
Set RS = nothing
%
schnapp ------
Bin ich doof... oder sehe ich den Wald vor lauter B�umen nicht mehr?? Da
steht doch "end if" - selbst wenn ich es in "end" �ndere, dann kommt die
fehlermeldung immer noch.
Danke vorab f�r eure Hilfe.
Gr��e,
Alexander
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
