Estrarre dati da database

[Fede80]

Ciao a tutti,
premetto che sono un vero neofita di asp!
Ho letto il tutorial su come connettersi ed estrarre dati da un database, ho seguito tutta la procedura ma ricevo un errore di questo tipo :incazz2:

Errore di compilazione di Microsoft VBScript (0x800A03EA)
Errore di sintassi
/proveasp/db1.asp, line 13, column 8
Do While
-------^

Ecco il codice che utilizzo

<%
Dim objConn
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & _
Server.MapPath("db2.mdb")

Dim objRS
Set objRS = Server.CreateObject("ADODB.RecordSet")
objRS.Open "Studenti", objConn
%>

<%
Do While
Not objRS.EOF
Response.Write objRS("Nome") & " " & objRS("Cognome") & "<br>"
objRS.MoveNext
Loop

objRS.Close
Set objRS = Nothing

objConn.Close
Set objConn = Nothing
%>

Il tutto è pubblicato con IIS su winXp. La tabella del database (db2.asp) si chiama "Studenti" e i campi da estrarre "Nome" e "Cognome".

Ho letto i post precedenti sull'argomento, ma non ho ancora risolto...dove sbaglio? :crying:

Grazie mille :elvis:

 

[adry_tssj]

Probabilmente ti dà errore perchè la scrittura giusta è

Do While Not (objRS.EOF)

senza andare a capo...
A volte fa i capricci per quello...

 

[PoLe]

Ciao!

L'errore sta tutto qui:

Do While
Not objRS.EOF
Response.Write objRS("Nome") & " " & objRS("Cognome") & "<br>"
objRS.MoveNext
Loop

Nel while la condizione va tutta sulla stessa riga

Do While Not objRS.EOF
Response.Write objRS("Nome") & " " & objRS("Cognome") & "<br>"
objRS.MoveNext
Loop


Il resto del codice dovrebbe essere tutto ok!! :fonzie:

Salut!
:byebye:

 

[Fede80]

Cavoli è vero!!!
Grazie mille, adesso funziona!
Mi sa allora che mi vedrete spesso da queste parti a chiedere un po' di cose, ehehe!!!

Grazie ancora,
ciao!