您好,今天是: ·加入收藏·设为首页·联系站长·
网站首页 | 公司介绍 | 维修项目 | 收费标准 | 维修联盟 | 联系方式 | 在线报修 | 电器导购 | 本站地图  Rss2.0 Wap1.2

网站首页 | 行业新闻 | 家电维修 | 电脑维修 | 工控维修 | 制冷维修 | 网站制作 | 网络工程 | 休闲娱乐 | 英文欣赏 | 维修论坛

维修品牌 索尼 松下 日立 东芝 爱华 夏普 三星 三洋 先锋 健伍 胜利 飞利浦 日电 JVC NEC LG 长虹 海尔 康佳 王牌 海信 创维 牡丹 苹果 IBM 优派 狮龙 厦新 厦华 康力 宏基 三菱 JBL 湖山 熊猫 金正 万利达 安桥 高士达 明基 戴尔 BenQ DELL 长城 台达 现代 美格 EMC HPC SUN 联想 上广电 SVA TCL 北京牌 大宇 山水 彩星 冠捷 美的 格力 奇声 新科 狄克威尔 EIZO 金星 Sony Sharp Sanyo Haier Apple
当前位置:北京燕旭电子公司 >> 网站制作 >> HTML&CSS >> 浏览文章 立即入驻本站 | 免费发布供应信息
值得收藏的HTML、JavaScript、ASP代码
作者:佚名 来源:本站原创 文章点击数:

1. CDONTS.NewMail 组件使用说明 

Set MailObject = Server.CreateObject("CDONTS.NewMail") 
    MailObject.From = "发信邮箱" 
    MailObject.To = "收信邮箱" 
    MailObject.Cc = "抄送邮箱" 
    MailObject.Bcc = "密送邮箱" 
    MailObject.Subject = "邮件主题" 
    MailObject.Body = "邮件内容" 
    MailObject.MailFormat = 0 '邮件的格式,0是MIME格式,1是文本消息 
    MailObject.BodyFormat = 0 '邮件的正文的格式,0表示HTML格式,1表示普通文本 
    MailObject.Importance = 1 '邮件的重要,0是表示低重要,1表示正常,2表示高重要 
    MailObject.AttachFile "附件绝对路径","附件名称" 
    MailObject.Send 
    Set MailObject = Nothing 

2. 网页不会被缓存 
     Response.Expires = -1 
     Response.ExpiresAbsolute = Now() - 1 
     Response.cachecontrol = "no-cache" 

