I forum Ricerca FAQ
Fai una domanda
Ultimo messaggio 1 2
Spike22
Spike22
il 16 gennaio 2005 alle 12:16
26 messaggi dal 03 gennaio 2005
<%

' PERCORSO DEL DATABASE
url_DB = "driver={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath("database.mdb")

Set Conn = Server.CreateObject("ADODB.Connection")
conn.Open url_DB

sql = "update utenti set STATO=Online where STATO=null"

conn.close()
set conn = nothing
%>

Ecco ho fatto cosi.. nn mi da errori ma nn mi aggiunge nulla nel databse.. cmq da come ho capito cosi facendo mi dovrebbe mettere on-line a tutti.. oh no? o mi mette on-line solo all'utente ke è arrivato su questa pagina col codice???

resta comunque il fatto ke nn mi funziona... anche xkè dove c''è WHERE a me potrebbe anke essere vuoto come potrebbe eserci Off-line o come potrebbe esserci On-line, quindi cosa devo metterci?
Ciao e grazie dell'aiuto
RispondiQuoting
nargozzz
nargozzz
il 16 gennaio 2005 alle 15:08
21 messaggi dal 21 settembre 2004
non capisco cosa tu voglia fare, ma da quanto ho capito, cambiare semplicemente un dato in un database.
io userei un altro metodo, a prescindere cmq li' non vedo nessun oggetto recordset dichiarato e/o usato.
RispondiQuoting
Spike22
Spike22
il 16 gennaio 2005 alle 16:38
26 messaggi dal 03 gennaio 2005
Voglio che all'utente (identificato precedentemente) appena arrivatoi in questa pagina aggiunga nelle sue informaziini nel database nel campo Stato "Online".
Se conoscete un metedodo migliore...
RispondiQuoting
nargozzz
nargozzz
il 16 gennaio 2005 alle 18:24
21 messaggi dal 21 settembre 2004
una cosa del genere.


Set Conn=Server.CreateObject("ADODB.Connection")
strConn="driver={Microsoft Access Driver (*.mdb)}; "
strConn=strConn & " DBQ=" & Server.MapPath("Prova.mdb")


Conn.Open strConn
sql = "SELECT * FROM NomeTuaTabella WHERE User="&NomeUserLoggato

Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,2,2
rs("stato")="Online"

rs.update
rs.Close
set rs = Nothing
conn.Close
set conn = Nothing
%>
RispondiQuoting
Spike22
Spike22
il 16 gennaio 2005 alle 19:58
26 messaggi dal 03 gennaio 2005
L'ho modificato in questo modo, ma nn funziona, al posto di nome utente cosa devo mettere? nn voglio mettere un utente specifico, ma voglio fare in modo che l'utente venga riconosciuto da solo in base al login che ha effettutao...

<%
Set Conn=Server.CreateObject("ADODB.Connection")
strConn="driver={Microsoft Access Driver (*.mdb)}; "
strConn=strConn & " DBQ=" & Server.MapPath("database.mdb")


Conn.Open strConn
sql = "SELECT * FROM utenti WHERE User="&id

Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,2,2
rs("stato")="Online"

rs.update
rs.Close
set rs = Nothing
conn.Close
set conn = Nothing
%>
RispondiQuoting
nargozzz
nargozzz
il 16 gennaio 2005 alle 20:06
21 messaggi dal 21 settembre 2004
dipende chiaramente da cosa hai usato per il login e di conseguenza per l'accesso alle aree protette, se hai usato session ecc.
RispondiQuoting
Spike22
Spike22
il 17 gennaio 2005 alle 15:05
26 messaggi dal 03 gennaio 2005
ecco il codice che uso per vedere s el'utente è loggato...
sai aiutarmi tramite questo???


<%
' VERIFICHIAMO SE L'UTENTE E' IDENTIFICATO (LOGGATO)

IF Session("Loggato") = False and Session("Username") = "" then
' UTENTE NON LOGGATO
' (SESSION "LOGGATO" = FALSE E LA SESSION "USERNAME" NON HA NESSUN VALORE)

' PORTA L'UTENTE NELLA PAGINA LOGIN.ASP
' PER FARLO IDENTIFICARE

Response.Redirect "errore.asp"
End IF
%>
RispondiQuoting
nargozzz
nargozzz
il 17 gennaio 2005 alle 20:33
21 messaggi dal 21 settembre 2004
Set Conn=Server.CreateObject("ADODB.Connection") 
strConn="driver={Microsoft Access Driver (*.mdb)}; " 
strConn=strConn & " DBQ=" & Server.MapPath("Prova.mdb") 


Conn.Open strConn 
sql = "SELECT * FROM utenti WHERE User='"+Session("Username")+"'"


Set rs = Server.CreateObject("ADODB.Recordset") 
rs.Open sql, conn ,2,2 
rs("stato")="Online" 

rs.update 
rs.Close 
set rs = Nothing 
conn.Close 
set conn = Nothing 
%>
RispondiQuoting
1 2

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.