以下是引用片段:
function isValidDate( year, month, day )
{
year = parseInt(year,10);
month = parseInt(month,10);
day = parseInt(day,10);
if (( month==4) || (month==6) || (month==9) || (month==11) )
{ if (( day < 1) || (day > 30) )
{ alert( "日期在1 - 30之间" );
return (false);
}
}
else
{ if ( month!=2 )
{ if ( (day < 1) || (day > 31 ))
{ alert( "日期在1 - 31之间" );
return (false);
}
}
else
{ // month == 2
if ( ( year % 100 ) != 0 && (year % 4 == 0) || ( year % 100 ) == 0 && ( year % 400) == 0 )
{ if ( day > 29 )
{ alert( "日期在1 - 29之间" );
return (false);
}
}
else
{ if ( day > 28 )
{ alert( "日期在1 - 28之间" );
return (false);
}
}
}
}
return (true);
}
function isIdCardNo(s)
{
if ((s.length <15)||(s.length ==16)||(s.length ==17)||(s.length >18)){
window.alert("身份证位数不正确!");
return false;
}
slen=s.length-1;//身份证除最后一位外,必须为数字!
for (i=0; i<slen; i++)
{
cc = s.charAt(i);
if (cc <"0" || cc >"9")
{
return false;
}
}
//提取年月日
var strYear = parseInt(s.substring(6,10))
var strMonth = parseInt(s.substring(10,12))
var strDay = parseInt(s.substring(12,14))
// Form1.year的代码根据个人情况变动
var vYear=parseInt(document.Form1.year.options[document.Form1.year.selectedIndex].text)
var vMonth=parseInt(document.Form1.month.options[document.Form1.month.selectedIndex].text)
var vDay=parseInt(document.Form1.day.options[document.Form1.day.selectedIndex].text)
//判断输入的出生年月日是否是正确的日期
if(!isValidDate(strYear,strMonth,strDay))
{
window.alert("请检查身份证是否输入正确!");
return false;
}
//判断是否与出生年月日吻合
if((strYear!=vYear)||(strMonth!=vMonth)||(strDay!=vDay))
{
window.alert("身份证号与输入的出生年月日不符!");
return false;
}
//document.Form1.ceshi.value=strMonth
//document.Form1.ceshi2.value=vMonth
return true;
}
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../conn.asp"-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>Untitled Document</title>
<STYLE type=text/css>TD {
FONT-SIZE: 12px
}
SELECT {
FONT-SIZE: 12px
}
INPUT {
FONT-SIZE: 12px
}
A {
TEXT-DECORATION: none
}
A:hover {
COLOR: #c90000; TEXT-DECORATION: none
}
</STYLE>
<SCRIPT LANGUAGE="JavaScript">
<!--
//window.onload = initPage;
//function initPage()
//{
// btnPutUp.onclick = putUp;
// btnPutDown.onclick = putDown;
// btnGoUp.onclick = goUp;
// btnGoDown.onclick = goDown;
//}
function putUp()
{
var strTempValue;
var strTempText;
var intCurIndex;
intCurIndex = document.paixu.sltFruit.selectedIndex;
//alert("intCurIndex: " + intCurIndex);
if (intCurIndex > 0)
{
strTempValue= document.paixu.sltFruit.options.item(intCurIndex).value;
strTempText = document.paixu.sltFruit.options.item(intCurIndex).text;
strTemp=document.paixu.sltFruit.options.item(intCurIndex - 1).value
// alert(strTempText + " - " + strTempValue);
document.paixu.sltFruit.options.item(intCurIndex).value = document.paixu.sltFruit.options.item(intCurIndex - 1).value;
document.paixu.sltFruit.options.item(intCurIndex).text= document.paixu.sltFruit.options.item(intCurIndex - 1).text;
document.paixu.sltFruit.options.item(intCurIndex - 1).value= strTempValue;
document.paixu.sltFruit.options.item(intCurIndex - 1).text= strTempText;
document.paixu.sltFruit.selectedIndex = intCurIndex - 1;
intCur=intCurIndex - 1
//shang=eval("document.paixu."+"slt"+intCurIndex+".value")-1;
eval("document.paixu."+"slt"+intCurIndex+".value=strTemp")
//xia=eval("document.paixu."+"slt"+intCur+".value")-(-1);
eval("document.paixu."+"slt"+intCur+".value=strTempValue")
//alert( ss);
//document.paixu.slt"+intCurIndex+".value=eval("document.paixu."+"slt"+intCurIndex+".value")-1;
//document.paixu."slt"+intCurIndex+".value"=document.paixu.("slt"+intCurIndex).value-1;
}
}
function putDown()
{
var strTempValue;
var strTempText;
var intCurIndex;
var intIndexCount;
intCurIndex = document.paixu.sltFruit.selectedIndex;
intIndexCount = document.paixu.sltFruit.length;
//alert("intCurIndex: " + intCurIndex);
//alert("intIndexCount: " + intIndexCount);
if (intCurIndex < intIndexCount - 1)
{
strTempValue= document.paixu.sltFruit.options.item(intCurIndex).value;
strTempText = document.paixu.sltFruit.options.item(intCurIndex).text;
strTemp=document.paixu.sltFruit.options.item(intCurIndex +1).value
//alert(strTempText + " - " + strTempValue);
document.paixu.sltFruit.options.item(intCurIndex).value = document.paixu.sltFruit.options.item(intCurIndex + 1).value;
document.paixu.sltFruit.options.item(intCurIndex).text = document.paixu.sltFruit.options.item(intCurIndex + 1).text;
document.paixu.sltFruit.options.item(intCurIndex + 1).value= strTempValue;
document.paixu.sltFruit.options.item(intCurIndex + 1).text = strTempText;
document.paixu.sltFruit.selectedIndex = intCurIndex + 1;
intCur=intCurIndex + 1
//shang=eval("document.paixu."+"slt"+intCurIndex+".value")-1;
eval("document.paixu."+"slt"+intCurIndex+".value=strTemp")
//xia=eval("document.paixu."+"slt"+intCur+".value")-(-1);
eval("document.paixu."+"slt"+intCur+".value=strTempValue")
}
}
function goUp()
{
var intCurIndex;
intCurIndex = sltCountry.selectedIndex;
if (intCurIndex > 0)
sltCountry.selectedIndex = intCurIndex - 1;
}
function goDown()
{
var intCurIndex;
var intIndexCount;
intCurIndex = sltCountry.selectedIndex;
intIndexCount = sltCountry.length;
if (intCurIndex < intIndexCount - 1)
sltCountry.selectedIndex = intCurIndex + 1;
}
//-->
</SCRIPT>
<body>
<%'存储数据库的过程
n=trim(request("num"))
if n<>"" then
i=1
y=0
do while not n<0
conn.execute("update BigClass_New set paixu="&i&" where BigClassID="&trim(request(("slt")&y))&"")
'我用的办法是在数据库表里加个字段定义排序,然后显示时就靠它了
'trim(request(("slt")&y))是动态获取input的值,做循环的的时候
'都这么用
n=n-1
i=i+1
y=y+1
loop
response.Write("<SCRIPT>alert('修改成功');location='News_ClassManage.asp';</SCRIPT>")
'response.End()
else
%>
<div align="center">
<table class="border" border="0" cellspacing="2" width="620" cellpadding="0" style="word-break:break-all">
<%
Set rs= Server.CreateObject("ADODB.Recordset")
sql="select * from BigClass_New order by paixu"
rs.open sql,conn,1,1
if not rs.eof then
'我的数据库表名叫BigClass_New%>
<form name="paixu" method="post" action="News_ClassPaixu.asp">
<tr bgcolor="#A4B6D7" class="title">
<td width="50%" height="55" align="right">
<div align="right">
<SELECT NAME="sltFruit" size="<%=rs.recordcount%>">
<%do while not rs.eof %>
<OPTION VALUE="<%=trim(rs("BigClassID"))%>"><%=trim(rs("BigClassName"))%></OPTION>
<%rs.movenext
loop%>
</SELECT>
</div>
</td>
<td width="40" height="25" align="center">
<INPUT TYPE="BUTTON" ID="btnPutUp" VALUE="上移" onClick="javascript:return putUp();">
<INPUT TYPE="BUTTON" ID="btnPutDown" VALUE="下移" onClick="javascript:return putDown();">
</td>
</tr>
<%rs.movefirst
i=0
do while not rs.eof %>
<input type="hidden" name="slt<%=i%>" value="<%=trim(rs("BigClassID"))%>">
<%
rs.movenext
i=i+1
loop%>
<input type="hidden" name="num" value="<%=i-1%>">
<tr bgcolor="#A4B6D7" class="title">
<td width="560" height="55" align="center" colspan="2">
<input type="submit" name="save" value="保存">
</td>
</tr>
</form>
<%else%>
<tr bgcolor="#A4B6D7" class="title">
<td width="36" height="55" align="center" colspan="2">
<%response.Write("请先输入大类!")%>
</td>
</tr>
</table>
</div>
<%end if%>
<%end if%>
</body>
</html>
| 欢迎光临 站长论坛 (http://tzlink.com/bbs/) | Powered by Discuz! X3.2 |