tags:

views:

128

answers:

2

Hi, I'm new in ASP development.

This is my source code :

ident = request.Form("ident")
pass=request.Form("passe")
response.write(ident)
response.write(pass)

if pass= "m" and ident="m" Then 
    Session("connect")="membre"
    response.redirect("../")
else if pass= "g" and ident="g" Then 
        Session("connect")="gest"
        response.redirect("../")
else if pass= "a" and ident="a" Then
        Session("connect")="admin"
        response.redirect("../")
else    
    response.redirect("ident.asp")
End If

But, with this code, I get this :

"Erreur de compilation Microsoft VBScript error '800a0401'

Fin d'instruction attendue

/iisHelp/common/500-100.asp, line 11

Dim objASPError, blnErrorWritten, strServername, strServerIP, strRemoteIP Dim strMethod, lngPos, datNow, strQueryString, strURL --------------------------------------------------------------------------^

Erreur de compilation Microsoft VBScript error '800a03f6'

'End' attendu

/groupe2/stage23/TP3/verif_id.asp, line 18 "

A: 

It looks like earlier in your file -- line 11 -- you've accidentally deleted a newline that's making DIM statements collide. This is throwing the whole file out of synch in the parser.

Split that one line DIM statement into two lines (or kill the second DIM -- your choice) and see if that fixes your problem.

JUST MY correct OPINION
+2  A: 

Else If in VB must be written in one word, without whitespace separator – ElseIf.

Konrad Rudolph