2004年11月13日

<%
   语句
   ……
  %>
<2>定义变量dim语句
<%
  dim a,b
  a=10
  b=”ok!”
%>
注意:定义的变梁蒙以是数值型,也可以是字符或者其他类型的
<3>简单的控制流程语句
  1. If 条件1 then
     语句1
elseif 条件2 then
     语句2
else
     语句3
endif
2.while 条件
   语句
  wend
3.for count=1 to n step m
  语句1
  exit for
  语句2
next
二.ASP数据库简单*作教程
<1>.数据库连接(用来单独编制连接文件conn.asp)
<%
  Set conn = Server.CreateObject(“ADODB.Connection”)
  conn.Open “DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=” & Server.MapPath(“\bbs\db1\user.mdb”)
%>
(用来连接bbs\db1\目录下的user.mdb数据库)
<2>显示数据库记录
  原理:将数据库中的记录一一显示到客户端浏览器,依次读出数据库中的每一条记录
        如果是从头到尾:用循环并判断指针是否到末      使用: not rs.eof
        如果是从尾到头:用循环并判断指针是否到开始    使用:not rs.bof
        
        <!–#include file=conn.asp–>    (包含conn.asp用来打开bbs\db1\目录下的user.mdb数据库)
        <%
         set rs=server.CreateObject(“adodb.recordset”)  (建立recordset对象)
         sqlstr=”select * from message”  —->(message为数据库中的一个数据表,即你要显示的数据所存放的数据表)
         rs.open sqlstr,conn,1,3         —->(表示打开数据库的方式)
         rs.movefirst                    —->(将指针移到第一条记录)
         while not rs.eof                —->(判断指针是否到末尾)
         response.write(rs(“name”))      —->(显示数据表message中的name字段)
         rs.movenext                     —->(将指针移动到下一条记录)
         wend                            —->(循环结束)
——————————————————         
         rs.close
         conn.close                    这几句是用来关闭数据库
         set rs=nothing
         set conn=nothing
——————————————————-
        %>
       其中response对象是服务器向客户端浏览器发送的信息
<3>增加数据库记录
增加数据库记录用到rs.addnew,rs.update两个函数
        <!–#include file=conn.asp–>    (包含conn.asp用来打开bbs\db1\目录下的user.mdb数据库)
        <%
         set rs=server.CreateObject(“adodb.recordset”)  (建立recordset对象)
         sqlstr=”select * from message”  —->(message为数据库中的一个数据表,即你要显示的数据所存放的数据表)
         rs.open sqlstr,conn,1,3         —->(表示打开数据库的方式)
         rs.addnew                      新增加一条记录
         rs(“name”)=”xx”                将xx的值传给name字段
         rs.update                      刷新数据库
——————————————————         
         rs.close
         conn.close                    这几句是用来关闭数据库
         set rs=nothing
         set conn=nothing
——————————————————-         
                    
        %>
<4>删除一条记录
  删除数据库记录主要用到rs.delete,rs.update
   <!–#include file=conn.asp–>    (包含conn.asp用来打开bbs\db1\目录下的user.mdb数据库)
        <%
         dim name
         name=”xx”
         set rs=server.CreateObject(“adodb.recordset”)  (建立recordset对象)
         sqlstr=”select * from message”  —->(message为数据库中的一个数据表,即你要显示的数据所存放的数据表)
         rs.open sqlstr,conn,1,3         —->(表示打开数据库的方式)
——————————————————-      
         while not rs.eof
          if rs.(“name”)=name then
           rs.delete
           rs.update             查询数据表中的name字段的值是否等于变量name的值”xx”,如果符合就执行删除,
          else                   否则继续查询,直到指针到末尾为止
           rs.movenext
          emd if
         wend
——————————————————
——————————————————         
         rs.close
         conn.close                    这几句是用来关闭数据库
         set rs=nothing
         set conn=nothing
——————————————————-
        %>
