有一个客户要求后台生成大数据量(每次生成几万条)的会员卡号及密码,金额等。生成的会员卡号及密码要印制在卡上对会员发放。生成大量数据在库中,印制卡片的厂家要拿到数据进行印制怎么办呢? 于是我想到用代码将access中的数据生成Excel表格导出。打印这样不就可以了吗?在网上查找相关资料可都不尽如我意,就自己动手写 发布时间:2012-01-11 作者: 佚名 views(205)
关系运算符也叫比较运算符,用来对两个表达式的值进行比较,比较的结果是一个逻辑值(布尔值),ASP提供了8个关系运算符: 关系运算符 运算符 测试关系 例子 = 相等 X=Y 或 不相等 XY 小于 X 大于 XY = 小于或等于 X=Y = 大于或等于 X=Y 关系运算符还包括Like和As,前者主要用于比较字符串和SQL表达式中 发布时间:2012-01-11 作者: 佚名 views(204)
日期转换星座函数,参数是日期型 function astro(birth) astro='' if birth='' or not isdate(birth) Then exit function birthmonth=month(birth) : if birthmonth10 then birthmonth='0' birthmonth birthday=day(birth) : if birthday10 then birthday='0' birthday birth=trim(birt 发布时间:2012-01-11 作者: 佚名 views(228)
[测试某个文件存在否] 函数名:CheckFile 作 用:测试某个文件存在否 参 数:ckFilename ---- 被测试的文件名(包括路径) 返回值:文件存在返回True,否则False ************************************************** Public Function CheckFile(ByVal ckFilename) Dim M_fso CheckFile=False Set M_fso = CreateObject('Scr 发布时间:2012-01-11 作者: 佚名 views(229)
逻辑运算符 : 逻辑运算符 也称布尔运算。用逻辑运算符连接两个或多个关系式,组成一个布尔表达式。ASP的 逻辑运算符 有以下6种: 逻辑运算符 运算符 说明 例子 Not(非) 由真变假或由假变真 Not X(如:如果X的值为真那么Not X则为假) And(和) 对两个关系表达式的值进行比较,只有两个表达式都为真时才返回真 发布时间:2012-01-11 作者: 佚名 views(189)
数据库连接: 以下为引用的内容: % set conn=server.createobject('adodb.connection') conn.open 'driver={microsoft access driver (*.mdb)};dbq='server.mappath('数据库名') % 打开数据库: 以下为引用的内容: exec='select * from 数据库表' set rs=server.createobject('adodb.recordset') rs.open 发布时间:2012-01-11 作者: 佚名 views(171)
[删除某个文件] 函数名:DelFile 作 用:删除某个文件 参 数:dFilename ---- 被删除的文件名(包括路径) 返回值:文件删除返回True,否则False ************************************************** Public Function DelFile(ByVal dFilename) Dim M_fso DelFile=False Set M_fso = CreateObject('Scripting.FileSystem 发布时间:2012-01-11 作者: 佚名 views(197)
一.子过程(Sub)的定义与调用 Sub 过程名([参数列表]) 通用过程 ..... [Exit Sub] 结束过程,返回调用该过程语句的下一条语句继续运行 ..... End Sub 例: sub print(a) if a='' then exit sub a为空时退出 response.write a 输出A end sub 3)Call 过程名(实在参数表)调用Sub通用过程 实在参数的个数、类型和顺序,应该与 发布时间:2012-01-11 作者: 佚名 views(190)
|