SELECT per nome utente che non Funge...

**domy984pa** · 22-11-2006, 14:53

slave a tutti... sono riuscito a fare funzionare gran parte del mio database asp ma c'è solo una cosa che non mi riesce... vorrei visualizzare il nome utente dello stesso utente che si è loggato nella sua area riservata...

ho provato con l'espressione: sql= select * from utenti where code like <%=nomeutente%>

"benvenuto :"<%=nomeutente%>, per estrarre il record esatto che eve essere visualizzato uso sql...

ma ho paura di dimenticare o di saltare qualcosa...

ho un database in access con il nome "utenti" con una tabella "utenti" e i campi sono ID, nomeutente, password e il login e le varie aree mi funzionano perfettamente...

confido in voi... Grazie mille e a presto!

**Roby_72** · 22-11-2006, 15:18

vediamo lo script completo.

Roby

**domy984pa** · 22-11-2006, 16:31

<%
if Session("Autenticato")<>"OK" then
Response.Redirect "area_riservata.asp"
end if
%>
<div align="center">
<html>

<head>

<meta http-equiv="Content-Language" content="it">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>Area Riservata</title>
</head>



<body bgcolor="#2869A2" background="../images/sfondi/sfondotabella.jpg">

<table cellpadding="0" cellspacing="0" width="812" height="188" id="table1">

<tr>
<td align="center" width="808">


"benvenuto :"<%=nomeutente%>,
<%
sql= select * from tabella where code like <%=ID%>
%>


Il tuo IP è

<%
Dim IP
IP = Request.ServerVariables("REMOTE_ADDR")
Response.Write IP
%>

[/b]
[/b][/i] utenti connessi <%=Application("utenti")%>
 
Se desideri uscire --> LOGOUT










</td>
<td height="188" width="4"></td>
</tr>
</table>

</body>
</html>
</div>

COSA SBAGLIO?

**Roby_72** · 22-11-2006, 17:30

codice:

sql= "select * from tabella where code like '"& ID &"'%>

Ma ID da dove viene? Non lo recuperi...

**domy984pa** · 22-11-2006, 17:47

ero sicurissimo di sbagliare... e sono sicuro ke sbaglio ancora
ho provato questa variante
<%
Dim cn
Set cn = Server.CreateObject("ADODB.Connection")
cn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("utenti.mdb")
Dim sql
sql = "SELECT ID FROM Utenti WHERE code like nomeutente='" nomeutente
Dim rs
Set rs = cn.Execute(sql)
Response.Write rs
%>
ma nn ci riesco...

c'è magari qualche anima buona che mi può aiutare a compilare questo listato? Grazie mille a tutto...

**Stan** · 22-11-2006, 17:55

codice:

<% 
Dim cn 
Set cn = Server.CreateObject("ADODB.Connection") 
cn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("utenti.mdb") 
Dim sql 
sql = "SELECT ID FROM Utenti WHERE code like nomeutente='%" & nomeutente & "%'"
Dim rs
Set rs = cn.Execute(sql)
Response.Write rs
%>
ma nn ci riesco... :dhò: 

c'è magari qualche anima buona che mi può aiutare a compilare questo listato? Grazie mille a tutto... [/QUOTE]

Non sono sicuro del percento ma mi pare che ci vadano quei caratteri.

**domy984pa** · 22-11-2006, 18:12

niente di fatto...
con il listato:

<%
Dim cn
Set cn = Server.CreateObject("ADODB.Connection")
cn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("utenti.mdb")
Dim sql
sql = "SELECT ID FROM Utenti WHERE code like nomeutente='%" & nome_ut& "%'"
Dim rs
Set rs = cn.Execute(sql)
Response.Write rs
%>

mi visualizza l'errore...

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

[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1.

/riservato.asp, line 34

**Roby_72** · 22-11-2006, 18:36

1) Perché usare il LIKE? Toglilo... e metti l'uguale
2) Ciò che metti do l'uguale deve essere valorizzato da quanclhe parte PRIMA ma non c'è.

Roby

**domy984pa** · 22-11-2006, 19:07

niente di fatto...
peggio di prima

**Roby_72** · 22-11-2006, 19:59

E cosa avresti fatto ora?

Roby

Discussione: SELECT per nome utente che non Funge...

Strumenti discussione

Ricerca discussione

Visualizza

SELECT per nome utente che non Funge...

Permessi di invio