Salve a tutti.
sono alle prime armi con l'asp e l'esercitazione prevede che utilizzi un form html per interrogare una pagina asp mostrando tutto il contenuto di una tabella.
Dato che ho problemi con IIS (meglio non parlarne, casomai apro un altro thread)
e che apache supporta solo il php (per l'asp è necessaria una pallosissima modifica)
utilizzo un webserver online chiamato Jabry.
la pagina in html è
Legget.htm
mentre la pagina in asp è la seguentecodice:<HTML> <HEAD> <TITLE>Visualizzazione tabella</TITLE> <HEAD> <BDDY> <H3>Richiesta nome tabella </H3> <FORM METHOD="post" NAME="form1" ACTION="/Sprunkman/Legget.asp" Nome della tabella <INPUT TYPE="text" SIZE="40" NAME="tabella"><BR <INPUT TYPE="submit" VALUE="Invia" NAME="bl"> <INPUT TYPE="reset" VALUE="Annulla" NAME="b2"></P> </FORM> </BODY> </HTML>
Legget.asp
mi da errore 500 del server, suppongo che ci sia qualcosa di sbagliato nello script.codice:<%@ LANGUAGE = VBScript %> <% Option Explicit %> <% Dim Conn Dim rs Dim connect_string Dim nome Dim i nome = Request.Form("tabella") connect_string = "DSN=Ospedale;DATABASE=Pazienti;SERVER=localhost; PORT=5432;UID=postgres;PWD=******;" set Conn = server.createObject("ADODB.connection") set rs = server.createObject("ADODB.Recordset") Conn.open connect_string %> <html> <head> <title>Visualizzazione record</title> </head> <body> <table border=1> <tr> <% For i = 0 to rs.Fields.Count -1 %> <TD><% =rs.Fields(i).Name %></TD> <% Next %> </tr> <% rs.MoveFirst Do While Not rs.EOF %> <tr> <% For i = 0 to rs.Fields.Count -1 %> <TD><% = rs.Fields(i).Value %></td> <% Next %> </tr> <% rs.MoveNext Loop rs.Close Conn.Close set rs = nothing set Conn = nothing %> </table> </body> </html>
Ricordatevi che sono alle prime armi con l'asp, non siate troppo pesanti se il problema è banale (anzi lo spero XD)
se non è contro il regolamento, eccovi la pagina in html in azione, per poter vedere l'errore
http://users3.jabry.com/Sprunkman/Legget.htm
(se è vietato toglietelo pure)
Grazie in anticipo
Rispondi quotando
