Vad är felet ?

ASP

6 svar · 288 visningar · startad av Denniss 6 juli 2003

DennissMedlem sedan maj 2003176 inlägg

Frågan6 juli 2003 10:42#1

Microsoft VBScript compilation error '800a0401'

Expected end of statement

/maillist/conn.asp, line 3

Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="& Server.MapPath("/listist/db.mdb")""

Koden ser sä här ut:

<%
Dim ConnectString, conn
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="& Server.MapPath("/list/db.mdb")""
Set conn = Server.CreateObject("ADODB.Connection")
conn.open ConnectString
%>

@ndersMedlem sedan juni 200032 967 inlägg

6 juli 2003 10:44#2

Du har ett par citationstecken för mycket i slutet av raden.

<% 
Dim ConnectString, conn 
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="& Server.MapPath("/list/db.mdb")
Set conn = Server.CreateObject("ADODB.Connection") 
conn.open ConnectString 
%>

Mvh

DennissMedlem sedan maj 2003176 inlägg

6 juli 2003 10:46#3

När jag tar bort dem, får jag fäöljande fel:
Microsoft VBScript runtime error '800a01a8'

Object required: ''

/list/conn.asp, line 3

Koden:

<%
Dim ConnectString, conn
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="& Server.MapPath("/list/db.mdb")
Set conn = Server.CreateObject("ADODB.Connection")
conn.open ConnectString
%>

DennissMedlem sedan maj 2003176 inlägg

6 juli 2003 10:47#4

Fast hela det

Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&
Server.MapPath("/list/db.mdb")

är rad 3.

@ndersMedlem sedan juni 200032 967 inlägg

6 juli 2003 10:49#5

Du måste skapa Conn innan du kör Open.

Mvh

Red: läsfel

@ndersMedlem sedan juni 200032 967 inlägg

6 juli 2003 10:51#6

Klippte lite:

<% 
Dim conn 
Set conn = Server.CreateObject("ADODB.Connection") 
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="& Server.MapPath("/list/db.mdb") 
%>

Mvh

DennissMedlem sedan maj 2003176 inlägg

6 juli 2003 10:53#7

den sista funkar

Tack.