52,780
社区成员
发帖
与我相关
我的任务
分享<!--#include file="../conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
Response.ContentType="text/xml"
k=trim(request("keyword"))
a=cint(request("a"))
sql="select chanpinname,guige from cangku where chanpinname like '%"&k&"%' "
rs.open sql,conn,1,3
str="<?xml version=""1.0"" encoding=""gb2312""?>"
str=str&"<data>"
If rs.EOF or rs.BOF Then
str=str&"<result>false</result>"
Else
str=str&"<result>true</result>"
Do While Not rs.EOF
str=str&"<name>"
str=str&"<![CDATA["&rs("chanpinname")&"]]>"
str=str&"</name>"
rs.MoveNext
Loop
End If
str=str&"</data>"
rs.close
response.write str
%>
Do While Not rs.EOF
str=str&"<name>"
str=str&"<![CDATA["&rs("chanpinname")&" "&rs("guige")&"]]>"'===========
str=str&"</name>"
rs.MoveNext
Loop