connessione ASP a database

[gimi302]

Salve a tutti o questo quisito da proporre ;

o questo codice che recupera la password la spedisce via Email, la conessione in locale funziona e tutto va bene.
Adesso devo pubblicare le pagine e il mio provider mi dice che per farlo funzionare devo inserire una conessione ASP o provato in vari modi ma mi creano solo errori e non so più come fare, qualcuno di voi brava gente mi saprebbe dire o dare una dritta.

sto lavorando con Dreamweaver cs4

non ditemi chiedi al tuo provider perchè lo fatto ma immaginate

o provato a mettere questa connessione ( non so se sia esatta ) :

<%
Dim cn
Set cn = Server.CreateObject("ADODB.Connection")
cn.Open "driver={Microsoft Access Driver(*.mdb)};dbq="&_
Server.MapPath("databasename.mdb")
%>

questo è il codice completo della pagina in questione.



<%
// Dichiaro le variabili
Dim strEmail, objRs, bitPagina

// Recupero i dati dal campo del form
strEmail = Trim(Request.Form("[email]"))

// La variabile bitPagina mi dirà quale pagina caricare
urlPagina = ""

// Preparo il database
Set objRs = Server.CreateObject("ADODB.Recordset")
objRs.ActiveConnection = [MM_DB_STRING]
objRs.CursorType = 0
objRs.CursorLocation = 2
objRs.LockType = 3

// Quindi predispongo la query
objRs.Source = " SELECT [user],[pass] FROM [tabella] " &_
" WHERE [email] LIKE '" & Replace(strEmail, "'", "''") & "' "
objRs.Open()

// Verifica presenza/assenza record
If Not objRs.EOF or Not objRs.BOF then
// Il record esiste, richiamo la procedura d'invio email
InviaMail "[mittente]", _
strEmail, _
"[soggetto]", _
"Ecco i tuoi dati: " & chr(13) & chr(13) &_
"User: " & objRs.Fields("[user]") & chr(13) &_
"Pass: " & objRs.Fileds("[pass]") & chr(13)

// Imposto urlPagina con l'indirizzo della pagina di conferma
bitPagina = "inviato.asp"
Else
// Imposto urlPagina con l'indirizzo della pagina d'errore
bitPagina = "errato.asp"
End If

objRs.Close()
Set objRs = Nothing

// Ed ora ... richiamiamo le pagine corrette
Response.Redirect urlPagina
Response.End

Sub InviaMail(PAR_Mittente, PAR_Destinatario, PAR_Soggetto, PAR_MailBody)

Dim VAR_MailServer
Dim OBJ_SMTP

Set OBJ_SMTP = Server.CreateObject("CDONTS.NewMail")
OBJ_SMTP.From = PAR_Mittente
OBJ_SMTP.To = PAR_Destinatario
OBJ_SMTP.Subject = PAR_Soggetto
OBJ_SMTP.Body = PAR_MailBody
OBJ_SMTP.MailFormat = 1
OBJ_SMTP.Send
Set OBJ_SMTP = Nothing
End Sub
%>

grazie a tutti coloro che avranno pietà di me gimi302

[optime]

Originariamente inviato da gimi302
Salve a tutti o questo quisito da proporre ;

o questo codice che recupera la password la spedisce via Email, la conessione in locale funziona e tutto va bene.
Adesso devo pubblicare le pagine e il mio provider mi dice che per farlo funzionare devo inserire una conessione ASP o provato in vari modi ma mi creano solo errori e non so più come fare, qualcuno di voi brava gente mi saprebbe dire o dare una dritta.

sto lavorando con Dreamweaver cs4

non ditemi chiedi al tuo provider perchè lo fatto ma immaginate

o provato a mettere questa connessione ( non so se sia esatta ) :

<%
Dim cn
Set cn = Server.CreateObject("ADODB.Connection")
cn.Open "driver={Microsoft Access Driver(*.mdb)};dbq="&_
Server.MapPath("databasename.mdb")
%>

questo è il codice completo della pagina in questione.


.....


grazie a tutti coloro che avranno pietà di me gimi302

e perché dovremmo, visto che tu non hai avuto pietà per la grammatica e l'ortografia, offendendo gravemente la nostra bellissima lingua....

comunque, guarda qui http://www.connectionstrings.com/access

[gimi302]

Ciao si ai ragione e me ne scuso ( spero di screvere corretto almeno adesso ) .
Grazie ma avevo trovato anchio tutto questo.
A parte che fra tutte quelle connessioni non so quale sia quella giusta immagino che devo provarle tutte, va bene questo non è un problema.
il problema mi sorge a questo punto della stringa :

objRs.ActiveConnection = [MM_DB_STRING]

e poi devo fare dei cambiamenti anche in altre parti del codice ?

come avrai ben capito non sono molto bravo ,non solo in scrittura, ma anche in queste cose, il mio campo è Flash

comunque si mi puoi dare delle informazioni grazie gimi302