《留言版代码.》.docVIP

ASP留言板源代码：有主页，回复和删除三个版面主程序 html head title业牧粞员?lt;/title meta http-equiv=Content-Type content=text/html; charset=gb2312 /head script language=VBScript sub check() if form.userid.value=empty then msgbox 请输入您的昵称！ focusto(0) exit sub end if if form.email.value=empty then msgbox 请输入您的E-mail地址！ focusto(1) exit sub end if if instr(form.email.value, @)=0 then msgbox 您的E-mail地址不正确，是不是记错了？再想想！ focusto(1) exit sub end if if form.content.value=empty then msgbox 请输入您的留言内容！ focusto(5) exit sub end if form.submit end sub sub focusto(x) document.form.elements(x).focus() end sub /script body bgcolor=#CCFFCC