Question

Can someone tell me what I am doing wrong here please. The code is below, however I get and error when executing it.

==
If form_submit = submit_but Then
If Trim(Request.Form("username")) = "" Or Trim(Request.Form("password")) = "" Then
err_msg = "Please fill in both form fields"
Else
username = Request.Form("username")
password = Request.Form("password")
inParam(1) = username
inParam(2) = password
inParam(3) = new_password
inParam(4) = verification
Dim ISW As IntegrationServerClient.ISWrapper
ISW = New IntegrationServerClient.ISWrapper
Connected = True
If ExecuteTransaction(ISW, "login", inParam, OutParam, err_msg) Then
Response.Write("XXXmade it past execute transaction<br>")
Response.Write("XXX state: " & Session("VI").State & " (err_msg:" & err_msg & ")<br>")
Response.Write("XXX outparam: '" & OutParam(1) & "'<br>")
If Session("ISWConn").State = "main_menu" Then
Response.Redirect("main.asp")
Else
err_msg = "Error. Please check your log in information and try again."
End If
Else
err_msg = "Error - in ExecuteTransaction login: " & err_msg
End If
End If
End If
===

Thanks in advance