This may be an extremely elementary post, but i am having some issues with an if....then statement and was hoping someone else could see the error. Mayby i have just been sitting here to long and it is an obvious problem, but i have a webpage in which you may enter one or two search criteria in order to display the coresponding records. This is the problem code"
Dim strNme
Dim strTyp
Dim adoRS
Set Strname = Request.Querystring ("vtr"
Set strTyp = Request.Querystring ("lmn"
Set adoRS = server.createobject ("Adodb.Recordset"
adoRS.open sqltext, DSN="S215"
If strName > 0 Then Response.redirect_
("busDis.asp?vtr=<%=adoRS("bname"
%>"
ElseIf strname = "" Then Sqltext="Select * From ABC_
Where btype = ('" & lmn & "')" ;
End If
I have Removed some of the code for brevity in this post.
I would appreciate any help if you see the problem.
Thanks
Micah A. Norman
Dim strNme
Dim strTyp
Dim adoRS
Set Strname = Request.Querystring ("vtr"
Set strTyp = Request.Querystring ("lmn"
Set adoRS = server.createobject ("Adodb.Recordset"
adoRS.open sqltext, DSN="S215"
If strName > 0 Then Response.redirect_
("busDis.asp?vtr=<%=adoRS("bname"
ElseIf strname = "" Then Sqltext="Select * From ABC_
Where btype = ('" & lmn & "')" ;
End If
I have Removed some of the code for brevity in this post.
I would appreciate any help if you see the problem.
Thanks
Micah A. Norman