28,391
社区成员
发帖
与我相关
我的任务
分享
zxCmd.commandtype=4
zxCmd.CommandText="[Pro_RentHouseInquiry]"
'zxCmd.Prepared = true
zxCmd.Parameters.Append zxCmd.CreateParameter("@strkeyword",200,1,50,strkeyword)
zxCmd.Parameters.Append zxCmd.CreateParameter("@strarea",200,1,16,strarea)
zxCmd.Parameters.Append zxCmd.CreateParameter("@strzxChild",200,1,32,strzxChild)
zxCmd.Parameters.Append zxCmd.CreateParameter("@ifangxing",3,1,8,ifangxing)
zxCmd.Parameters.Append zxCmd.CreateParameter("@strmianji",200,1,32,strmianji)
zxCmd.Parameters.Append zxCmd.CreateParameter("@strprice",200,1,32,strprice)
zxCmd.Parameters.Append zxCmd.CreateParameter("@strallprice",200,1,32,strallprice)
zxCmd.Parameters.Append zxCmd.CreateParameter("@strzhuangxiu",200,1,16,strzhuangxiu)
zxCmd.Parameters.Append zxCmd.CreateParameter("@ishijian",3,1,4,ishijian)
zxCmd.Parameters.Append zxCmd.CreateParameter("@ipage",3,1,4,ipage)
zxCmd.Parameters.Append zxCmd.CreateParameter("@strorder",200,1,16,strorder)
zxCmd.Parameters.Append zxCmd.CreateParameter("@ithetype",3,1,4,ithetype)
zxCmd.Parameters.Append zxCmd.CreateParameter("@thisPageSize",3,1,4,thisPageSize)
zxCmd.Parameters.Append zxCmd.CreateParameter("@myallLine",3,3,4,allLine)
'上面调用存储过程查询数据
'下面创建记录集
set Rs = server.CreateObject("ADODB.RECORDSET")
Rs.CursorLocation = 3
Rs.Open zxCmd, , 3, 3 '这句中的zxcmd是什么?为什么数据库链接也是空?