sql调用方法精简
<% If IsArray(proList) Then %> <UL class= "product-ul" > <% For x=0 to Ubound(proList,2)%> <LI> <DIV><A href= "<%=HTMLURL%>product_view_<%=proList(0,x)%>.html" ><IMG src= "<%=selectPic(proList(2,x),proList(3,x))%>" ></A><P><br><A href= "<%=HTMLURL%>product_view_<%=proList(0,x)%>.html" ><%=CutStr(proList(1,x),6, "..." )%></A></P></DIV> </LI> <% Next %> <DIV class= "clear" ></DIV> </UL> <% End If %> ----------------------------------------------------------- Dim proList set rs = Conn.Execute( "sql" ) If not rs.Eof Then proList = rs.GetRows() End If rs.Close() Set rs = Nothing |
IF 真 Then
end if
IsArray 数组为真:不是数组为假
Ubound数组一维 二维 三维
一维 横竖1
二维 横竖多
三维。横竖双层
大家应该都知道 Recordset 有个 GetRows 属性,但是真正使用的不多,我也是最近才用的!汗……
其实这个属性很简单,就是把数据集输出到一个数组中。但是实用性可不小,在这里我举一个例子说明一下GetRows的使用方法,大家举一反三能想到更多的用法!
比如一个分类的表 T_Cate,结构和数据如下:
ID | Title | Intro
-----------------------------------------
1 | 新闻 | 这里是新闻
2 | 教程 | 这里是教程
3 | 下载 | 这里是下载
好了,表建立好了,数据也有了,下面我们就要用到GetRows咯!
Dim Rs_Cate
Dim Arr_Cate
Set Rs_Cate=Conn.ExeCute(Sql)
Arr_Cate=Rs_Cate.GetRows
Rs_cate.close()
Set Rs_Cate=Nothing
好了表数据已经导出到数组了!下面我们将遍历这个数组
Dim Arr_CateNumS,Arr_CateNumI
Arr_CateNumS=Ubound(Arr_Cate,2) '得到数组中数据的下标
For Arr_CateNumI=0 To Arr_CateNumS
Response.Write("ID:"&Arr_Cate(0,Arr_CateNumI)&" | 标题:"&Arr_Cate(1,Arr_CateNumI)&" | 介绍:"&Arr_Cate(2,Arr_CateNumI)&"<br>")
Next
呵呵,好了,输出的数据为:
ID:1 | 标题:新闻 | 介绍:这里是新闻
ID:2 | 标题:教程 | 介绍:这里是教程
ID:3 | 标题:下载 | 介绍:这里是下载
好了,具体就写这么多吧!文采不行,如果大家有什么不明白的,多用用就可以了,呵呵
【推荐】编程新体验,更懂你的AI,立即体验豆包MarsCode编程助手
【推荐】凌霞软件回馈社区,博客园 & 1Panel & Halo 联合会员上线
【推荐】抖音旗下AI助手豆包,你的智能百科全书,全免费不限次数
【推荐】轻量又高性能的 SSH 工具 IShell:AI 加持,快人一步
· .NET Core GC压缩(compact_phase)底层原理浅谈
· 现代计算机视觉入门之:什么是图片特征编码
· .NET 9 new features-C#13新的锁类型和语义
· Linux系统下SQL Server数据库镜像配置全流程详解
· 现代计算机视觉入门之:什么是视频
· Sdcb Chats 技术博客:数据库 ID 选型的曲折之路 - 从 Guid 到自增 ID,再到
· .NET Core GC压缩(compact_phase)底层原理浅谈
· Winform-耗时操作导致界面渲染滞后
· Phi小模型开发教程:C#使用本地模型Phi视觉模型分析图像,实现图片分类、搜索等功能
· 语音处理 开源项目 EchoSharp