📄 time.asp

📁 物流管理系统,可以用于中小企业,建立自己的内部物流管理.

💻 ASP

字号:

<%@ codepage ="936" %>
<%
if instr(session("flag_fyadmin"),"08")=0 then
response.redirect "../login.asp"
response.end
end if
%><!--#include file="../../inc/config.asp"-->
<!--#include file="../../conn/dbconn2.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>注册会员审核</title>
<LINK href="../Style.css" rel=stylesheet type=text/css>
</head>
<%
IF request("action")="save" Then
   call save()
Else
   call main()
End If
sub main()
if not isEmpty(request("id")) then
   userid=request("id")
else
   userid=1
end if
Set rs= Server.CreateObject("ADODB.Recordset") 
sql="select * from qyml where id="&userid&""
rs.open sql,conn,1,1
%>
<CENTER>
<FORM action=time.asp method=post name=form1>
<INPUT name=action type=hidden value="save">
<INPUT name=userid type=hidden value="<%=userid%>">
<center>请确认你正在给<font color=green><b><%=rs("user")%></b></font>充值,充值后变成享受收费会员</center>
<TABLE align=center border=0 cellPadding=3 cellSpacing=0 width=400>
  <TBODY>
  <TR>
    <TD>
      <INPUT name=begindate type=text size=30 value="<%=rs("begindate")%>">
    </TD>
    <TD>
     <INPUT name=enddate type=text size=30 value="<%=rs("enddate")%>">
    </TD>
   </TR>
  <TR>
    <TD>
会员开始时间<font color=red>[按格式填写!!]</font>
    </TD>
    <TD>
会员结束时间<font color=red>[按格式填写!!]</font>
    </TD>
   </TR>
    <TR>
    <TD height="40" align="center" colspan=2>
    <INPUT type=submit value='确&nbsp;&nbsp;定' name=Submit2>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
    <input type="button" value="返&nbsp;&nbsp;回" name="B4" onclick="javascript:window.close();">
    </TD>
  </TR>
  </TBODY>
</TABLE>
</form>
<%
end sub
sub save()
    set rs=server.createobject("adodb.recordset")
    sql="select begindate,enddate,uflag,hybz,flag from qyml where id="&request("userid")&""
    rs.open sql,conn,3,3
	rs("begindate")=request("begindate")
	rs("enddate")=request("enddate")
	rs("uflag")=1
	rs("hybz")=1
	rs("flag")=0
    rs.update
    response.write "<br><center>"+"操作成功，请<a href=javascript:window.close();><font color=#ff000>关闭窗口</font></a>进行其他操作。"
end sub
rs.close
set rs=nothing
conn.close
set conn=nothing
%></body></html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -