您的位置：首页 > 编程语言 > ASP

经典实用的基础asp程序整理

2010-06-20 13:36 417 查看

1、关闭窗口在图片的连接上写

javascript:window.close();

2、用VBScript弹出提示框然后跳转到指定页面

<%

response.write "<script language='javascript'>" & chr(13)

response.write "alert('成功删除！');" & Chr(13)

response.write "window.document.location.href='set2.asp';"&Chr(13)

response.write "</script>" & Chr(13)

Response.End

%>

3、页面摘入等待。。。。脚本说明:

　　把如下代码加入<head>区域中

　　<SCRIPT LANGUAGE="JavaScript">

　　document.write("<font size=6 color=blue face='楷体_GB2312'><B>正在载入心月湖首页,请稍等..</B></font>");

　　window.clear;

　　window.location.href="http://www.ewyu.com";

　　</SCRIPT>

4.让页面五秒钟后自动关闭

<script>

setTimeout("window.close()",5000);

</script>

5.对操作再次确认的实现方法

想对某项操作给予再次确认，如删除,可以用下面的JS实现。

<script language="JavaScript">

function Del(){if(confirm("您确定要删除?")){return true;}return false;}

</script>

然后在你删除的连接上加上下面的语句

onClick="return Del()"

如<a href="newdel.asp?id=<%=rs("newsid")%> onClick="return Del()">删除</a>

6.对某些项一定要填定的实现方法

方法一VBSCRIPT

<SCRIPT LANGUAGE="VBSCRIPT">

Sub Checkdata()

If Attend.song1.Value = Empty Then

Window.Alert "“歌手”一定要填写哦..."

Exit Sub

End if

If Attend.song2.Value = Empty Then

Window.Alert "“歌名”一定要填写哦..."

Exit Sub

End if

If Attend.song3.Value = Empty Then

Window.Alert "“文件URL”一定要填写哦..."

Exit Sub

End if

If Attend.song4.Value = Empty Then

Window.Alert "“添加者”一定要填写哦..."

Exit Sub

End if

Attend.Submit

End sub

</SCRIPT>

其中Attend是表名，song1等等是文本域的名，最后在提交按钮加参数onClick="Checkdata"

如 <input name="button" type="button" onClick="Checkdata" value="提交" />

方法二JSSCRIPT

<script language="JavaScript">

function CheckForm()

{

if (formadduser.UserNameAdd.value=="")

{

alert("用户名称不能为空！");

formadduser.UserNameAdd.focus();

return false;

}

if (formadduser.PasswdAdd1.value.length<6 || formadduser.PasswdAdd1.value.length>15 )

{

alert("密码必须大于六位和小于15位!");

formadduser.PasswdAdd1.focus();

return false;

}

if (formadduser.PasswdAdd1.value!=formadduser.PasswdAdd2.value)

{

alert("密码输入不匹配,请检查！");

formadduser.PasswdAdd1.focus();

return false;

}

}

</script>

其中formadduser是表名，UserNameAdd等等是文本域的名，最后在表单<form>中加参数onSubmit="return CheckForm()"

如<FORM METHOD=POST name="formadduser" ACTION="UserADD_C.asp" onSubmit="return CheckForm()">

内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理

标签：

相关文章推荐

新的分享

章节导航