Persits.MailSender errore nel primo script

[MicheleWT]

Salve, ho usato sempre pochissimo asp.

Ora però devo far funzionare un banale form da inviare via mail. per configurazione server sono obbligato a usare Persits.MailSender

ho scritto il seguente script

<%@LANGUAGE = JScript%>
					<%
                       var check_error=0;
					   
                       var form_name = new String(Request.Form("name"));
					   var form_surname = new String(Request.Form("surname"));
					   var form_company = new String(Request.Form("company"));
					   var form_address = new String(Request.Form("address"));
					   var form_city = new String(Request.Form("city"));	
					   var form_telephone = new String(Request.Form("telephone"));	
					   var form_fax = new String(Request.Form("fax"));
					   var form_message = new String(Request.Form("message"));					   
                       var form_email = new String(Request.Form("email"));
					   var form_policy = new String(Request.Form("policy"));
                    
                       // Effettuo un banale controllo sulla validità dei campi
                       if (form_name == "" || form_surname =="" || form_email == "" || form_message == "" || form_policy=="") {
						   Response.Write("

Errore: i campi Nome, Cognome, Email e Messaggio sono obbligatori</p>");
						   check_error=1;
                       }
					   
					   if (form_policy==0) {
                           Response.Write("

Errore: Occorre leggere e autorizzare l'informativa sulla privacy</p>");
						   check_error=1;
                       }
                    	
						
						if(check_error==0)
						{
							
							Dim objMail;
							Set objMail = Server.CreateObject("Persits.MailSender");
						
							objMail.Host = "smtp.provider.ext";
							objMail.From = "info@ecoedilprofessional.com";
							objMail.FromName = form_name;
							objMail.AddAddress form_email, "ecoedilprofessional";
							objMail.Subject = "Richiesta informazioni";
							objMail.Body = form_message;
						
							' Invio la mail
							objMail.Send;
							Set objMail = Nothing;
	
                	        Response.Write("Email inviata con successo");
					   }
					   
					   
					   
                    %>

eppure ricevo errore alla riga "Dim objMail;"


Microsoft JScript compilation error '800a03ec'

Expected ';'

/email_contact.asp, line 108

Dim objMail
----^


mi pare sia un'errore di sintassi ma non capisco dove sbaglio.

grazie a tutti

[MicheleWT]

<%@LANGUAGE = JScript%>
<%


Dim objMail
Set objMail = Server.CreateObject("Persits.MailSender");

objMail.Host = "smtp.provider.ext";
objMail.From = "info@ecoedilprofessional.com";
objMail.FromName = "michele";
objMail.AddAddress "michele@levservizi.com", "ecoedilprofessional";
objMail.Subject = "Richiesta informazioni";
objMail.Body = "questo è il corpo!";

' Invio la mail
objMail.Send;
Set objMail = Nothing;

Response.Write("Email inviata con successo");
}



%>


anche limitandomi a questo sempre il solito errore! ma dov'è l'errore?

[Roby_72]

ma in JScript si usa la Dim?
Comunque l'errore è la mancanza di un ";" alla fine.

Roby

[MicheleWT]

Originariamente inviato da Roby_72
ma in JScript si usa la Dim?
Comunque l'errore è la mancanza di un ";" alla fine.

Roby

é un copia incolla. non programmo in asp. il resto lo faccio a senso.

se scrivo
Dim objMail ;

non cambia nulla

ho capito male? qual'è l'errore?

[MicheleWT]

sono riuscito a fare partire la mail.

il problema che ho è raccogliere, filtrare i dati del form e poi passarli all'invio della email.

Il codice sotto non funziona, mi segnala sempre errore. Eliminando la parte dove raccolgo i dati del form, l'email parte.

non capisco proprio, scusate. So che sono problemi banali di chi non ha mai lavorato con un certo linguaggio o tecnologia e che non ho tempo di leggere un manuale.

Devo solo modificare una pagina di una sito nemmeno fatto da me
Se JScript non è corretto cosa devo mettere?

[code]
<%@LANGUAGE = JScript%>
<%
var form_name = new String(Request.Form("name"))
var form_surname = new String(Request.Form("surname"))
var form_company = new String(Request.Form("company"))
var form_address = new String(Request.Form("address"))
var form_city = new String(Request.Form("city"))
var form_telephone = new String(Request.Form("telephone"))
var form_fax = new String(Request.Form("fax"))
var form_message = new String(Request.Form("message"))
var form_email = new String(Request.Form("email"))
var form_policy = new String(Request.Form("policy"))


<SCRIPT LANGUAGE="VBScript" RUNAT="Server" >
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "imail.mymail.info" ' Indicare il vostro dominio
Mail.From = "info@mymail.com" ' Indicare l'indirizzo del mittente
Mail.FromName = "mymail.com" ' Specificare il nome del mittentee

Mail.AddAddress "michele@mymail.com", "Michele" ' Il destinatario

Mail.Subject = "Richiesta informazioni"
Mail.Body = "Nome: form_name \r\n Cognome:"

// Effettuo un banale controllo sulla validità dei campi
if (form_name == "" || form_surname =="" || form_email == "" || form_message == "" || form_policy=="") {
Response.Write("

Errore: i campi Nome, Cognome, Email e Messaggio sono obbligatori</p>");
check_error=1;
}

if (form_policy==0) {
Response.Write("

Errore: Occorre leggere e autorizzare l'informativa sulla privacy</p>");
check_error=1;
}


On Error Resume Next
Mail.Send
If Err <> 0 Then
Response.Write "Error encountered: " & Err.Description
End If
%>
[code]