Question

读取数据库里的一个值进行判断

<%
sql="select * from weo where bianhao='"&request("bianhao")&"'"

if dingdanzt<>"" then
%>
<script language="javascript">
alert("该订单已无法修改！")
window.location.href="../index.asp"
</script>
<%
response.end
end if
%>

Answer 1

<%
Dim Conn, Rs, sql, dingdanzt
dingdanzt = ""
sql="select * from weo where bianhao='" & request("bianhao") & "'"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "改成你的数据库连接字符串"
Set Rs = Server.CreateObject("ADODB.RecordSet")
Rs.Open Sql, Conn, 1,1
If Not(Rs.Eof) Then
dingdanzt = Rs("dingdanzt") '假设dingdanzt是你表中的字段名
End If
Rs.Close
Set Rs = Nothing
Conn.Close
Set Conn = Nothing
If dingdanzt<>"" Then%>
<script language="javascript">
alert("该订单已无法修改！")
window.location.href="../index.asp"
</script><%
response.end
End If
%>

Answer 2

,读取时候需要判断这一列的最大值和最小值，用变量保存起来。然后和其它1.你将你的stid转储到一个1维数组里，下一步就是操作这个1维数组啦 2.