scusa cosa c'è alla linea 0 ?
/Malmsteen/view.asp, line 0
.... sicuro di passargli l'id giusto?
scusa cosa c'è alla linea 0 ?
/Malmsteen/view.asp, line 0
.... sicuro di passargli l'id giusto?
Tanto...lo fanno tutti... posso farlo anche io vero?
certo
[list=1][*]Mi scrive quell'errore di cui stiamo adesso parlando[*]Mi reindirizza sulla querystring, giusta, ma per mi visualizzaza sempre la pagina[*]Com'è sta storia? Nell'indirizzo che ti ho dato vedi tutto[/list=1]
Personal Home Page
Vash SD mi ha dato un codice veramente interessante... Grazie
...curiosità... quale?Originariamente inviato da NadiaCassi
Vash SD mi ha dato un codice veramente interessante... Grazie
Tanto...lo fanno tutti... posso farlo anche io vero?
Io mi ci sono scervellato e invece gli altri lo prendono gia fatto
Comunque alle 3 domande sopra, che mi rispondi AA ?
Personal Home Page
Oddio quello che stai cercandol di fare è abbastanza semplice ... non vedo cosa ci sia da pigliare...tuy stai facendo 1 pagina che stampa N record e 1 altra che fa vedere il dettaglio per 1 record selezionato....Originariamente inviato da Vash SD
[list=1][*]Mi scrive quell'errore di cui stiamo adesso parlando[*]Mi reindirizza sulla querystring, giusta, ma per mi visualizzaza sempre la pagina[*]Com'è sta storia? Nell'indirizzo che ti ho dato vedi tutto[/list=1]
Inoltre il ciclo For che usi per aprire e chiudere il TR è sbagliato.... come logica... guardaci bene
se vuoi passarmi i file forse facciamo prima.. o li zippi e li fai scaricare (compreso il db) oppure mandami 1 mail
Tanto...lo fanno tutti... posso farlo anche io vero?
okok ecco il filettino..
http://files-upload.com/files/467411/errore.rar
fammi sapere. Saluti, Vash
Personal Home Page
nn viene giù
Tanto...lo fanno tutti... posso farlo anche io vero?
clicchi sul link aspetti 30 secondi poi cliccki su download link e lo scarica... ho provato e funziona perfettamente!
Personal Home Page
esempio su http://www.varrilaro.net/view.asp<%
if session("username") = "" then
utente = "visitatore"
else
utente = "" & session("username") & ""
end if
ID = Request.QueryString("id")
if id <> "" then
set conn = server.CreateObject ("ADODB.Connection")
conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mapPath("Db/database.mdb")
set rs = server.CreateObject ("ADODB.Recordset")
sSQL="Select * from Utenti where ID=" &ID
rs.open sSQL,conn,3,3
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>Profilo Personale di <%=rs("Username") %></title>
</head>
<body>
<table align="center" cellpadding="5">
<tr>
<td colspan="2">
<b style="font-size: 1.6em; font-weight: bold;"><%= rs("Username") %>[/b]
<%= rs("MessaggioPersonale") %>
</td>
</tr>
<tr>
<td>
[img]noavatar.gif[/img]
</td>
<td>
Username: <%= rs("Username") %>
Nome: <%= rs("Nome") %>
</td>
</tr>
<tr>
<td>
Sesso: <%= rs("Sesso") %>
Nato : <%= rs("Datanascita") %>
</td>
<td>
Città: <%= rs("Citta") %>
Email: <%= rs("Email") %>
</td>
</tr>
<tr>
<td colspan="2">
<p align="center">Torna all'elenco</td>
</tr>
</table>
</body>
</html>
<%
rs.Close
set rs = nothing
else
set conn = server.CreateObject ("ADODB.Connection")
conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mapPath("Db/database.mdb")
set recordset = server.CreateObject ("ADODB.Recordset")
sql="select id, username from utenti"
recordset.open sql,conn,3,3
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>Lista Account</title>
</head>
<body>
<table align="center">
<tr>
<td colspan="6" align="center">
Ciao <%=utente%>, ecco la ista degli account. Con loro si potrà visualizzare anche il loro profilo
<hr>
</td>
</tr>
</table>
<table align="center">
<tr>
<%
dim cont
cont = 1
do until recordset.eof
if cont<6 then
response.write("<td>")
response.write("" & recordset("username") & "")
response.write("</td>")
cont = cont + 1
else
response.write("<td>")
response.write("" & recordset("username") & "")
response.write("</td></tr><tr>")
cont = 1
end if
recordset.movenext
loop
%>
</tr>
</table>
</body>
</html>
<%
recordset.Close
set rs = nothing
conn.Close
set conn = nothing
end if
%>
ciao
Permessi di invio
Rispondi quotando