objMail.To = " & rsCommon("email") & "

[fraude]

Perchè non funziona:? :master:

sSQL = "SELECT * FROM tblWHERE ID_Code = '" & strUserID & "' " 
    Set rsCommon = Server.CreateObject("ADODB.Recordset") 
    rsCommon.Open sSQL, OpenStr, 3, 3 

Set objMail = Server.CreateObject("CDONTS.NewMail")
..............
objMail.To = " & rsCommon("email") & "

Microsoft VBScript compilation error '800a0401'

Expected end of statement sulla linea di objMail

[Roby_72]

objMail.To = rsCommon("email")

Roby