<5>关于数据库的查询
  (a) 查询字段为字符型
      <%
      dim user,pass,qq,mail,message
      user=request.Form(“user”)
      pass=request.Form(“pass”)
      qq=request.Form(“qq”)
      mail=request.Form(“mail”)
      message=request.Form(“message”)
      if trim(user)&”x”=”x” or trim(pass)&”x”=”x” then     (检测user值和pass值是否为空,可以检测到空格)
        response.write(“注册信息不能为空”)
      else
      set rs=server.CreateObject(“adodb.recordset”)
      sqlstr=”select * from user where user=’”&user&”‘”    (查询user数据表中的user字段其中user字段为字符型)
      rs.open sqlstr,conn,1,3
      if  rs.eof then
        rs.addnew
        rs(“user”)=user
        rs(“pass”)=pass
        rs(“qq”)=qq
        rs(“mail”)=mail
        rs(“message”)=message
        rs.update
        rs.close
        conn.close
        set rs=nothing
        set conn=nothing
        response.write(“注册成功”)
       end if
      rs.close
      conn.close
      set rs=nothing
      set conn=nothing
      response.write(“注册重名”)
     %>
  (b)查询字段为数字型
     <%
      dim num
      num=request.Form(“num”)
      set rs=server.CreateObject(“adodb.recordset”)
      sqlstr=”select * from message where id=”&num   (查询message数据表中id字段的值是否与num相等,其中id为数字型)
      rs.open sqlstr,conn,1,3
      if not rs.eof then
      rs.delete
      rs.update
      rs.close
      conn.close
      set rs=nothing
      set conn=nothing
      response.write(“删除成功”)
      end if
      rs.close
      conn.close
      set rs=nothing
      set conn=nothing
      response.write(“删除失败”)
     %>
<6>几个简单的asp对象的讲解
   response对象:服务器端向客户端发送的信息对象,包括直接发送信息给浏览器,重新定向URL,或设置cookie值
   request对象:客户端向服务器提出的请求
   session对象:作为一个全局变量,在整个站点都生效
   server对象:提供对服务器上方法和属性的访问                                               
(a) response对象的一般使用方法
    比如:
       <%
        resposne.write(“hello, welcome to asp!”)
       %>
    在客户端浏览器就会看到  hello, welcome to asp! 这一段文字
      <%
response.Redirect(“www.sohu.com”)
      %>
    如果执行这一段,则浏览器就会自动连接到 “搜狐” 的网址
  关于response对象的用法还有很多,大家可以研究研究
  request对象的一般使用方法
比如客户端向服务器提出的请求就是通过request对象来传递的
列如 :你在申请邮箱的所填写的个人信息就是通过该对象来将
      你所填写的信息传递给服务器的
比如:这是一段表单的代码,这是提供给客户填写信息的,填写完了按
     “提交”传递给request.asp文件处理后再存入服务器数据库
    <form name=”form1″ method=”post” action=”request.asp”>
      <p>
      <input type=”text” name=”user”>
      </p>
      <p>
      <input type=”text” name=”pass”>
      </p>
      <p>
      <input type=”submit” name=”Submit” value=”提交”>
      </p>
</form>
那么request.asp该如何将其中的信息读入,在写入数据库,在这里就要用到
request对象了,下面我们就来分析request.asp的写法
<%
dim name,password    (定义user和password两个变量)
name=request.form(“user”)  (将表单中的user信息传给变量name)
password=request.form(“pass”) (将表单中的pass信息传给变量password)
%>      
通过以上的几句代码我们就将表单中的数据读进来了,接下来我们要做的就是将
信息写入数据库了,写入数据库的方法上面都介绍了,这里就不一一复述了。
(通过上面的学习大家完全可以自己做一个留言版了)

2004年11月12日

1. oncontextmenu=”window.event.returnValue=false” 将彻底屏蔽鼠标右键
<table border oncontextmenu=return(false)><td>no</table> 可用于Table

2. <body onselectstart=”return false”> 取消选取、防止复制

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

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

5. <link rel=”Shortcut Icon” href=”favicon.ico”> IE地址栏前换成自己的图标

6. <link rel=”Bookmark” href=”favicon.ico”> 可以在收藏夹中显示出你的图标

7. <input style=”ime-mode:disabled”> 关闭输入法

8. 永远都会带着框架
<script language=”JavaScript”><!–
if (window == top)top.location.href = “frames.htm”; //frames.htm为框架网页
// –></script>

9. 防止被人frame
<SCRIPT LANGUAGE=JAVASCRIPT><!–
if (top.location != self.location)top.location=self.location;
// –></SCRIPT>

10. 网页将不能被另存为
<noscript><iframe src=*.html></iframe></noscript>

11. <input type=button value=查看网页源代码
onclick=”window.location = “view-source:”+ “http://www.pconline.com.cn”">

12.删除时确认
<a href=”javascript:if(confirm(“确实要删除吗?”))location=”boos.asp?&areyou=删除&page=1″”>删除</a>

13. 取得控件的绝对位置
//Javascript
<script language=”Javascript”>
function getIE(e){
var t=e.offsetTop;
var l=e.offsetLeft;
while(e=e.offsetParent){
t+=e.offsetTop;
l+=e.offsetLeft;
}
alert(“top=”+t+”/nleft=”+l);
}
</script>

//VBScript
<script language=”VBScript”><!–
function getIE()
dim t,l,a,b
set a=document.all.img1
t=document.all.img1.offsetTop
l=document.all.img1.offsetLeft
while a.tagName<>”BODY”
set a = a.offsetParent
t=t+a.offsetTop
l=l+a.offsetLeft
wend
msgbox “top=”&t&chr(13)&”left=”&l,64,”得到控件的位置”
end function
–></script>

14. 光标是停在文本框文字的最后
<script language=”javascript”>
function cc()
{
var e = event.srcElement;
var r =e.createTextRange();
r.moveStart(“character”,e.value.length);
r.collapse(true);
r.select();
}
</script>
<input type=text name=text1 value=”123″ onfocus=”cc()”>

15. 判断上一页的来源
javascript:
document.referrer

16. 最小化、最大化、关闭窗口
<object id=hh1 classid=”clsid:ADB880A6-D8FF-11CF-9377-00AA003B7A11″>
<param name=”Command” value=”Minimize”></object>
<object id=hh2 classid=”clsid:ADB880A6-D8FF-11CF-9377-00AA003B7A11″>
<param name=”Command” value=”Maximize”></object>
<OBJECT id=hh3 classid=”clsid:adb880a6-d8ff-11cf-9377-00aa003b7a11″>
<PARAM NAME=”Command” VALUE=”Close”></OBJECT>
<input type=button value=最小化 onclick=hh1.Click()>
<input type=button value=最大化 onclick=hh2.Click()>
<input type=button value=关闭 onclick=hh3.Click()>
本例适用于IE

17.屏蔽功能键Shift,Alt,Ctrl
<script>
function look(){
if(event.shiftKey)
alert(“禁止按Shift键!”); //可以换成ALT CTRL
}
document.onkeydown=look;
</script>

18. 网页不会被缓存
<META HTTP-EQUIV=”pragma” CONTENT=”no-cache”>
<META HTTP-EQUIV=”Cache-Control” CONTENT=”no-cache, must-revalidate”>
<META HTTP-EQUIV=”expires” CONTENT=”Wed, 26 Feb 1997 08:21:57 GMT”>
或者<META HTTP-EQUIV=”expires” CONTENT=”0″>

19.怎样让表单没有凹凸感?
<input type=text style=”border:1 solid #000000″>

<input type=text style=”border-left:none; border-right:none; border-top:none; border-bottom:

1 solid #000000″></textarea>

20.<div><span>&<layer>的区别?
<div>(division)用来定义大段的页面元素,会产生转行
<span>用来定义同一行内的元素,跟<div>的唯一区别是不产生转行
<layer>是ns的标记,ie不支持,相当于<div>

21.让弹出窗口总是在最上面:
<body onblur=”this.focus();”>

22.不要滚动条?
让竖条没有:
<body style=”overflow:scroll;overflow-y:hidden”>
</body>
让横条没有:
<body style=”overflow:scroll;overflow-x:hidden”>
</body>
两个都去掉?更简单了
<body scroll=”no”>
</body>

23.怎样去掉图片链接点击后,图片周围的虚线?
<a href=”#” onFocus=”this.blur()”><img src=”logo.jpg” border=0></a>

24.电子邮件处理提交表单
<form name=”form1″ method=”post” action=”mailto:****@***.com” enctype=”text/plain”>
<input type=submit>
</form>

25.在打开的子窗口刷新父窗口的代码里如何写?
window.opener.location.reload()

26.如何设定打开页面的大小
<body onload=”top.resizeTo(300,200);”>
打开页面的位置<body onload=”top.moveBy(300,200);”>

27.在页面中如何加入不是满铺的背景图片,拉动页面时背景图不动
<STYLE>
body
{background-image:url(logo.gif); background-repeat:no-repeat;
background-position:center;background-attachment: fixed}
</STYLE>

