最新更新 热门文章
当前位置：首页>免费文档>文库资料>小学教育>精华ASP代码收集

精华ASP代码收集

更新时间：2023-09-19 05:00:01 阅读量： 小学教育 文档下载

说明：文章内容仅供预览，部分内容可能不全。下载后的文档，内容与下面显示的完全一致。下载之前请确认下面内容是否您想要的，是否完整无缺。

以下内容为程序代码:

1. oncontextmenu=\将彻底屏蔽鼠标右键 no 可用于Table

2.

3. onpaste=\不准粘贴

4. oncopy=\防止复制

5.

6.

7.

8. 永远都会带着框架

9. 防止被人frame

10. 网页将不能被另存为

11.

onclick=\

12. 怎样通过asp的手段来检查来访者是否用了代理

<% if Request.ServerVariables(\response.write \您通过了代理服务器，\\真实的IP为\end if %>

13. 取得控件的绝对位置

//javascript

//VBScript

14. 光标是停在文本框文字的最后

15. 判断上一页的来源 asp:

request.servervariables(\

javascript: document.referrer

16. 最小化、最大化、关闭窗口

本例适用于IE

17. 定义数据库连接的一些常量 <%

Const adOpenForwardOnly = 0 '游标只向前浏览记录，不支持分页、Recordset、BookMark

Const adOpenKeyset = 1 '键集游标，其他用户对记录说做的修改将反映到记录集中，但其他用户增加或删除记录不会反映到记录集中。支持分页、Recordset、BookMark

Const adOpenDynamic = 2 '动态游标功能最强，但耗资源也最多。用户对记录说做的修改，增加或删除记录都将反映到记录集中。支持全功能浏览(ACCESS不支持)。

Const adOpenStatic = 3 '静态游标，只是数据的一个快照，用户对记录说做的修改，增加或删除记录都不会反映到记录集中。支持向前或向后移动

Const adLockReadOnly = 1 '锁定类型，默认的，只读，不能作任何修改 Const adLockPessimistic = 2 '当编辑时立即锁定记录，最安全的方式

Const adLockOptimistic = 3 '只有在调用Update方法时才锁定记录集，而在此前的其他操作仍可对当前记录进行更改、插入和删除等

Public function RenameFile(filespec1,filespec2) '修改一个文件

Dim fso

Set fso = CreateObject(\ If Err.number<>0 Then

Response.Write(\修改文件名时发生错误!请查看错误信息 \\ Err.Clear

RenameFile = False End If

call fso.CopyFile(filespec1,filespec2,True) call fso.DeleteFile(filespec1) Set fso = Nothing RenameFile = True End function End Class %>

38、现在已可以压缩有密码的数据库，代码如下，但是压缩之后的数据库密码就没有了！如何解决？ <%

Const JET_3X = 4

Function CompactDB(dbPath, boolIs97) Dim fso, Engine, strDBPath

strDBPath = left(dbPath,instrrev(DBPath,\

Set fso = CreateObject(\ If fso.FileExists(dbPath) Then

Set Engine = CreateObject(\

If boolIs97 = \

Engine.CompactDatabase \& dbpath, _

\

Password='XXXXXXXX';Data Source=\ & \ Else

Engine.CompactDatabase \OLEDB:Database Password='XXXXXXXX';Data Source=\

\ End If

fso.CopyFile strDBPath & \ fso.DeleteFile(strDBPath & \ Set fso = nothing Set Engine = nothing

CompactDB = \你的数据库, \已经压缩成功!\ Else

CompactDB = \数据库名称或路径不正确. 请重试!\ End If End Function %>

39. ASP与SQL数据库连接：

<%@ language=VBs cript%> <%

dim conn

set conn=server.createobject(\

con.open \服务器名称或IP地址;UID=sa;PWD=数据库密码;DATABASE=数据库名称 %>

40. 建立记录集对象：

set rs=server.createobject(\ rs.open SQL语句,conn,3,2

41. SQL常用命令使用方法：

(1) 数据记录筛选：

sql=\数据表 where 字段名=字段值 order by 字段名 [desc]\

sql=\数据表 where 字段名 like '%字段值%' order by 字段名 [desc]\

sql=\数据表 where 字段名 order by 字段名 [desc]\

sql=\数据表 where 字段名 in ('值1','值2','值3')\

sql=\数据表 where 字段名 between 值1 and 值2\

(2) 更新数据记录：

sql=\数据表 set 字段名=字段值 where 条件表达式\

sql=\数据表 set 字段1=值1,字段2=值2 …… 字段n=值n where 条件表达式\

(3) 删除数据记录：

sql=\数据表 where 条件表达式\

sql=\数据表\将数据表所有记录删除)

(4) 添加数据记录：

sql=\数据表 (字段1,字段2,字段3 …) valuess (值1,值2,值3 …)\

sql=\目标数据表 select * from 源数据表\把源数据表的记录添加到目标数据表)

(5) 数据记录统计函数：

AVG(字段名) 得出一个表格栏平均值

COUNT(*|字段名) 对数据行数的统计或对某一栏有值的数据行数统计 MAX(字段名) 取得一个表格栏最大的值 MIN(字段名) 取得一个表格栏最小的值 SUM(字段名) 把数据栏的值相加

引用以上函数的方法：

sql=\字段名) as 别名 from 数据表 where 条件表达式\ set rs=conn.excute(sql)

用 rs(\别名\获取统的计值，其它函数运用同上。

(5) 数据表的建立和删除：

CREATE TABLE 数据表名称(字段1 类型1(长度),字段2 类型2(长度) …… )

例：CREATE TABLE tab01(name varchar(50),datetime default now())

DROP TABLE 数据表名称 (永久性删除一个数据表)

42. 记录集对象的方法：

rs.movenext 将记录指针从当前的位置向下移一行 rs.moveprevious 将记录指针从当前的位置向上移一行 rs.movefirst 将记录指针移到数据表第一行 rs.movelast 将记录指针移到数据表最后一行 rs.absoluteposition=N 将记录指针移到数据表第N行 rs.absolutepage=N 将记录指针移到第N页的第一行 rs.pagesize=N 设置每页为N条记录

rs.pagecount 根据 pagesize 的设置返回总页数 rs.recordcount 返回记录总数

rs.bof 返回记录指针是否超出数据表首端，true表示是，false为否 rs.eof 返回记录指针是否超出数据表末端，true表示是，false为否 rs.delete 删除当前记录，但记录指针不会向下移动 rs.addnew 添加记录到数据表末端 rs.update 更新数据表记录

－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－

43、 Recordset对象方法

Open方法

recordset.Open Source,ActiveConnection,CursorType,LockType,Options

本文来源：https://www.bwwdw.com/article/uzrh.html

相关文章：

正在阅读：

精华ASP代码收集09-19

工作狂爸爸作文600字06-21

醉花阴 优秀教案04-15

论刑事诉讼中的电子证据07-17

玩转中秋作文450字06-24

二三级市场的整合营销传播实务06-08

《职业道德与法律》第二单元《知荣辱，有道德》测试题03-09

2018年八年级语文上册第一单元2首届诺贝尔奖颁发练习新人教版01-18

建筑设备安装工程图集04-11

某医院综合楼质量创优计划06-10

相关文章
最新文章
推荐文章

Copyright©博文网bwwdw.com 版权所有

最新更新 | 热点专题 | 网站地图 | TAG专题 | XML地图 | 范文搜索

Top