Ciao a Tutti,
ho il seguente problema:
il programma funziona bene ma non riesco a fare il controllo sull' alertdi javascript.
Se t1 e' OK allora viene fuori il primo alert "Record Modificato..."
Se t1 non e' OK non viene fuori niente, non parte il secondo alert "Parametri errati..."
Perche' ??????
<%@ Language=VBScript %>
<%
Option Explicit
Dim my_count2, objConn, objRS, t1
my_count2 = Request.Form("numero_mod")
'
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.ConnectionString = "DSN=proj05.dsn"
objConn.Open
'
Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.Open "t_proj", objConn, , 3, 2
'
Do While Not objRS.EOF
If (StrComp(objRS("Numero"), my_count2, 1) = 0) Then
objRS("Commessa") = Request.Form("commessa_mod")
objRS.Update
t1 = "Ok"
End If
objRS.MoveNext
Loop
objRS.Close
Set objRS = Nothing
objConn.Close
Set objConn = Nothing
%>
<HTML>
<BODY>
<SCRIPT language="JavaScript">
if (<%=t1%> = "Ok") {alert("Record modificato <%=t1%> !!");}
else {alert("Parametri errati; Riprova !!");}
</SCRIPT>
</BODY>
</HTML>
Rispondi quotando