28. 检查一段字符串是否全由数字组成
<script language=”Javascript”><!–
function checkNum(str){return str.match(//D/)==null}
alert(checkNum(“1232142141″))
alert(checkNum(“123214214a1″))
// –></script>

29. 获得一个窗口的大小
document.body.clientWidth; document.body.clientHeight

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

31.TEXTAREA自适应文字行数的多少
<textarea rows=1 name=s1 cols=27 onpropertychange=”this.style.posHeight=this.scrollHeight”>
</textarea>

32. 日期减去天数等于第二个日期
<script language=Javascript>
function cc(dd,dadd)
{
//可以加上错误处理
var a = new Date(dd)
a = a.valueOf()
a = a – dadd * 24 * 60 * 60 * 1000
a = new Date(a)
alert(a.getFullYear() + “年” + (a.getMonth() + 1) + “月” + a.getDate() + “日”)
}
cc(“12/23/2002″,2)
</script>

33. 选择了哪一个Radio
<HTML><script language=”vbscript”>
function checkme()
for each ob in radio1
if ob.checked then window.alert ob.value
next
end function
</script><BODY>
<INPUT name=”radio1″ type=”radio” value=”style” checked>Style
<INPUT name=”radio1″ type=”radio” value=”barcode”>Barcode
<INPUT type=”button” value=”check” onclick=”checkme()”>
</BODY></HTML>

34.脚本永不出错
<SCRIPT LANGUAGE=”JavaScript”>
<!– Hide
function killErrors() {
return true;
}
window.onerror = killErrors;
// –>
</SCRIPT>

35.ENTER键可以让光标移到下一个输入框
<input onkeydown=”if(event.keyCode==13)event.keyCode=9″>

36. 检测某个网站的链接速度:
把如下代码加入<body>区域中:
<script language=Javascript>
tim=1
setInterval(“tim++”,100)
b=1
var autourl=new Array()
autourl[1]=”www.njcatv.net”
autourl[2]=”javacool.3322.net”
autourl[3]=”www.sina.com.cn”
autourl[4]=”www.nuaa.edu.cn”
autourl[5]=”www.cctv.com”
function butt(){
document.write(“<form name=autof>”)
for(var i=1;i<autourl.length;i++)
document.write(“<input type=text name=txt”+i+” size=10 value=测试中……> =》<input type=text
name=url”+i+” size=40> =》<input type=button value=GO

onclick=window.open(this.form.url”+i+”.value)><br>”)
document.write(“<input type=submit value=刷新></form>”)
}
butt()
function auto(url){
document.forms[0]["url"+b].value=url
if(tim>200)
{document.forms[0]["txt"+b].value=”链接超时”}
else
{document.forms[0]["txt"+b].value=”时间”+tim/10+”秒”}
b++
}
function run(){for(var i=1;i<autourl.length;i++)document.write(“<img src=http://”+autourl+”/”+Math.random()+”

width=1 height=1

onerror=auto(“http://”+autourl+”")>”)}
run()</script>

37. 各种样式的光标
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

38.页面进入和退出的特效
进入页面<meta http-equiv=”Page-Enter” content=”revealTrans(duration=x, transition=y)”>
推出页面<meta http-equiv=”Page-Exit” content=”revealTrans(duration=x, transition=y)”>  
这个是页面被载入和调出时的一些特效。duration表示特效的持续时间,以秒为单位。transition表示使用哪种特效,取值为

1-23:
  0 矩形缩小
  1 矩形扩大
  2 圆形缩小
  3 圆形扩大
  4 下到上刷新
  5 上到下刷新
  6 左到右刷新
  7 右到左刷新
  8 竖百叶窗
  9 横百叶窗
  10 错位横百叶窗
  11 错位竖百叶窗
  12 点扩散
  13 左右到中间刷新
  14 中间到左右刷新
  15 中间到上下
  16 上下到中间
  17 右下到左上
  18 右上到左下
  19 左上到右下
  20 左下到右上
  21 横条
  22 竖条
  23 以上22种随机选择一种

39.在规定时间内跳转
<META http-equiv=V=”REFRESH” content=”5;URL=http://www.51js.com”>

40.网页是否被检索
<meta name=”ROBOTS” content=”属性值”>
  其中属性值有以下一些:
  属性值为”all”: 文件将被检索,且页上链接可被查询;
  属性值为”none”: 文件不被检索,而且不查询页上的链接;
  属性值为”index”: 文件将被检索;
  属性值为”follow”: 查询页上的链接;
  属性值为”noindex”: 文件不检索,但可被查询链接;
  属性值为”nofollow”: 文件不被检索,但可查询页上的链接。

在场景的任意第一帧,右键->动作
加入代码
fscommand(“fullscreen”, “true”);


你了使你的FLASH不被屏幕放大而变形,建议加入
fscommand(“allowscale”, “flase”);