余志国网站设计工作室是专业从事义乌网站建设、义乌外贸网站建设、义乌网站制作、义乌网站设计的专业义乌网站建设工作室,是义乌外贸网站建设专家!

ASP按字段中首字母输出所有数据代码

分类:程序开发 Tags: asp 评论:0 浏览:3584 最近更新时间:2008/5/22 23:54:23

dim x,sql,rs

'定义变量
for x = 65 to 90

'开始循环A-Z,因为不能自动循环字母,所以采用ASII码
Response.Write "<br>"&chr(x) & "<br>"

'然后逐个输出字母
SQL = "SELECT * FROM I_Service where left(title,1)='"&chr(x)&"' and type=1 ORDER BY title,id DESC"

'数据库中Title是标题或者要输出的字段,Type是分类,现在是输出大类为一的,并用Left取出Title值中左起第一个字母进行检查
Set Rs = Server.CreateObject("ADODB.Recordset")
Rs.Open SQL,conn,1,1
If Not (Rs.EOF And Rs.BOF) Then
Do While Not Rs.EOF
Response.Write Rs("title") &"&nbsp;&nbsp;&nbsp;"
Rs.movenext
Loop
End If
Rs.Close:Set Rs = Nothing
next

本文地址:https://www.yuzhiguo.com/343/
  • 相关文章
  • 推荐文章
  • 最新文章
发表评论





您的IP:3.231.212.98,来自:

留言

 


免费咨询
建站咨询热线
15967985565

扫一扫微信咨询
QQ: 358758308 Skype: yuzhiguo Facebook: yuzhiguo Email