update rows with vbscript in asp
can any body help me in updation of rows in asp with vbscript
<select name="vopenflg <%=R("top_id")%>">
<%If IsEmpty(vopenflg) or vopenflg = 0 Then%>
<option value=" " selected>Normal</option>
<option value="0">Abuse</option>
<option value="1">clsoe</option>
<%Elseif vopenflg =1 Then%>
<option value=" " >Normal</option>
<option value="0" selected>Abuse</option>
<option value="1">clsoe</option>
<%Elseif vopenflg =2 Then%>
<option value=" " >Normal</option>
<option value="0" >Abuse</option>
<option value="1" selected>clsoe</option>
<%End If%>
</select>
<% R.close
If Not IsEmpty(Request.Form("submit")) then
vopenflg = Request.Form("vopenflg")
vopenflg=trim(vopenflg)
conn.close
conn.Mode = adModeReadWrite
conn.open
R.open "select top_id,open_flg from topmaster ",conn, adOpenStatic, adLockOptimistic, adCmdText
if request.QueryString("vopenflg"& R("top_id"))<>"" then
R("open_flg")=vopenflg
R.update
R.Close
conn.close
end if
end if
end if
%>
sanjeev
__________________
sanjeev
|
