ASP按字段中首字母输出所有数据代码
分类：程序开发 Tags： asp 评论：0 浏览：3670 最近更新时间：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") &" "
Rs.movenext
Loop
End If
Rs.Close:Set Rs = Nothing
next
'定义变量
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") &" "
Rs.movenext
Loop
End If
Rs.Close:Set Rs = Nothing
next
-
• asp中判断一个字符是不是汉字
• 一个空间/虚拟主机放置多个网站的转向代码（多个域名绑定一个空间）
• 解决IE6下float浮动margin出现双倍距离问题
• ASP检测网站是否能打开代码
• ASP判断身份证号码输入是否正确函数代码
• ASP保存远程图片文件到本地代码
• ASP按字段中首字母输出所有数据代码
• 支付宝即时到账POST按钮代码
• asp获取内容中第一张图片和全部图片代码
• win2003空间支持access2007、2010数据库.accdb的方法
-
• 成功企业网站的三个考核指标,你都达到了吗?
• Asp超精准判断客户端浏览器类型代码
• 网页设计中HTML常范的几个错误，平常设计中需要注意了！
• 解决Foxmail在Win7中出现“Access violation 007CC4B1”的错误
• JavaScript特效:实现上下文字、图片滚动循环显示,中间有停顿
• 解决Google Gmail邮箱在国内打不开的问题
• 用Photoshop做脸部美容(美白\除油\润肤\)(图)
• Windows XP下TUS Client for Windows客户端的安装和使用
• 解决Google Gmail免费企业邮箱用outlook或foxmail登录时出现密码错误问题
• 关于病毒命名规则的说明
