Avatar billede peder77 Nybegynder
12. november 2002 - 13:35 Der er 13 kommentarer og
2 løsninger

Fejl

Hej

Mit script siger fejl når jeg køre det:
Microsoft VBScript compilation error '800a0409'

Unterminated string constant

/peter77/acessFlash/EmailFlashList.asp, line 3

Serv= "Driver={Microsoft Access Driver (*.mdb)};_
-------------------------------------------------^

Her er mit asp:

<%
Dim Serv, Conn, RecordView, Ename, output, collect, SQL
Serv= "Driver={Microsoft Access Driver (*.mdb)};_
DBQ= \\genfs1\www16\peter77\db\emailFlash.mdb;"
Set Conn = Server.CreateObject("ADODB.Connection")
Set RecordView = Server.CreateObject("ADODB.Recordset")


Conn.Open Serv
SQL="SELECT * FORM EmailTable"
RecordView.Open SQL, Conn

Do While Not RecordView.EOF
Ename=RecordView("Name") & "<BR>"
collect =collect & Ename
RecordView.MoveNext
Loop

output="Output=" & collect
Response.Write output

RecordView.Close
Conn.Close
Set RecordView = Nothing
Set Conn = Nothing
%>

Er der nogen som kan hjælpe mig. Det er første gang jeg arbejder i asp, access og flash. Jeg skal bare hent data ind i flash fra databasen!
Avatar billede medions Nybegynder
12. november 2002 - 13:38 #1
<%
Dim Serv, Conn, RecordView, Ename, output, collect, SQL
Serv= "Driver={Microsoft Access Driver (*.mdb)}; &_
DBQ= \\genfs1\www16\peter77\db\emailFlash.mdb;"
Set Conn = Server.CreateObject("ADODB.Connection")
Set RecordView = Server.CreateObject("ADODB.Recordset")


Conn.Open Serv
SQL="SELECT * FORM EmailTable"
RecordView.Open SQL, Conn

Do While Not RecordView.EOF
Ename=RecordView("Name") & "<BR>"
collect =collect & Ename
RecordView.MoveNext
Loop

output="Output=" & collect
Response.Write output

RecordView.Close
Conn.Close
Set RecordView = Nothing
Set Conn = Nothing
%>

//>Rune
Avatar billede medions Nybegynder
12. november 2002 - 13:39 #2
<%
Dim Serv, Conn, RecordView, Ename, output, collect, SQL
Serv= "Driver={Microsoft Access Driver (*.mdb)}; &_
"DBQ= \\genfs1\www16\peter77\db\emailFlash.mdb;"
Set Conn = Server.CreateObject("ADODB.Connection")
Set RecordView = Server.CreateObject("ADODB.Recordset")


Conn.Open Serv
SQL="SELECT * FORM EmailTable"
RecordView.Open SQL, Conn

Do While Not RecordView.EOF
Ename=RecordView("Name") & "<BR>"
collect =collect & Ename
RecordView.MoveNext
Loop

output="Output=" & collect
Response.Write output

RecordView.Close
Conn.Close
Set RecordView = Nothing
Set Conn = Nothing
%>

Sådan her er det vidst!

//>Rune
Avatar billede peder77 Nybegynder
12. november 2002 - 13:45 #3
Siger stadig fejl
Microsoft VBScript compilation error '800a0409'

Unterminated string constant

/peter77/acessFlash/EmailFlashList1.asp, line 3

Serv= "Driver={Microsoft Access Driver (*.mdb)}; &_
---------------------------------------------------^

Jeg er ikke sikker på at driveren er sat rigtigt op. Jeg kan ikke rigtig forstå hvordan DSN virker. Jeg har været inde i ODBC og lave en som hedder EmailFlash.dsn. (der er et sted jeg kan vælge ingen eller systemdatabase) Hvor skal prikken sættes?
Avatar billede medions Nybegynder
12. november 2002 - 13:46 #4
DOH sorry!

