asp编程琐碎

1 在提交之前进行验证

<input id="Submit1" type="submit" value="submit" οnclick="return yanzheng()" />

       function yanzheng() {
           if (document.getElementById("selectType").value == "-1") {
               alert("请选择图片要上传的位置");
               return false;
           }

     }

容易丢掉οnclick="return yanzheng()" 中的return和return false;中的false 

 

2 在服务端获取当前系统时间用 Date

 

3 服务端访问acess数据库以及对应的增删改查

打开数据库-------------------------------------

 '创建连接器
set connGraph=server.CreateObject("ADODB.connection")
'创建读取器
set rec=server.createobject("ADODB.recordset")
' 连接字符串
connGraph.ConnectionString="driver={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("server/data/img.mdb")

查询数据

connGraph.Open
rec.Open "SELECT * FROM img where imagePosition =0", connGraph

do until rec.EOF

rec..Fields("imageDescribe")

..........

rec.MoveNext

Loop

添加数据

connGraph.Open
' 打开rs，定位到一个空位置
rec.Open "SELECT * FROM img where id is null",connGraph,1,3
rec.addnew

rec("imagePosition") = “”

rec.update

修改数据

connGraph.Open
rec.Open "SELECT * FROM img where id =12",connGraph,3,2

rec..Fields("imageDescribe")=“新值"

rec.update

删除数据

connGraph.Open
rec.Open "SELECT * FROM img where id =12",connGraph,3,2

rec.Delete

 

4 操作文件

 '创建一个操作文件的对象
 set fso=Server.CreateObject("Scripting.FileSystemObject")

 filePath=Server.MapPath("name.txt")

filePath2=Server.MapPath("xuexiao.txt")

'删除文件

fso.DeleteFile filePath,true

'修改文件名称

fso.MoveFile filePath,filePath2

'判断文件是否存在

fso.FileExists(filePath)

'创建文件

fso.CreateTextFile(fileName,overWrite)

'打开文件

fso.OpenTextFile(fileName,io_mode,AutoCreate)

io_mode:以指定方式访问,他的值有ForReading(=1)和ForAppending(=8)两种,如设置为ForReading则文件是只读的(无法写入),而ForAppending的文件只能从文件末端写入.默认为ForReading

AutoCreate:此参数为boolen值,如果文件不存在,若为true则自动产生,若为false则出现找不到的错误信息