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 阅读(300) 评论(0)  编辑  收藏

只有注册用户登录后才能发表评论。


网站导航:
 

常用链接

留言簿(5)

随笔分类

随笔档案

搜索

  •  

最新评论

阅读排行榜

评论排行榜