Lista dati prelevati da DB

**vpoppa** · 01-08-2005, 11:02

Sto creando una pagina di immissione dati che dovrebbe consertirmi di aggiornare un DB ACCESS. Alcuni di questi campi devono prendere i dati da tabelle, in pratica devo creare delle menu a lista i cui dati sono presi dal DB. Qualcuno può aiutarmi.

Grazie.

Vincenzo

**asva** · 01-08-2005, 11:11

ci sono moltip ost in merito cerca nel forum...l'argomento è stato + volte trattato

**fraude** · 01-08-2005, 11:14

Esempio:

codice:

<select size="1" name="TuoNome" style="font-size: 8 pt; font-family: Verdana">
                <option>Select</option>
                <%
sql = "SELECT * FROM tuatabella ORDER BY ID asc"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, cn, 3, 3

rs.MoveFirst  
Do While Not rs.EOF
%>

<option value="<%=rs("id")%>"><%=rs("quellochevuoifarapparirenellaselect")%></option>

<%
rs.MoveNext
Loop
rs.Close
set rs = Nothing
%>

              </select>

**vpoppa** · 01-08-2005, 12:03

Ho scritto il seguente codice:

<select size="1" name="Lista_Titolo" style="font-size: 8 pt; font-family: Verdana">
<option>Select</option>
<%
Set MyConnection = Server.CreateObject("ADODB.Connection")
MyConnection.Open STRINGACONNESSIONE

sql = "SELECT * FROM Titolo ORDER BY Titolo"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, cn, 3, 3
rs.MoveFirst
Do While Not rs.EOF
%>
<option value="<%=rs("IdTitolo")%>"><%=rs("Titolo")%></option>
<%
rs.MoveNext
Loop
rs.Close
set rs = Nothing
Myconnection.Close
set myconnection = nothing
%>
</select>

ma nella lista compare solo la voce "select" e non gli elementi della tabella "Titolo".
Dove ho sbagliato.

Vincenzo

**fraude** · 01-08-2005, 12:06

codice:

rs.Open sql, MyConnection, 3, 3

**vpoppa** · 01-08-2005, 12:44

ho fatto la modifica ma ancora nella lista compare solo la voce "select".
Sapresti darmi qualche altra indicazione.
Grazie.

Vincenzo.

**fraude** · 01-08-2005, 12:50

sicuro che la tabella TITOLO contenga qualcosa o è vuota?

**vpoppa** · 01-08-2005, 12:56

La tabella "Titolo" si trova in "Dati.mdb", è costituita da due colonne ("IdTitolo" e "Titolo") e contiene dei valori.
Io ho creato un file "default.asp" il cui contenuto è il seguente:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>Documento senza titolo</title>
</head>

<body>

<select size="1" name="Lista_Titolo" style="font-size: 8 pt; font-family: Verdana">
<option selected>Select</option>
<%
Set MyConnection = Server.CreateObject("ADODB.Connection")
MyConnection.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("/") & "Dati.mdb;"

sql = "SELECT * FROM Titolo ORDER BY Titolo"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, MyConnection, 3, 3
rs.MoveFirst
Do While Not rs.EOF
%>
<option value="<%=rs("IdTitolo")%>"><%=rs("Titolo")%></option>
<%
rs.MoveNext
Loop
rs.Close
set rs = Nothing
Myconnection.Close
set myconnection = nothing
%>
</select>

</body>
</html>

Non capisco dove sbaglio.

Vincenzo

**fraude** · 01-08-2005, 13:59

prova così:

codice:

MyConnection.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.Mappath("../mdb-database/dati.mdb")

**vpoppa** · 01-08-2005, 14:24

niente da fare...

Vincenzo

Discussione: Lista dati prelevati da DB

Strumenti discussione

Ricerca discussione

Visualizza

Lista dati prelevati da DB

lista da DB

Permessi di invio