vb mysql 字符串转日期_VB常用函数表

ASP纯ASP

VBscript常用函数：

1.数值型函数：

abs(num): 返回绝对值

sgn(num): num>0 1; num=0 0; num<0 -1;判断数值正负

hex(num): 返回十六进制值 直接表示：&Hxx 最大8位

oct(num): 返回八进制值 直接表示：&Oxx 最大8位

sqr(num): 返回平方根 num>0

int(num): 取整 int(99.8)=99; int(-99.2)=100

fix(num): 取整 fix(99.8)=99; fix(-99.2)=99

round(num,n): 四舍五入取小数位 round(3.14159,3)=3.142 中点数值四舍五入为近偶取整 round(3.25,1)=3.2

log(num): 取以e为底的对数 num>0

exp(n): 取e的n次幂 通常用 num^n

sin(num): 三角函数，以弧度为值计算 (角度*Pai)/180=弧度 con(num); tan(num); atn(num)

2.字符串函数：

len(str)：计算字符串长度 中文字符长度也计为一！

mid(str,起始字符,[读取长度])：截取字符串中间子字符串

left(str,nlen)：从左边起截取nlen长度子字符串

right(str,nlen)：从右边起截取nlen长度子字符串

Lcase(str)：字符串转成小写

Ucase(str)：字符串转成大写

trim(str)：去除字符串两端空格

Ltrim(str)：去除字符串左侧空格

Rtrim(str)：去除字符串右侧空格

replace(str,查找字符串,替代字符串,[起始字符,替代次数,比较方法])：替换字符串

注：默认值：起始字符 1；替代次数 不限；比较方法区分大小写(0)

InStr([起始字符,]str,查找字符串[,比较方法])：检测是否包含子字符串可选参数需同时选 返回起始位置

InStrRev(str,查找字符串[,起始字符][,比较方法])：反向检测是否包含子字符串返回起始位置

space(n)：构造n个空格的字符串

string(n,str)：构造由n个str第一个字符组成的字符串

StrReverse(str)：反转字符串

split(str,分割字符串[,次数][,比较方法])：以分割字符串为分割标志将字符串转为字符数组可选参数需同时选

3.数据类型转换函数：

Cint(str)：转换正数 True -1；False 0；日期 距离1899/12/31天数；时间上午段 0；下午段 1；

Cstr(str)：日期 输出格式 yyyy/mm/dd；时间 输出格式 Am/Pm hh:mm:ss

Clng(str)：与Cin()类似

Cbool(num)：num不为零 True；反之 False

Cdate(str)：转换日期格式 0：#Am 12:00:00#；正数距离1899/12/31天数的日期；浮点数日期＋小数时间

Cbyte(num)：num<255 转换为字节

Csng(str)：转换为单精度数值

Cdbl(str)：转换为双精度数值

Ccur(str)：转换为现金格式

4.时间函数：

date：取系统当前日期

time：取系统当前时间

now：取系统当前时间及日期值 Datetime类型

timer：取当前时间距离零点秒值，计时器，可计算时间差

DateAdd(间隔单位,间隔值,日期)：推算相邻日期

DateDiff(间隔单位,日期一,日期二)：计算时间差 日期二-日期一

Datepart(间隔单位,日期)：计算日期的间隔单位值

Dateserial(date)：输出日期值(按序列计算)

Timeserial(time)：输出时间值(按序列计算)

DateValue(datetime)：取出字符串中日期值

Timevalue(datetime)：取出字符串中时间值

weekday(date)：计算星期几

MonthName(date)：输出月分名

year(datetime)：截取年份

month(datetime)：截取月份

day(datetime)：截取日

hour(datetime)：截取小时

minute(datetime)：截取分钟

second(datetime)：截取秒

5.其它函数：

Array(unit,..)：动态生成数组

Asc(str)：输出字符串第一个字符的ASCII码

Chr(asc)：转换ASCII为字符 Enter：Chr(13)&Chr(10)

Filter(数组名称,关键字符串,[,包含][,比较方法])：

将字符串数组中含有关键字符串的元素存成新的数组(默认) [包含]为false则取不包含的元素

Join(ArrayName)：将数组中元素连成字符串

Ubound(ArrayName[,维数])：取得数组相应维数的上界

Lbound(ArrayName[,维数])：取得数组相应维数的下界 一般为0

