12 messaggi dal 02 maggio 2001
Primo problema risolto.............
adesso mi da quest'altro problema:

Microsoft VBScript runtime error '800a01a8'

Object required: 'cdoMail'

/lostpsw.asp, line 37

Il codice è questo:
<code>
<%
' controlla l'e-mail
user = Trim(Request.Form("user"))

If Len(user) < 5 Then

Response.write "<P>Hai dimenticato la password?"

Response.write "<form method=post>" &_
"Inserisci lo user-id: "&_
"<input type=""text"" name=""user"">"&_
"<input type=""submit"" value=""Invia"">"&_
"</form> "

Else
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("/mdb-database/db_psw.mdb") & ";"

mail = Replace(mail, "'", "'")
SQL = "SELECT user, mail, password FROM members WHERE " &_
" user = '" & user & "'"
Set Rs = Conn.Execute(SQL)

' non trovato!
If Rs.EOF Then
Response.write "<P>Non esiste questo utente!"

Else
' invia la password
mail = Rs("user")
password = Rs("password")

Set objMail = Server.CreateObject("CDONTS.NewMail")
objMail.From = "info@ondatasonica.com"
objMail.To = mail
objMail.Subject = "Ecco la tua password"
cdoMail.Body = password ' linea 37
cdoMail.Send()
Set cdoMail = Nothing
Response.Write "<P>Password spedita!"
End if
Rs.Close
Set Rs = Nothing
Conn.Close
Set Conn = Nothing

End If

%>
</code>

secondo voi cosa può essere???



la parola può essere libera; il pensiero, purtroppo, è in libertà vigilata: dalla ragione, dalla verità, dalla conoscenza, dalla logica

la parola può essere libera; il pensiero, purtroppo, è in libertà vigilata: dalla ragione, dalla verità, dalla conoscenza, dalla logica
2.907 messaggi dal 15 maggio 2001
Contributi
Se tu crei un oggetto chiamandolo objMail e poi lo richiami con cdoMail per forza che ti da errore !!  cdoMail non esiste.......

Set objMail = Server.CreateObject("CDONTS.NewMail")
objMail.From = "info@ondatasonica.com"
objMail.To = mail
objMail.Subject = "Ecco la tua password"
objMail.Body = password ' linea 37
objMail.Send()
Set objMail = Nothing


Rome Webmaster


12 messaggi dal 02 maggio 2001
<b>rome ha scritto:</b>
<BLOCKQUOTE id=quote><font size=1 face="Arial" id=quote><hr height=1 noshade id=quote>
Se tu crei un oggetto chiamandolo objMail e poi lo richiami con cdoMail per forza che ti da errore !!  cdoMail non esiste.......

Set objMail = Server.CreateObject("CDONTS.NewMail")
objMail.From = "info@ondatasonica.com"
objMail.To = mail
objMail.Subject = "Ecco la tua password"
objMail.Body = password ' linea 37
objMail.Send()
Set objMail = Nothing


Rome Webmaster



<hr height=1 noshade id=quote></BLOCKQUOTE id=quote></font id=quote><font face="Arial" size=2 id=quote>

non mi manda l'email come può essere???
può essere un problema di hosting??



la parola può essere libera; il pensiero, purtroppo, è in libertà vigilata: dalla ragione, dalla verità, dalla conoscenza, dalla logica

la parola può essere libera; il pensiero, purtroppo, è in libertà vigilata: dalla ragione, dalla verità, dalla conoscenza, dalla logica
2.907 messaggi dal 15 maggio 2001
Contributi
prova questo :


Set objMail = Server.CreateObject("CDONTS.NewMail")
objMail.From = "info@ondatasonica.com"
objMail.To = "info@ondatasonica.com"
objMail.Subject = "Ecco la tua password"
objMail.Body = "Password"
objMail.Send()
Set objMail = Nothing

Rome Webmaster



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.