zl程序教程

您现在的位置是:首页 >  移动开发

当前栏目

asp查询xml的代码不刷新页面查询的方法

ASP方法XML代码 查询 页面 刷新
2023-06-13 09:14:08 时间
以下为引用的内容:
<html>
<head>
<title>不刷新页面查询的方法</title>
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
</head>
<scriptlanguage="javascript">
<!--初始化,将数据岛中数据装入列表框中-->
functionloadinsel()
{
varemployeeid,employeelastname;          //分别存放雇员ID和雇员名字
root=document.all.xmlemployees.childNodes.item(0);//返回第一个元素--employee
for(i=0;i<root.childNodes.length;i++){
 getnode=root.childNodes(i);           //得到empolyee的一个子节点
employeeid=root.childNodes(i).getAttribute("emid");//得到雇员ID
for(j=0;j<getnode.childNodes.length;j++){
employeeinf=getnode.childNodes(j).nodeName;
if(employeeinf=="lastname"){
employeelastname=getnode.childNodes(j).text;//得到雇员名字
}
}
//将得到的employeeid和employeelastname写进select中
if(employeeid!=""&&employeelastname!=""){
option1=document.createElement("option");
option1.text=employeelastname;
option1.value=employeeid;
employeelist.add(option1);
}
}
}
<!--初始化,从数据岛中检索数据,装入列表框中-->
functionfindemployee(){
varemployeelastname,employeeid;               //分别存放雇员名字和雇员ID
employeelastname="";
employeeid="";
findtext=window.findcontent.value;              //得到检索条件
//清除列表框
employeecount=employeelist.length
for(i=employeecount-1;i>=0;i--){
employeelist.remove(i);
}
root=window.xmlemployees.childNodes(0);
for(i=0;i<root.childNodes.length;i++){
getitem=root.childNodes(i);                //得到empolyee的一个子节点
employeeid=root.childNodes(i).getAttribute("emid");    //得到雇员ID
for(j=0;j<getitem.childNodes.length;j++){
if(getitem.childNodes(j).nodeName=="lastname"){
employee_temp=getitem.childNodes(j).text;
if(employee_temp.indexOf(findtext)!=-1){      //查找匹配项
employeelastname=employee_temp;         //找到名字匹配的雇员
}
}
}
//将符合条件的雇员信息写进select中
if(employeeid!=""&&employeelastname!=""){
option1=document.createElement("option");
option1.value=employeeid;
option1.text=employeelastname;
window.employeelist.add(option1);
employeeid="";
employeelastname="";
}
}
}
</script>
<bodybgcolor="#FFFFFF"text="#000000"onload="javascript:loadinsel()">
<tablewidth="80%"border="1">
<tr>
<td>请输入查询条件:
<inputtype="text"name="findcontent">
<inputtype="button"name="Submit"value="查找"onclick="javascript:findemployee()">
</td>
</tr>
<tr>
<td>查询结果:
<selectname="employeelist">
</select>
</td>
</tr>
</table>
<?xmlversion="1.0"encoding="gb2312"?>
<%
servername="wyb""服务器名
user="sa""用户名
pw="""用户密码
databasename="northwind""数据库名
setconn=server.CreateObject("adodb.connection")
conn.Open"DRIVER=SQLServer;SERVER="&servername&";UID="&user&";pwd="&pw&";DATABASE="&databasename
setrs=server.CreateObject("adodb.recordset")
sql="Selectemployeeid,lastnamefromemployeesorderbyemployeeid"
rs.Opensql,conn%>
<!--将数据库中信息放入数据岛中-->
<xmlid="xmlemployees">
<employee>
<%dowhilenotrs.eof%>
<employeeitememid="<%=rs("employeeid")%>">
  <lastname><%=rs("lastname")%></lastname>
</employeeitem>
<%rs.movenext%>
<%loop%>
</employee></xml>
<%rs.close
setrs=nothing
%>
</body>
</html>
用ASP的instr()函数来检测字符串中是否含有指定字符串
<%
Dimwstr1,wstr2
wstr1="helloworld!"
wstr2="o"
ifinstr(wstr1,wstr2)>0then
response.write(""&wstr1&"中存在"&wstr2&"")
else
response.write(""&wstr1&"中不包含有"&wstr2&"")
endif
%>
--------------------
InStr函数
--------------------
InStr([start,]string1,string2[,compare])
【参数】
InStr函数的语法具有下面的参数:
部分
说明
start
可选参数。为数值表达式,设置每次搜索的起点。如果省略,将从第一个字符的位置开始。如果start包含Null,将发生错误。如果指定了compare参数,则一定要有start参数。
string1
必要参数。接受搜索的字符串表达式。
string2
必要参数。被搜索的字符串表达式。
Compare
可选参数。指定字符串比较。如果compare是Null,将发生错误。如果省略compare,OptionCompare的设置将决定比较的类型。
?compare参数设置为:
常数

【描述】
vbUseCompareOption
-1
使用OptionCompare语句设置执行一个比较。
vbBinaryCompare
0
执行一个二进制比较。
vbTextCompare
1
执行一个按照原文的比较。
vbDatabaseCompare
2
仅适用于MicrosoftAccess,执行一个基于数据库中信息的比较。
【返回值】
返回0、1、2、-1或Null等。
【异常/错误】

描述InStr([start,]string1,string2[,compare])
返回指定一字符串在另一字符串中最先出现的位置。在字符串string1中,从start开始找string2,省略start时从string1头开始找。找不到时,函数值为0。
如果
InStr返回
string1为零长度
0
string1为Null
Null
string2为零长度
Start
string2为Null
Null
string2找不到
0
在string1中找到string2
找到的位置
start>string2
0
【示例】
本示例使用InStr函数来查找某字符串在另一个字符串中首次出现的位置。
DimSearchString,SearchChar,MyPos
SearchString="XXpXXpXXPXXP""被搜索的字符串。
SearchChar="P""要查找字符串"P"。
"从第四个字符开始,以文本比较的方式找起。返回值为6(小写p)。
"小写p和大写P在文本比较下是一样的。
MyPos=Instr(4,SearchString,SearchChar,1)
"从第一个字符开使,以二进制比较的方式找起。返回值为9(大写P)。
"小写p和大写P在二进制比较下是不一样的。
MyPos=Instr(1,SearchString,SearchChar,0)
"缺省的比对方式为二进制比较(最后一个参数可省略)。
MyPos=Instr(SearchString,SearchChar)"返回9。
MyPos=Instr(1,SearchString,"W")"返回0。