Visualizzazione Account

**Vash SD** · 25-08-2007, 13:39

Vi esponse i lsecondo problema, visto che il primo l'ho appena risolto.

Ho una tabella dove mi visualizza:
Pippo1 Pippo2 Pippo3 Pippo4 Pippo5 Pippo6 e poi

e continua con i ripettivi user e id ma se io vorrei cliccare su un account lui mi reindirizza view.asp?id=1 (se clicco sul primo) e cio vabene. Il problema sorge: come faccio nella querystring a far visualizzare i dati dall'utente 1? e così via per li altri utenti in caso di click?

**varrilaro** · 25-08-2007, 18:00

ovvero ???? non è molto chiaro

**Vash SD** · 27-08-2007, 09:47

scusami, hai perfettamente ragione.

In pratica: Pippo1 Pippo2 Pippo3

quando faccio click su pippo 1 mi deve rerindirizzare su view.asp?id=1, e ciò è fatto. Il problema è come faccio:
1. A sapere dall'indirizzo quale id è, così che io possa prendere i dati dal database da quel id.
2. Come faccio a fare la querystring per tutti gli ID?

CIoè che devo fare così:

VVoVe:

VVoVe:

Qstr = Request.Querystring("id")

if Qstr="1" then
'Dati 1
elseif Qstr="2" then
'Dati 2
....
end if

ma è una folliaa! Esiste un modo , sicuramente più pratico?
Grazie, Vash

**-AA-** · 27-08-2007, 11:49

come costruisci il link?

codice:

se ho ben capito:

pippo N

immagino che l'id sia nel db giusto?

poi nella pagina Vew

select from tabella where IDuser = &request.querystring("id")

**Vash SD** · 27-08-2007, 13:09

non come costruire il link. Quello lo sapevo gia fare.. Ma la seconda risposta mi è stata molto utile grazie AA

**Vash SD** · 27-08-2007, 13:42

Ok ragazzi mi viene un errore: ecco il codice della mia pagina:

codice:

<%
ID = Request.QueryString("id")
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>
  </table>
 </body>
</html>
<%
rs.Close
set rs = nothing
conn.Close
set conn = nothing

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 ID, Username from Utenti"
rs.open sSQL,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>
    <%
	 dim ctCount
     for ctCount = 1 to 6%>
	  <td>
   	   <a href=view.asp?id=<%=rs("ID")%>><%=rs("username")%></a>
	  </td>
	  <%rs.movenext
	   if ctCount = "6" then
	    Response.Write("</tr>")
		Response.Write("<tr>")
		ctCount = "0"
	   end if
	 next
	   if rs.eof then
	    Response.Write("</tr>")
	   end if%>
 </table>
 </body>
</html>
<%
rs.Close
set rs = nothing
conn.Close
set conn = nothing
%>

Io vorrei che nella pagina si visualizza la parte sotto del codice in view.asp e poi appnea si clicca su un utente il suo profilo e diciamo che funziona a ora mi da questo errore:

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression 'ID='.

/Malmsteen/view.asp, line 8

che cos'è?

**-AA-** · 27-08-2007, 13:53

A colpo d'okkio mi sembra la sintassi della query errata...prova...

codice:

sSQL="Select * from Utenti where ID=" &ID

**Vash SD** · 27-08-2007, 14:11

L'errore non c'è più.

http://users2.titanichost.com/Malmsteen/view.asp ecco il link delle prove

la pagina l'ho modificata così:

codice:

<%
if session("username") = "" then
   utente = "visitatore"
else
   utente = "" & session("username") & ""
end if
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 ID, Username from Utenti"
rs.open sSQL,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>
  <tr>
    <%
	 dim ctCount
     for ctCount = 1 to 6%>
	  <td>
   	   <a href=view.asp?id=<%=rs("ID")%>><%=rs("username")%></a>
	  </td>
	  <%rs.movenext
	   if ctCount = "6" then
	    Response.Write("</tr>")
		Response.Write("<tr>")
		ctCount = "0"
	   end if
	 next
	   if rs.eof then
	    Response.Write("</tr>")
	   end if%>
 </table>
 </body>
</html>
<%
rs.Close
set rs = nothing
conn.Close
set conn = nothing

ID = Request.QueryString("id")
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>
  </table>
 </body>
</html>
<%
rs.Close
set rs = nothing
conn.Close
set conn = nothing
%>

Però ci sn due errori il primo quando clicco su un utente mi reindirizza ma mi visualizza sempre la tabella cn gli username invece che il pprofilo e il secondo e chè quando mi visualizza gli username arriva fino all'ultimo e poi mi scrive questo:

ADODB.Field error '80020009'

Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.

/Malmsteen/view.asp, line 0

help please

**-AA-** · 27-08-2007, 14:19

Mo ti spiego che Vor di sta cosa

codice:

Either BOF or EOF is True, or the current record has been deleted

codice:

La condizione BOF o EOF è vera ... il record non è stato trovato non ti posso stampare ciò che non esiste...

Debug---

Vedi se gli passi 1 id che corrisponde ad un record nel DB ....

**Vash SD** · 27-08-2007, 16:02

Capito, ma li stampa tutti e nove come ci sono nella tabella. Allora dove trova l'errore?

Discussione: Visualizzazione Account

Strumenti discussione

Ricerca discussione

Visualizza

Visualizzazione Account

Permessi di invio