记录集,换成数组/rs.getRows()/redim Preserve 保留原有数据

原创 2008年09月29日 13:38:00
 
  1. 'Excel连接驱动
  2. Epath="F:/web/test.xls"
  3. Estr="provider=Microsoft.Jet.OLEDB.4.0; Data Source="&Epath";Extended Properties=Excel 8.0"
  4. Set conn = Server.Createobject("ADODB.Connection")
  5. set rs    =server.CreateObject("adodb.recordset")
  6. set rsT    =server.CreateObject("adodb.recordset")
  7. conn.open   Estr
  8. dim aaa,aaay ,yuhui
  9. aaa=Cint("00"&request("v_amount") )
  10. rs.open "select * from [test$]",conn,1,1
  11. yuhui=rs.getRows(rs.recordcount)
  12. aaay=0
  13. for fori=0 to ubound(yuhui,2)-1
  14.   if aaa>=Cint(yuhui(1,fori)) and aaa <Cint(yuhui(1,fori+1)) then aaay=yuhui(2,fori) end if
  15. next
  16. if aaa>=Cint(yuhui(1,fori)) then aaay=yuhui(2,fori) end if 
  17. rs.close 
  18. sql="update 会员表 set 余额=余额+"&aaa"+"&aaay" where 用户名='"&remark1"'"
  19. 'response.Write sql
  20. 'conn.execute("update 会员表 set 余额=余额+"&aaa&"+"&aaay&" where 用户名='"&remark1&"'") 
  21. conn.close 
  22. set conn=nothing

 

 

记录集,换成数组,便于表状数据的使用。因为开始时忘了第一列是列,第二列是行,所以收录下给别人的代码~~以备后用。

 

redim Preserve 保留原有数据,重定义数组(一维数组)

版权声明:本文为博主原创文章,未经博主允许不得转载。

java 将数据库中的数据取出放入数组中

java 将数据库中的数据取出放入数组中 [java] view plaincopy 假设mysql中test数据库中有个表式score,有数据...
  • u010507199
  • u010507199
  • 2015年06月03日 01:07
  • 1786

Arduino - 使用EEPROM保存数据

EEPROM (Electrically Erasable Programmable Read-Only Memory),电可擦可编程只读存储器–一种掉电后数据不丢失的存储芯片。 arduino已经...
  • sdlgq
  • sdlgq
  • 2016年07月17日 13:34
  • 4995

VB中preserve的用法

注:本文转载自:http://zhidao.baidu.com/question/161401549.htmlReDim 语句用来定义或重定义原来已经用带空圆括号(没有维数下标)的 Private、P...
  • sixigongzi
  • sixigongzi
  • 2010年10月10日 10:49
  • 6386

[ASP]使用RecordSet对象的GetRows方法(返回而为数组)和RS.MaxRecords(指定记录集的最大容量)

写ASP程序时,一般情况总是使用的VBScript,不过也不只是这一种选择,也可以用JScript。但在用JScript作为ASP的语言时,比用VBScript有一些小小的不方便,比如RecordSe...
  • mh_rock
  • mh_rock
  • 2007年11月16日 16:45
  • 1532

Delphi中将文件流的数据写入动态数组

varmyfile:TfileStream;mybuf:array of Pchar;beginmyfile:=TfileStream.Create(d:/a.txt,fmOpenReadWrite)...
  • itsoft2006
  • itsoft2006
  • 2007年03月15日 22:53
  • 2135

mybatis 处理数组类型及使用Json格式保存数据 JsonTypeHandler and ArrayTypeHandler

mybatis 处理数组类型及使用Json格式保存数据 JsonTypeHandler and ArrayTypeHandler mybatis 比 ibatis 改进了很多,特别是支持了注解,支持...
  • xiaoyu411502
  • xiaoyu411502
  • 2015年05月10日 17:33
  • 5319

redim语句

ReDim 语句 描述 用于过程级声明动态数组变量并分配或重新分配存储空间。 语法 ReDim [Preserve] varname(subscripts) [, varname(su...
  • qq_32175491
  • qq_32175491
  • 2016年09月23日 20:05
  • 1101

vba 数组(动态数组)

主要内容: 本文章主要介绍VBA中,数组的使用,特别介绍动态数组的使用,并有简单事例,帮助理解。 数组是我们经常用到的存储数据的一种媒介,他到底是什么呢? 一、定长数组 数组是具有相同数...
  • xiaoqingwuku
  • xiaoqingwuku
  • 2013年10月15日 10:38
  • 2614

如何将PreparedStatement查询得到的结果集存储起来--方法一:采用对象数组

如何将PreparedStatement查询得到的结果集存储起来--方法一:采用对象数组
  • u013871100
  • u013871100
  • 2015年10月04日 13:28
  • 2977

H5本地存储详细使用教程(localStorage + JSON数据存储应用框架)

H5本地存储有两个API,一个是Web Storage,还有一个是Web SQL。不管是哪一个,都是基于JavaScript语言来使用,接下来我就教你怎么使用H5本地存储,本文篇幅较大,JS代码较多,...
  • a727911438
  • a727911438
  • 2017年01月09日 17:26
  • 21952
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:记录集,换成数组/rs.getRows()/redim Preserve 保留原有数据
举报原因:
原因补充:

(最多只允许输入30个字)