Sezione protect in area login

[mimmoby]

:incazz2:Salve avrei bisogno di capire dove sbaglio.

O messo su Sistema di gestione utenti per acceso ad aree protette
preso dalla guida di Mr.Webmaster scritto da Max Bossi.

Premetto che tutto sia andato a buon fine, il problema nasce quando inserisco il comando include nella pagina da proteggere verso l'utente non registrato <!-- #Include File="utenti/protect.asp" --> ovviamente settato bene credo.

Mettiamo il caso che io sia un utente non registrato sul mio sito, voglio vietare l'ingresso ad una suddetta pagina, vado per cliccare sul un link per accedere in quella pagina protetta! ma mi esce questa stringa di errore:

Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][ODBC Microsoft Access Driver] Not a valid file name.

/utenti/protect.asp, line 22

Almeno credo che ci dovrebbe portare alla pagina di registrazione giusto?

Grazie in anticipo per il vostro aiuto.

 

[alessandro1997]

Non mi intendo di ASP, ma non ci vuole una laurea per capire che l'errore è "file non trovato". Quindi, sei sicuro che il file utenti/protect.asp esista rispetto al file da cui effettui l'inclusione?

 

[mimmoby]

Non mi intendo di ASP, ma non ci vuole una laurea per capire che l'errore è "file non trovato". Quindi, sei sicuro che il file utenti/protect.asp esista rispetto al file da cui effettui l'inclusione?

Ciao alessandro e grazie prima di tutto per il tuo aiuto.

Certo che esiste! si trova in una cartella chiamata utenti.
credo che debba postare il codice della pagina prima che tu me lo chiedi, cosi gli dai uno sguardo.

Files protect.asp

<%
'Specifico la URL della pagina di Login
Dim LoginPage
LoginPage = "http://www.mbyweb.eu/utenti/login.asp"

'Creo le variabili User e Pass
'recuperando il valore della session corrispondente
Dim LoginU, LoginP
LoginU = Session("User")
LoginP = Session("Pass")

'Se le variabili sono vuote...
'rimando alla pagina di login
if LoginU="" or LoginP="" then
response.redirect LoginPage
response.end
end if

'Apro la connessione al DB
Dim LoginConn
Set LoginConn = Server.CreateObject("ADODB.Connection")
LoginConn.Open "driver={Microsoft Access Driver (*.mdb)};dbq = "&_
Server.MapPath("/mdb-database/utenti_sito.mdb")

'Imposto la query ed apro il recordset
Dim LoginQuery, LoginRs
LoginQuery = "select * from UTENTI where user = '" & LoginU & "' "&_
"and pass = '" & LoginP & "'"
Set LoginRs = Server.CreateObject("ADODB.Recordset")
LoginRs.Open LoginQuery, LoginConn, 3, 3

'Se l'utente non viene trovato...
'rimando alla pagina di login
if LoginRs.EOF then
response.redirect LoginPage
response.end
end if
%>

se trovi l'errore io sono qui, se in caso vuoi vedere le altre pagine tipo la pagina login idem basta chiedere.

PS: dimenticavo, se ti fosse di utilytà io uso asp include " pagine con l'include" ciao

 

[@SP]

Ciao mimmoby, l'errore da te postato mi sa tanto che derivi dal db. Hai controllato di aver settato bene i parametri per la sua connessione??

 

[Majinbu]

Ciao mimmoby, l'errore da te postato mi sa tanto che derivi dal db. Hai controllato di aver settato bene i parametri per la sua connessione??

Ciao...Infatti alla riga 22 l'errore dovrebbe essere questo :
Server.MapPath("/mdb-database/utenti_sito.mdb")
Controlla bene percorso e permessi.

 

[mimmoby]

Ciao a tutti voi e un grazie di cuore per il vostro aiuto prezioso.

Mi sa tanto che ci provo di nuovo, in quanto avevo rinunciato a questo script.

Visto che voi mi state aiutando credo di riprendere il discorso alla quale non capivo dove potevo sbagliare.

Vi farò sapere subito appena metto su lo script.

Grazie Mille

E auguri passati per una buona pasqua

 

[Paolo69]

...se mi mandi il tutto via e-mail te lo controllo :hammer:

 

[mimmoby]

Files protect.asp

...se mi mandi il tutto via e-mail te lo controllo :hammer:

Grazie mille lo faccio appena posso ti sarei grato.

 

[mimmoby]

Files protect.asp

Ciao Paolo
ti ringrazio prima di procedere con il tuo aiuto.

eccoti il problema che mi causa vedi tu stesso a questo link:
http://www.mbyweb.eu/foto_gallery/gallery.asp

Errore:

Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][ODBC Microsoft Access Driver] Not a valid file name.

/utenti_sito/protect.asp, line 22

in sostanza e il link alla quale o protetto con il file protect.asp
con <!-- #Include virtual="/utenti_sito/protect.asp" -->

guarda inviami la tua mail a mimmoby@libero.it
cosi ti mando i files da controllare ok?

grazie ancora di tutto a presto

 

[mimmoby]

Files protect.asp

Comunque Paolo69 grazie per avermi preso in giro per il tuo aiuto!!!!!!
ancora sto aspettando che mi aiuti privatamente come da te accordato....

Ma in questo forum esiste qualche amministratore reale alla quale aiutare utenti che anno bisogno?

grazie

 

[Paolo69]

...purtroppo sono stato via per lavoro e solo stamane riesco ad avere qualche minuto libero.

prova a sotituire la riga 22 del file protect.asp in questo modo:

LoginConn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath("/mdb-database/utenti_sito.mdb")

senza andare a capo, tutta una riga.
Fammi sapere (in locale mi funziona)

 

[Majinbu]

Comunque Paolo69 grazie per avermi preso in giro per il tuo aiuto!!!!!!
ancora sto aspettando che mi aiuti privatamente come da te accordato....

Ma in questo forum esiste qualche amministratore reale alla quale aiutare utenti che anno bisogno?

grazie

 

[mimmoby]

Scusami Paolo non potevo immaginare visto la tua assenza per lavoro, cerca di scusare la mia invadenza.

Ascolta il problema sembra risolto ma con processo strano, visualizzo 2 template in successione come mai?

ascolta ti o approvato la tua registrazione cerca di fare una prova entrando loggandoti
alla pagina

 http://www.mbyweb.eu/utenti_sito/login.asp

poi cerca di entrare nella pagina privacy dove o inserito il codice protect

<!-- #Include virtual="/utenti_sito/protect.asp" -->

http://www.mbyweb.eu/privacy.asp

vediamo visualizzi la stessa cosa?
fammi sapere ok?
ciao e scusami ancora di tutto

 

[mimmoby]

Files protect.asp

Scusami Paolo credo di aver risolto da solo grazie di tutto, ci sentiamo in privato ok ti devo fare una richiesta....
comunque Tutto questo grazie al tuo aiuto sei un grande ciao