Randmize n：启动随机数种子

Rnd(n)：取得随机数，n>0或为空，取序列下一随机值，n<0，随机值相同，n=0，生产与上一随机值相同的数

取介于A和B之间的随机正数C，公式：C=Int((B-A+1)*Rnd+A) 条件(B>A)

子程序和自定义函数

Sub StrSubName Function StrFunName(arg[1],..)

子程序体 函数体

Exit Sub 中途跳出 Exit Function 中途跳出

End Sub StrFunName＝Value 返回值

End Function

[call] StrSubName 引用子程序 Var=StrFunName(arg[1],..) 引用函数

子程序和自定义函数可以递归调用；

ASP六大对象常用语句示范：

Response：

Response.write StrVar/"String"：向网页写出参数值或字符串等同于在Html标记中嵌入

Response.End：停止页面编译，并将已经编译内容输出到浏览器

Response.Buffer=True|False：页面编译时是否使用缓存的设置，一般在页面头部设置

Response.Flush：强制输出页面已编译部分内容

Response.Clear：将缓冲区内的数据清除

Response.Redirect URL：停止页面编译或输出，转载指定所需页面

Response.IsClientConnected：返回True|False，检测用户是否还处于连接状态

Response.Charset(CharsetName)：设置页面编码类型，即

Response.ContentType [= ContentType ]：设置页面文件类型，同上

Response.Expires [= number]：设置页面失效时间，单位分钟

Response.ExpiresAbsolute [= [date] [time]]：设置页面失效的绝对时间

Response.Status = StatusDescription：设置页面状态描述

Request：

Request("PassStrName")：读取网页传递值，包括表单及以？PassStrName＝value&PassStrName_n＝value_n形式

Request[.collection|property|method](variable)

Request.querystring("PassStrName")：读取Get方法传递的表单值和？PassStrName＝value

Request.QueryString(Varible)[(Index).Count]

Request.form("PassStrName")：读取Post方法传递的纯表单域的值

Request.Form(Parameter)[(Index).Count]

Request.ServerVaribles(Server Environment Variable)：读取客户端系统环境变量，详见参考

Request.BinaryRead(Count)：读取指定字节数的传送值

Request.TotalBytes：查询体的长度，以字节为单位，只读

注：同名表单如：CheckBox如有多项值，传递形式如右，StrName=value1,value2,...需要用Split函数分割各项值

Multiple的Select表单与CheckBox类似，TextArea的值可包含换行字符，用Replace转为
，以满足格式需要

Session：(用户全局变量)

Session("SesName")＝value：存储Session变量值，也可读取该值

Session("SesName")＝Empty：判断Session值是否存在的两种方法

IsEmpty(Session("SesName"))=True|False：判断Session值是否存在的两种方法

Session.TimeOut=num：设置Session变量的存在时效，单位分钟

Session.Abandon：清除所有Session变量值

Session.SessionID：Session变量的ID序列号，只读

Application：(应用程序全局变量)

Application("AppName")＝value：存储Application变量值，也可读取该值

Application("AppName")＝Empty：判断Application值是否存在的两种方法

IsEmpty(Application("AppName"))=True|False：判断Application值是否存在的两种方法

Application.Lock：Application变量值锁定，防止同时更改变量值

Application.UnLock：Application变量值解锁，允许更改变量值

注：Session与Application变量都可以用来存储数组和系统对象，引用方法是变量名相当于数组名而已，

但不能直接改变其值，需要借助临时数组修改值后，再赋给Session与Application变量

Global.asa文件的结构：

Sub Application_OnEnd ... End Sub

Sub Session_OnStart ...End Sub

Sub Session_OnEnd ... End Sub%>

Server:

Server.MapPath("FileUrl")：映射文件名的服务器站点绝对地址，Path=Server.MapPath(./)可以得到虚拟目录根路径

Server.HtmlEncode("string")：转换为可以直接显示带Html格式的字符串，如：等

Server.URLEncode( "string")：转换为浏览器地址编码

set Var＝Server.CreatObject("ObjName")：创建对象变量

Server.ScriptTimeout = NumSeconds：ASP程序页面执行时限，以秒为单位

Cookies: 存储在用户本机的临时变量，每个Cookie的最大字节4KB，最多可以有300个Cookie 1.2MB

