<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>记录的显示</title>
</head>
<!--#include file="conn.asp"-->
<body>
<%  
''''''''''''查找一个字符串中一个字符出现的次数'''''''''''''''
'  function   getCount(express,defaultValue)   
'  count=0   
'  for   i=1   to   len(express)   
'  if   mid(express,i,1)=defaultValue   then   
'  count = count+1   
'  end   if   
'  next   
'  getCount=count   
'  end   function   
'  response.write   getCount("1,2,3,1,2,1,1,1","2")  
''''''''''''查找一个字符串中一个字符出现的次数''''''''''''''' 
%>   
  
<% 
''''''''''''''''将字符串排序'''''''''''''''''''''''''''''''
Ə,13,8,21,25
ཉ,8,21,25
'aaa="9,13,8,21,25" 
's = split(aaa,",") 
'for i=0 to ubound(s) 
'min=i 
'For j=i+1 To ubound(s) 
'If CInt(s(i))>CInt(s(j)) Then 
'min=j 
'End if 
'tem=s(i) 
's(i)=s(min) 
's(min)=tem 
'Next 
'pid=pid+s(i)+"," 
'Next 
'response.Write(pid)
''''''''''''''''将字符串排序'''''''''''''''''''''''''''''''
%>
<%
''''''''''''''显示一条记录,并将其下一条记录也显示出来,同一行显示''''''''''''''
set rs=server.createobject("adodb.recordset")
rs.open "select *from chapter",conn,1,2
rs.movefirst
do while not rs.eof
t= rs("id")
response.write t &"  "
rs.movenext
if not rs.eof then
t1= rs("id")
response.write t1
response.write "<br/>"
end if
loop
''''''''''''''显示一条记录,并将其下一条记录也显示出来,同一行显示''''''''''''''
''''''''''''rs.find''''''''''''''
'response.write "<br/>"
'set rs=server.createobject("adodb.recordset")
'rs.open "select *from chapter",conn,1,2
'rs.find "chaptername='value'"
'response.write rs("id")
''''''''''''rs.find''''''''''''''
%>
</body>
</html>




