如何利用SQL查询js 返回整数庞大的整数序列表

来源：蜘蛛抓取(WebSpider) 时间：2017-04-22 18:14 标签： js 返回整数
查看: 3689|回复: 7
如何将SQL语句的查询结果写入数组？
阅读权限20
在线时间 小时
如何将SQL语句的查询结果写入数组？
& & Dim Cn As Object, strSql$
& & Dim arr(1000, 10) As Long
& & Set Cn = CreateObject(&Adodb.Connection&)
& & Cn.Open &Driver=SQLSERVER=XXXXXXXXXXX;UID=XXXXXXX;pwd=XXXX;DATABASE=Merck_Millipore&
& & strSql = &Select Id,seller,Price,InfoCompanyName,InfoName,InfoMobile,Infoaddress,[DateTime],InnerInfo From [Merck_Millipore].[dbo].[liale_order]&
如上代码,数组已经有了,Sql语句也有了,如何将查询结果写入数组？
阅读权限100
在线时间 小时
请把附件上传吧？
阅读权限70
在线时间 小时
可以试试这个思路，直接放到表格，然后直接获取数组
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Dim Rst,Cnn,StrSql$,arr
Set Rst = CreateObject(&adodb.recordset&)
Set cnn = CreateObject(&adodb.connection&)
Cn.Open &Driver=SQLSERVER=XXXXXXXXXXX;UID=XXXXXXX;pwd=XXXX;DATABASE=Merck_Millipore&
strSql = &Select Id,seller,Price,InfoCompanyName,InfoName,InfoMobile,Infoaddress,[DateTime],InnerInfo From [Merck_Millipore].[dbo].[liale_order]&
Rst.Open sql, cnn, 1, 3
sheets.add after:=sheets(sheets.count)
[a1].CopyFromRecordset rst
arr=activesheet.usedrange
activesheet.delete
Application.DisplayAlerts = True
Application.ScreenUpdating = True
复制代码
阅读权限20
在线时间 小时
gufengaoyue 发表于
可以试试这个思路，直接放到表格，然后直接获取数组
我想让他放进数组查看就是因为直接导入Excel表中，发现有一列没导出，所以我想看看数组里会不会显示出来那一列的数据~郁闷死了，就是最后一个InnerInfo字段，我怀疑是不是最后一个字段里的参数太多长了的原因额~07881$#$bjj$#$ 14:45:25.827$#$1$#$Z-692[#]07881$#$bjj$#$ 14:45:32.343$#$2$#$XSD[#]07881$#$bjj$#$ 14:45:43.578$#$3$#$125克小度[#]07881$#$bjj$#$ 14:45:50.484$#$4$#$5000[#]07881$#$bjj$#$ 14:46:13.281$#$5$#$双头10克机器座椅[#]07881$#$bjj$#$ 14:46:18.453$#$6$#$5000[#]07881$#$bjj$#$ 14:46:24.047$#$7$#$高压[#]07881$#$bjj$#$ 14:46:28.797$#$8$#$5000[#]07881$#$bjj$#$ 14:47:08.423$#$13$#$硫酸纸[#]07881$#$bjj$#$ 14:47:18.626$#$14$#$蓝色[#]07881$#$bjj$#$ 14:47:26.939$#$15$#$直接发货[#]
以上数据是InnerInfo里的~每个单元格的数据都有那么长~
阅读权限95
在线时间 小时
GetRows 方法
可返回一个二维数组，第一个下标标识字段，第二个则标识记录号
数组 = Cn.Execute(strSql).GetRows
这是我想要的，谢谢！
阅读权限20
在线时间 小时
GetRows 方法
可返回一个二维数组，第一个下标标识字段，第二个则标识记录号
数组 = Cn.Execute(strSql). ...
请问如果将SQL语句查询的结果，加上表头后，保存在数组里面？
阅读权限95
在线时间 小时
请问如果将SQL语句查询的结果，加上表头后，保存在数组里面？
使用getrows方法得到数组，注意，是（列，行）形式的数组，并且都是0开始的。
阅读权限95
在线时间 小时
Sub a()
& & Dim Cn As Object, strSql$
& & Dim oRS As Object, vRs As Variant
& & Dim vData As Variant
& & Dim nRow As Integer, nCol As Integer
& &
& & Set Cn = CreateObject(&Adodb.Connection&)
& & Cn.Open &Driver=SQLSERVER=XXXXXXXXXXX;UID=XXXXXXX;pwd=XXXX;DATABASE=Merck_Millipore&
& & strSql = &Select Id,seller,Price,InfoCompanyName,InfoName,InfoMobile,Infoaddress,[DateTime],InnerInfo From [Merck_Millipore].[dbo].[liale_order]&
& & Set oRS = CreateObject(&Adodb.RecordSet&)
& & Set oRS = Cn.Execute(strSql)
& & vRs = oRS.GetRows
& & ReDim vData(1 To UBound(vRs, 2) + 2, 1 To UBound(vRs) + 1)
& & oRS.MoveFirst
& & For nRow = 0 To UBound(vRs, 2)
& && &&&For nCol = 0 To UBound(vRs)
& && && && &If nRow = 0 Then vData(1, nCol + 1) = oRS.Fields(nCol).Name '标题
& && && && &vData(nRow + 2, nCol + 1) = vRs(nCol, nRow) '数据
& && &&&Next
& & Next
& & Set oRS = Nothing
& & Cn.Close
& & Set Cn = Nothing
End Sub复制代码
good,谢谢耐心讲解O(∩_∩)O~
最新热点 /1
ExcelHome每周都有线上直播公开课，
国内一流讲师真身分享，高手贴身答疑，
赶不上直播还能看录像，
关键居然是免费的！
厚木哥们都已经这么努力了，
你还好意思说学不好Office。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师君，已阅读到文档的结尾了呢~~
扫扫二维码，随身浏览文档
手机或平板扫扫即可继续访问
数据库查询语言SQL的语法分析及实现
举报该文档为侵权文档。
举报该文档含有违规或不良信息。
反馈该文档无法正常浏览。
举报该文档为重复文档。
推荐理由：
将文档分享至：
分享完整地址
文档地址：
粘贴到BBS或博客
flash地址：
支持嵌入FLASH地址的网站使用
html代码：
&embed src='/DocinViewer-4.swf' width='100%' height='600' type=application/x-shockwave-flash ALLOWFULLSCREEN='true' ALLOWSCRIPTACCESS='always'&&/embed&
450px*300px480px*400px650px*490px
支持嵌入HTML代码的网站使用
您的内容已经提交成功
您所提交的内容需要审核后才能发布，请您等待！
3秒自动关闭窗口推荐这篇日记的豆列
······11:09 提问
sql 同一个表中如何把两条数据合并成一条显示，并显示两条数据的全部内容
数据库是 sqlserver2008的环境。
是一个列变行的问题
，请大师帮忙啊。
比如 table表中
address shijian
最后显示的内容为：
合并条件为： bianhao和address相同的数据。
按赞数排序
select replace(WMSYS.WM_CONCAT(t.name|| ' ' ||t.pid||' '),',','') as value_s from test.tbl_
我觉得你应该理清思路，到底要做什么。而且要交代清楚环境，一个表里只有两条记录吗？还是有很多条，每两条合并一下？
select a.name,b.name2,a.bianhao,a.address,a.shijian from table a,table b
其他相似问题

我要回帖

更多关于 js 返回整数 的文章

 

随机推荐