<%
Dim Serv, Conn, RecordView, Ename, output, collect, SQL
Serv= "Driver={Microsoft Access Driver (*.mdb)};" &_
"DBQ= \\genfs1\www16\peter77\db\emailFlash.mdb;"
Set Conn = Server.CreateObject("ADODB.Connection")
Set RecordView = Server.CreateObject("ADODB.Recordset")


Conn.Open Serv
SQL="SELECT * FORM EmailTable"
RecordView.Open SQL, Conn

Do While Not RecordView.EOF
Ename=RecordView("Name") & "<BR>"
collect =collect & Ename
RecordView.MoveNext
Loop

output="Output=" & collect
Response.Write output

RecordView.Close
Conn.Close
Set RecordView = Nothing
Set Conn = Nothing
%>

Sådan her er det vidst!

//>Rune
Avatar billede peder77 Nybegynder
12. november 2002 - 13:47 #5
Samme fejl
Avatar billede medions Nybegynder
12. november 2002 - 13:49 #6
Sammefejl??? Weird!

<%
Dim Serv, Conn, RecordView, Ename, output, collect, SQL
Serv= "Driver={Microsoft Access Driver (*.mdb)}" &_
"DBQ=c:\genfs1\www16\peter77\db\emailFlash.mdb;"
Set Conn = Server.CreateObject("ADODB.Connection")
Set RecordView = Server.CreateObject("ADODB.Recordset")


Conn.Open Serv
SQL="SELECT * FORM EmailTable"
RecordView.Open SQL, Conn

Do While Not RecordView.EOF
Ename=RecordView("Name") & "<BR>"
collect =collect & Ename
RecordView.MoveNext
Loop

output="Output=" & collect
Response.Write output

RecordView.Close
Conn.Close
Set RecordView = Nothing
Set Conn = Nothing
%>

Så prøv lige med denne..!

//>Rune
Avatar billede peder77 Nybegynder
12. november 2002 - 13:50 #7
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression '* FORM EmailTable'.

/peter77/acessFlash/EmailFlashList3.asp, line 11
Avatar billede peder77 Nybegynder
12. november 2002 - 13:53 #8
Jeg er ikke sikker på at driveren er sat rigtigt op. Jeg kan ikke rigtig forstå hvordan DSN virker. Jeg har været inde i ODBC og lave en som hedder EmailFlash.dsn. (der er et sted jeg kan vælge ingen eller systemdatabase) Hvor skal prikken sættes?
Avatar billede medions Nybegynder
12. november 2002 - 13:55 #9
SQL="SELECT * FORM EmailTable"

Skal være

SQL="SELECT * FROM EmailTable"

//>Rune
Avatar billede peder77 Nybegynder
12. november 2002 - 14:04 #10
Den er helt umulig! Flash siger at den ikke kan åbne asp filen og asp siger:Microsoft OLE DB Service Components error '80040e73'

Format of the initialization string does not conform to the OLE DB specification.

/peter77/acessFlash/EmailFlashList4.asp, line 10
Avatar billede eagleeye Praktikant
12. november 2002 - 14:38 #11
Prøv at lave disse to liner

Serv= "Driver={Microsoft Access Driver (*.mdb)}" &_
"DBQ=c:\genfs1\www16\peter77\db\emailFlash.mdb;"


Om til:

Serv= "Driver={Microsoft Access Driver (*.mdb)};"
Serv = Serv & "DBQ=c:\genfs1\www16\peter77\db\emailFlash.mdb;"
Avatar billede peder77 Nybegynder
12. november 2002 - 15:11 #12
Det lader ikke til at virke!
Avatar billede eagleeye Praktikant
12. november 2002 - 18:23 #13
Ok får du stadig samme fejl?
Avatar billede peder77 Nybegynder
13. november 2002 - 13:26 #14
Jeg takker for hjælpen igår. Jeg fandt løsningen gennem flasherne, og lortet virker nu. Jeg smider lidt til medions for indsatsen ;)
Avatar billede medions Nybegynder
13. november 2002 - 14:30 #15
Fair nok...
Thx 4 Poinz

//>Rune
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester