modiplaybill.asp

超炫电台程序开发了两个版本了

<!--#include file="../Connections/dns.asp" -->
<%
id=request("id")
playbill=request("playbill")
pbdate=request("pbdate")
njname=request("njname")
yg=request("yg")

if yg="星期日" then 
pbtime=date()
end if
if yg="星期一" then
pbtime=date() + 1
end if 
if yg="星期二" then
pbtime=date() + 2
end if
if yg="星期三" then
pbtime=date() + 3
end if
if yg="星期四" then
pbtime=date() + 4
end if
if yg="星期五" then
pbtime=date() + 5
end if
if yg="星期六" then
pbtime=date() + 6
end if

sql ="update playbill set njname ='" & njname & "' where id = " & id
rs.open sql,conn,1,3
sql ="update playbill set pbdate ='" & pbdate & "' where id = " & id
rs.open sql,conn,1,3
sql ="update playbill set playbill ='" & playbill & "' where id = " & id
rs.open sql,conn,1,3
sql ="update playbill set yg ='" & yg & "' where id = " & id
rs.open sql,conn,1,3
sql ="update playbill set pbtime =#" & pbtime & "# where id = " & id
rs.open sql,conn,1,3


Response.Redirect "playbill.asp"

%>