急问：

[cnwindow]

Microsoft VBScript 编译器错误 错误 '800a03f6'

缺少 'End'

/iisHelp/common/500-100.asp，行242

Microsoft OLE DB Provider for SQL Server 错误 '80040e14'

在关键字 'and' 附近有语法错误。

/web/ijob/administrator/new_company.asp，行109




代码：
<%
dim cmdTemp
Set cmdTemp = Server.CreateObject("ADODB.Command")
set rs = server.CreateObject ("adodb.recordset")
if request("username1")="" then
sql="select id,username,comid,companyName,dlcs,dlsj,Province,contactPerson,vip from [ijob_company] where province like '%"&diqu&"%'"
else
sql="select id,username,comid,companyName,dlcs,dlsj,Province,contactPerson,vip from [ijob_company] where and province like '%"&diqu&"%' and UserName like '%"&request("UserName1")&"%'or companyName like '%"&request("UserName1")&"%'"
end if
cmdTemp.CommandText = sql
cmdTemp.CommandType = 1
Set cmdTemp.ActiveConnection = conn
rs.Open cmdTemp,,1,1
set cmdTemp=nothing
If rs.eof or rs.bof Then
response.write "<br>没有找到企业！"
response.end
end if
if request("usersize")="" then
rs.Pagesize=50
else
rs.Pagesize=trim(request("usersize"))
end if
Pagesize=rs.Pagesize
Allrecord=rs.Recordcount
Allpage=rs.Pagecount
if ThisPage<1 then
ThisPage=1
end if
rs.move (ThisPage-1)*Pagesize
%>



第109行：
rs.Open cmdTemp,,1,1

[GageCSDN]

sql="select id,username,comid,companyName,dlcs,dlsj,Province,contactPerson,vip from [ijob_company] where and province like '%"&diqu&"%' and UserName like '%"&request("UserName1")&"%'or companyName like '%"&request("UserName1")&"%'"

==>

sql="select id,username,comid,companyName,dlcs,dlsj,Province,contactPerson,vip from [ijob_company] where province like '%"&diqu&"%' and UserName like '%"&request("UserName1")&"%'or companyName like '%"&request("UserName1")&"%'"

OR

sql="select id,username,comid,companyName,dlcs,dlsj,Province,contactPerson,vip from [ijob_company] where 1=1 and province like '%"&diqu&"%' and UserName like '%"&request("UserName1")&"%'or companyName like '%"&request("UserName1")&"%'"

[cnwindow]

谢