asp源码值班记录的简单介绍

文章目录：

• 1、如何编写asp（Access ）每天自动更换的值班表代码？
• 2、ASP 做每日值班提示的代码，急求！！谢谢!!
• 3、ASP值班代码修改
• 4、请问用ASP或javascript写这样的值班表该如何写？
• 5、如何用ASP+ACCESS做一个值班表

如何编写asp（Access ）每天自动更换的值班表代码？

不就20人嘛，用什么数据库呢，把下面的代码放在你的主页需要的位置就可以了：

今日值班：

script type=text/javascript

function jinrizhiban(){

//把需要排班的姓名按照排班顺序写在下面一行里面就可以

var pers=new Array('张三','李四','同志1','同志2','同志3','同志4','同志5','同志6');

//调整下面的调整因子，能控制启用程序的那天由谁值班，以后都能自动更新显示

var ctrl_param=1;

var now=new Date();

var days=parseInt(now.getTime()/24/3600/1000);

return pers[(days+ctrl_param) % pers.length];

}

document.write(jinrizhiban());

/script

ASP 做每日值班提示的代码，急求！！谢谢!!

%

dim conn

set conn = server.createobject("adodb.connection")

'连接数据库，要注意duty.mdb的路径问题

conn.open = "provider=microsoft.jet.oledb.4.0;" "data source = " server.mappath("duty.mdb")

Function getDutyUserName(d)

Dim rs

sql="select [user] from [duty] where datediff('d',[date],'" d "')=0"

Set rs=conn.execute(sql)

While Not rs.eof

getDutyUserName=getDutyUserName "," rs("user")

rs.movenext

Wend

If Len(getDutyUserName)0 Then

getDutyUserName=Mid(getDutyUserName,2,Len(getDutyUserName)-1)

End If

End Function

%

%

'调用

response.write("今日值班：" getDutyUserName(Date()))

%

ASP值班代码修改

%

dim i

dim datestrat,weekdaystr,weekdays

weekdaystr="日,一,二,三,四,五,六"

weekdays=split(weekdaystr,",")

i=4

datestart = "2010-03-20"

redim job(i-1)

job(0) = "br值班领导：薛晓明"

job(1) = "br值班领导：丁华洲"

job(2) = "br值班领导：冯晓延"

job(3) = "br值班领导：范广玮"Response.write date()"br"job((date()-cdate(datestart)) mod i ) " font color=red星期"weekdays(Weekday(now())-1)"/font"

%

请问用ASP或javascript写这样的值班表该如何写？

不用这么复杂，给你一个通用的值班代码，是我刚给客户用的，功能很强，一个js一个asp后台，可以随意调整值班周期

图没发出来

如何用ASP+ACCESS做一个值班表

可以给你提供个思路，具体操作还得你自己来。1、数据表设计可以设计两张表，分别是值班领导（leader）和陪同人员（companion）。在leader表内设置字段如下：ID(int,autocreat),l_Name(text,20),Post(text,50),Charge(text,100),Duty(int,1),Dutys(int,10)分别对应领导ID，姓名，职务，分管工作，值日时间，值班次数，特别是值日时间建议用整数1、2、3、4、5来表示星期一到星期五，以提高数据读取效率。陪同人员表设计请参照值班领导表字段进行设计。2、后台实现 2.1、设计程序获取当前日期和星期天数（Now(),week()） 2.2、设计程序对数据库操作，以值班天数正序排出领导值班次序，例如：星期二值班的领导可能不至一位，按值班天数排序就可以知道，同样是星期二值班，值班天数多的那个领导说明上个星期二已经值过班了，如果天数刚好相等，那就以ID排序，直接读取第一个领导信息就行了。代码实现：（“select * top 1 from leader where duty=2 order by asc“）