Set rs = server.CreateObject("adodb.recordset")
rs.open "select isnull(FLBZ,'F') FLBZ from INV_LPXX where CPMC='" & tempKuan & "'",conn,1,1
If Err Then
Response.write "请检查用户表结构是否正确"
Response.End
End If
Response.Clear()
If Not rs.eof Then
Response.Write("{status:" &LCase(trim(rs("FLBZ"))="Y") &"}")
else
Response.Write("{status:false}")
End IF
Response.End()
rs.close
Set rs = Nothing
posted on 2011-09-27 21:51
sanmao 阅读(305)
评论(0) 编辑 收藏