Response.cookies("StrCookieName")＝value：存储Cookie变量值，也可读取该值

Response.cookies("StrCookieName")＝""：判断是否为空

Response.cookies("StrCookieName").Expires=Date：变量有效期，以天为单位，小于当前时间立即失效

Response.Cookies(Cookie[(key).Attribute])：标准语法

ObjectContext 控制ASP的事务处理

ObjectContext.OnTransactionAbort：由放弃的事务处理事件激发，在脚本完成处理后发生

ObjectContext.OnTransactionCommit：由成功的事务处理事件激发，在脚本完成处理后发生

ObjectContext.SetAbort：显式的放弃一次事务处理

ObjectContext.SetComplete：覆盖前面任何调用ObjectContext.SetAbort方法的调用

Msgbox "string"/StrName：VBscript提示框

表单的Onsubmit事件：在同一页面写入 Function FormName_onsubmit()..FormName_onsubmit＝True/False..end Function，

页面会在提交前先执行语句，并根据返回值判断是否完成提交任务。

数据库连接字符串举例：

Access2000：

conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("dbase\liuyan.mdb")

conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("dbase\liuyan.mdb")&";Password=admin"

Recordset.Open "数据表名", conn, 2, 2

SqlServer2000：

conn.Open "Provider=SQLOLEDB.1;User ID=sa;Password=admin;Initial Catalog=pubs;Data Source=server\garlmrm"

conn.Open "provider=SQLOLEDB;data source=hyserver;uid=sa;pwd=;database=pubs"

Recordset.Open StrSQL, conn, 2, 2

Dbase：(?)

conn Open "Driver={Microsoft dBase Driver};SourceType=DB;SourceDB=" & Server.MapPath( "目录名" )

Recordset.Open StrSQL, conn, 2, 2

FoxBase：

conn Open "Driver={Microsoft Visual FoxPro Driver};SourceType=DBF;SourceDB=" & Server.MapPath( "目录名" )

Recordset.Open DBF文件名或Select语句, conn, 2, 2

conn Open "Driver={Microsoft Visual FoxPro Driver};SourceType=DBC;SourceDB=" & Server.MapPath( "DBC数据库文件名" )

Recordset.Open DBF文件名或Select语句, conn, 2, 2

Excel：

conn Open "Driver={Microsoft Excel Driver (*.xls)};DBQ=" & Server.MapPath( "XLS文件名" )

Recordset.Open "Select * From ["&sheet&"$]",conn,2,2

注：使用DBF、DBC、Excel数据库，下面几点要注意：Excel数据库只能读取、增加记录、修改记录，但不能删除记录；

DBF、DBC可以读取记录、增加记录、删除记录、修改记录，但是在增加记录时，任何一个字段值都不能为空，由此

可看出局限性很大，所以尽可能地用MDB或SQL数据库。

ASP连接数据库的11种方法——本文总结了使用ASP链接各种数据库的方法：

1.Access数据库的DSN-less连接方法:

set adocon=Server.Createobject("adodb.connection")

adoconn.Open"Driver={Microsoft Access Driver(*.mdb)};DBQ="& _

Server.MapPath("数据库所在路径")

2.Access OLE DB连接方法：

set adocon=Server.Createobject("adodb.connection")

adocon.open"Provider=Microsoft.Jet.OLEDB.4.0;"& _

"Data Source=" & Server.MapPath("数据库所在路径")

3.SQL server连接方法：

set adocon=server.createobject("adodb.recordset")

adocon.Open"Driver={SQL Server};Server=(Local);UID=***;PWD=***;"& _

"database=数据库名;"

4.SQL server OLE DB连接方法:

set adocon=Server.Createobject("adodb.connection")

adocon.open"provider=SQLOLEDB.1;Data Source=RITANT4;"& _

"user ID=***;Password=***;"& _

"inital Catalog=数据库名"

5.Oracle 连接方法:

set adocon=Server.Createobject("adodb.connection")

adocon.open"Driver={microsoft odbc for oracle};server=oraclesever.world;uid=admin;pwd=pass;"

6.Oracle OLE DB 连接方法:

set adocon=Server.Createobject("adodb.connection")

adocon.open"Provider=OraOLEDB.Oracle;data source=dbname;user id=admin;password=pass;"

7.dBase 连接方法:

set adocon=Server.Createobject("adodb.connection")