3. 客户端IP地址 
     Request.serverVariables("REMOTE_ADDR) 

4. 记录集对象的方法: 
    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 更新数据表记录 

5. 随机数工式 
    Int((上界 - 下界 + 1) * Rnd + 下界) 

6. 检查输入函数 
    Function Check_Input(input) 
    input = Trim(input) '去除多余空格 
    input = Server.HTMLEncode(input) '转换HTML 
    input = Replace(input,Chr(39),"'") '转换半角单引号 
    input = Replace(input,Chr(34),""") '转换半角双引号 
    checkinput = input 
    End Function 

7. 连接 Access 数据库方法 
      方法1: 
      Set conn = Server.CreateObject("ADODB.Connection") 
      conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("data.mdb") 

  方法2: 
      Set conn = Server.CreateObject("ADODB.Connection") 
      conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("data.mdb") 

 


    1. oncontextmenu="window.event.returnvalue=false" 将彻底屏蔽鼠标右键 
   

no
可用于Table 

2. 取消选取、防止复制 

3. onpaste="return false" 不准粘贴 

4. oncopy="return false;" oncut="return false;" 防止复制 

5. IE地址栏前换成自己的图标 

6. 可以在收藏夹中显示出你的图标 

7. 关闭输入法 

8. 永远都会带着框架 
     

9. 防止被人frame 
     

10. 网页将不能被另存为 

11.     onclick="window.location = 'view-source:'+ http://www.csdn.net/'";> 

12. 怎样通过asp的手段来检查来访者是否用了代理 
    <% if Request.ServerVariables("HTTP_X_FORWARDED_FOR")<>"" then 
    response.write "您通过了代理服务器,"& _ 
    "真实的IP为"&Request.ServerVariables("HTTP_X_FORWARDED_FOR") 
    end if 
    %> 

13. 取得控件的绝对位置 

//javascript 
     

//VBscript 
     

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

15. 判断上一页的来源 
    asp: 
    request.servervariables("HTTP_REFERER") 

java script: 
    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方法时才锁定记录集,而在此前的其他操作仍可对当前记录进行更改、插入和删除等 
    Const adLockBatchOptimistic = 4 '当编辑时记录不会被锁定,而更改、插入和删除是在批处理方式下完成的 

Const adCmdText = &H0001 
    Const adCmdTable = &H0002 
    %> 

18. 网页不会被缓存 
    HTM网页 
     
     
     
    或者 
    ASP网页 
    Response.Expires = -1 
    Response.ExpiresAbsolute = Now() - 1 
    Response.cachecontrol = "no-cache" 
    PHP网页 
    header("Expires: Mon, 26 Jul 1997 05:00:00 GMT"); 
    header("Cache-Control: no-cache, must-revalidate"); 
    header("Pragma: no-cache"); 

19. 检查一段字符串是否全由数字组成 
     

20. 获得一个窗口的大小 
    document.body.clientWidth,document.body.clientHeight 

21. 怎么判断是否是字符 
    if (/[^\x00-\xff]/g.test(s)) alert("含有汉字"); 
    else alert("全是字符"); 

22.TEXTAREA自适应文字行数的多少 
     

23. 日期减去天数等于第二个日期 
     

24. 选择了哪一个Radio 
     
    Style 
    Barcode 
     
     

25.获得本页url的request.servervariables("")集合 
    Response.Write "


    for each ob in Request.ServerVariables 
    Response.Write "" 
    next 
    Response.Write "
Variablesvalue
"&ob&""&Request.ServerVariables(ob)&"

26. 
    本机ip<%=request.servervariables("remote_addr")%> 
    服务器名<%=Request.ServerVariables("SERVER_NAME")%> 
    服务器IP<%=Request.ServerVariables("LOCAL_ADDR")%> 
    服务器端口<%=Request.ServerVariables("SERVER_PORT")%> 
    服务器时间<%=now%> 
    IIS版本<%=Request.ServerVariables"SERVER_SOFTWARE")%> 
    脚本超时时间<%=Server.scriptTimeout%> 
    本文件路径<%=server.mappath(Request.ServerVariables("script_NAME"))%> 
    服务器CPU数量<%=Request.ServerVariables("NUMBER_OF_PROCESSORS")%> 
    服务器解译引擎<%=scriptEngine & "/"& scriptEngineMajorVersion &"."&scriptEngineMinorVersion&"."& scriptEngineBuildVersion %> 
    服务器操作系统<%=Request.ServerVariables("OS")%> 

27.ENTER键可以让光标移到下一个输入框 
     

28. 检测某个网站的链接速度: 
    把如下代码加入区域中: 
     

29. 各种样式的光标 
    auto :标准光标 
    default :标准箭头 
    hand :手形光标 
    wait :等待光标 
    text :I形光标 
    vertical-text :水平I形光标 
    no-drop :不可拖动光标 
    not-allowed :无效光标 
    help :?帮助光标 
    all-scroll :三角方向标 
    move :移动标 
    crosshair :十字标 
    e-resize 
    n-resize 
    nw-resize 
    w-resize 
    s-resize 
    se-resize 
    sw-resize  




人支持

发表评论】【告诉好友】【打印此文】【收藏此文】【关闭窗口
上一篇:让网页另存为功能不能用的特效代码
下一篇:没有了
  最新文章
  热门文章
  推荐信息

| 设为首页 | 加入收藏 | 关于本站 | 联系站长 | 友情链接 | 版权申明 | 雁过留声 | 网站地图

Copyright 2000-2008 Powered by Bjlxjw.COM,北京龙旭电子技术服务中心 All Rights Reserved.
全天24小时服务电话:010-60118386、85451495.传真:010-64621509 技术支持:13146594250. E-Mail:bjlxjw@126.com
报修咨询服务QQ:879851559 技术支持QQ: 275960024 网站制作服务QQ: 377152508 维修讨论群:27584257(非技术人员请勿加入,加入本群请注明来意!)
送修联系地址:北京市朝阳区三元桥顺源里2号(坐车到三元桥下车南行60米三元东桥下向西200米左右路南建设银行后边即到)
免责声明:我站部分文章信息来自网络,如果侵犯了原作者的著作权,请直接联系我站,我站必将第一时间删除,谢谢支持! 京ICP备06024783号