随笔分类 -  ASP点滴

关于Excel数组赋值出错的问题, 800A03EC 错误
摘要：因为遍寻结果无果,特放首页恳请大侠执教:碰到一个问题,如果vbscript操作Excel的时候,进行数组赋值,却发现报这个错误.仔细分析了一下,发现数组中有个一个字符串长度大于了912,则赋值的时候,出错. reDim arrayobj2(2, 26) ''print left range arrayobj2(0,0) = "238" arrayobj2(0,1) = "167" ar... 阅读全文

posted @ 2006-03-05 12:48 一望无际的南 阅读(2311) 评论(1) 推荐(0)

OA开发中下载模板文件的方法之xml篇
摘要：在OA办公系统中通常要把模板下载下来,然后对其进行数据操作. 而这个过程,肯定不希望客户来控制. 我们希望利用网页传回javascript或者vbscipt,来创建一个文档提供给客户. 无论如何,这个过程都需要利用到"静悄悄"下载一个模板文件,并取得这个模板文件的对象. HOW TO DO? 1 首先我们在服务器端利用xml对象创建一个包含文件二进制数据的xml. 2 我们通过网页形式传给客... 阅读全文

posted @ 2004-12-14 13:43 一望无际的南 阅读(1723) 评论(0) 推荐(0)

asp中试用存储过程
摘要：function GetUserID(OnlineSn)OnlineSn = Replace(OnlineSn,"'","''")Set sqlcmd = Server.CreateObject("ADODB.Command")'Recordset、Command对象都可以通过ActiveConnection属性来连接Connection对象sqlcmd.ActiveConnection = C... 阅读全文

posted @ 2004-10-18 18:20 一望无际的南 阅读(543) 评论(0) 推荐(0)

在function中使用recordset对象
摘要：function GetTotalFee(rsObj)set rs = rsobjallsum = 0rs.Movefirstwhile not rs.eof daysum =0 for i=6 to rs.fields.count-8 if instr(lcase(rs.fields(i).name),"remark")=0 then if Not... 阅读全文

posted @ 2004-10-10 18:43 一望无际的南 阅读(585) 评论(0) 推荐(0)

asp自定义函数可以返回数组或者对象
摘要：asp自定义函数可以返回数组或者对象例子： function GetAuditorInfoBySeqNo(filenostr,strSeqNo) Dim auditorInfo(3) sqltext = "select auditor from fileaudit where FileNO='"&filenostr&"' and seqNo='"&strSeqNo&"'" set rs_... 阅读全文

posted @ 2004-10-09 13:54 一望无际的南 阅读(4437) 评论(0) 推荐(0)

导航