adocon.open"Driver={microsoft dbase driver(*.dbf)};driverid=277;dbq=------------;"

8.mySQL 连接方法:

set adocon=Server.Createobject("adodb.connection")

adocon.open"Driver={mysql};database=yourdatabase;

uid=username;pwd=yourpassword;option=16386;"

9.Visual Foxpro 连接方法:

set adocon=Server.Createobject("adodb.connection")

adocon.open"Driver={microsoft Visual Foxpro driver};sourcetype=DBC;sourceDB=*.dbc;Exclusive=No;"

10.MS text 连接方法:

set adocon=Server.Createobject("adodb.connection")

adocon.open"Driver={microsoft text driver(*.txt; *.csv)};dbq=-----;"&_

"extensions=asc,csv,tab,txt;Persist SecurityInfo=false;"

11.MS text OLE DB 连接方法:

set adocon=Server.Createobject("adodb.connection")

adocon.open"Provider=microsof.jet.oledb.4.0;data source=your_path;"&_

"Extended Properties'text;FMT=Delimited'"

常用的四种SQL命令：

1.查询数据记录(Select)

语法：Select 字段串行 From table Where 字段=内容

例子：想从book表中找出作者为"cancer"的所有记录，SQL语句便如下：

select * from book where author=’cancer’

"*"是取出book表所有的字段，如查询的字段值为数字，则其后的"内容"便无须加上单引号，如是日期，则在Access中用(#)包括，而在SQL server中则用(’)包括，

如:

select * from book where id=1

select * from book where pub_date=#2002-1-7# (Access)

select * from book where pub_date=’2002-1-7’ (SQL Server)

提示：

日期函数to_date不是标准sql文，不是所有的数据库适用，所以大家在使用的时候要参考数据库具体语法

另外如果是查询传入的变量，则如下：

strau=request.form("author")

strsql="select * from book where author=’"&strau&"’"

如果查询的是数字，则：

intID=request.form("id")

strsql="select * from book where id="&intID

在很多数据库中，如：oracle，上面的语句是可以写成：

strsql="select * from book where id='"&intID&"'"

但是字符型一定不能按照数字格式写，需要注意。

2.添加记录(Insert)

语法：

Insert into table(field1,field2,....) Values (value1,value2,....)

例子：添加一作者是"cancer"的记录入book表:

insert into book (bookno,author,bookname) values (’CF001’,’cancer’,’Cancer无组件上传程序’)

同样，如果用到变量就如下：

strno=request.form("bookno")

strau=request.form("author")

strname=request.form("bookname")

strsql="insert into book (bookno,author,bookname) values (’"&strno&"’,’"&strau&"’,’"&strname&"’)"

3.用Recordset对象的Addnew插入数据的方法:

语法：

rs.addnew

rs("field1").value=value1

rs("field2").value=value2

...

rs.update

4.修改数据记录(Update)

语法：

update table set field1=value1,field2=value2,...where fieldx=valuex

例子：

update book set author=’babycrazy’ where bookno=’CF001’

如果用到变量就如下：

strno=request.form("bookno")

strau=request.form("author")

strsql="update book set author=’"&strau&"’ where bookno=’"&strno"’"

5.Recordset对象的Update方法:

语法：

rs("field1").value=value1

rs("field2").value=value2

...

rs.update

注意：使用语法3和语法5的时候，一定要注意字段的类型(尤其是日期型)一致，否则出错的几率非常的高。

例子：

strno=request.form("bookno")

strau=request.form("author")

set adocon=server.createobject("adodb.connection")

adocon.open "Driver={Microsoft Access Driver(*.mdb)};DBQ=" & _

Server.Mappath=("/cancer/cancer.mdb")

strsql="select * from book where bookno=’"&strno&"’"

set rs=server.createobject("adodb.recordset")

rs.open strsql,adconn,1,3

if not rs.eof then ’如果有此记录的话

rs("author").value=strau

rs.update

end if

rs.close

set rs=nothing

adocon.close

set adocon=nothing

6.删除一条记录(Delete)

语法：

Delete table where field=value

例子：删除book表中作者是cancer的记录

delete book where author=’cancer’

(注意：如果book表中author字段的值为cancer的记录有多条，将会删除所有author为cancer的记录)

好了，学会了用这些操作，大家在用asp操作数据库的时候，该是没有什么问题了。