errore di pubblicazione pagina asp

**Manimuzzu** · 23-09-2006, 18:47

carissimi amici vi espongo il mio problema:
ho creato una pagina asp con l'iscrizione a una newsletter, quando pubblico le pagine , la prima (quella con il campo di inserimento E-Mail) mi viene visualizzata correttamente, mentre quando poi vadoa confermare l'iscizione mi esce sto codice ultra incasinato:

Microsoft JScript compilation error '800a03f7'

Unterminated string constant

/cgi-bin/adovbs.inc, line 2

'--------------------------------------------------------------------
---------------------------------------------------------------------^
Vi prego aiutatemi, ci sto su sta cosa da 10 giorni e ancora non ho risolto niente!!
gentilissimi

**agenti** · 23-09-2006, 19:58

MAGARI FACCI VEDERE IL CODICE

**Roby_72** · 24-09-2006, 00:20

In una pagina asp scritta con JS lato server hai incluso una scritta in Vbscript.

Roby

**Manimuzzu** · 24-09-2006, 10:05

ecco il codice
Ok ma scusate: che differenza c'è tra pagina JS e Vbscript? Scusate la mia ignoranza!
Comunque questo è il codice:

<html>
<head>
<title>NEWSLETTER</title>
</head>
<body>

<%
' VERIFICA CHE IL CAMPO EMAIL SIA STATO COMPILATO CORRETTAMENTE
IF Len(Request.Form("email")) > 0 then
IF Instr(Request.Form("email"), ".") = 0 or Instr(Request.Form("email"), "@") = 0
Then
' EMAIL NON COMPILATA CORRETTAMENTE
%>
<hr>
E-mail non
corretta!
<hr>
<%
Else
' EMAIL COMPILATA CORRETTAMENTE E SI PROCEDE...
email = Replace(Request.Form("email"), "'", "''")
' PERCORSO DEL DATABASE
url_DB = "driver={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath("/mdb-database/
database.mdb")
Set Conn = Server.CreateObject("ADODB.Connection")
conn.Open url_DB
' APRE LA CONNESSIONE AL DATABASE
Set RecSet = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM Email_Newsletter where email = '"& email &"'"
RecSet.Open SQL, Conn, adOpenStatic, adLockOptimistic
' LEGGE L'OPERAZIONE DA SVOLGERE (AGGIUNGERE O ELIMINARE)
operazione = Request.Form("operazione")
' SE ESISTE:
IF RecSet.Eof then
' IN BASE ALL'OPERAZIONE:
' AGGIUNGE L'EMAIL AL DB
IF operazione = "iscrivimi" then
RecSet.Addnew
RecSet("email") = email
RecSet.Update
%>
<hr>
Grazie per esserti
registrato!
<hr>
<%
ElseIF operazione = "cancellami" then
' EMAIL INESISTENTE! NON PUO' CANCELLARE NULLA, QUINDI:
%>
<hr>
E-mail non presente nel
nostro database!
<hr>
<%
end if
' SE ESISTE:
Else
' EMAIL GIA' REGISTRATA!
IF operazione = "iscrivimi" then
%>
<hr>
E-mail già
registrata!
<hr>
<%
End IF
' CANCELLA L'UTENTE
IF operazione = "cancellami" then
RecSet.Delete
RecSet.Update
%>
<hr>
E-mail cancellata
correttamente!
Grazie per essere stato con noi!
<hr> <%
End IF
End IF
RecSet.Close
Conn.Close
End IF
' EMAIL NON COMPILATA!
Else %> <hr>
E-mail non
corretta!
<hr> <%
End IF
%>
</body>
</html>

Io lo copio meccanicamnente, per questo non ci capisco un tubo!!
grazie ....

**Roby_72** · 24-09-2006, 10:31

Sono due linguaggi diversi.
Da qualche parte gli dici che il motore da usare è JScript.
Anche se in questa pagina usi VBScript.

Roby

Discussione: errore di pubblicazione pagina asp

Strumenti discussione

Ricerca discussione

Visualizza

errore di pubblicazione pagina asp

ecco il codice

Permessi di invio