fymain.asp

来自「Lirong网络办公系统」· ASP 代码 · 共 64 行

ASP
64 行
字号 
<%response.expires=0%>
<%Response.Buffer=true%>
<!-- #include file="../conn_lr.asp"-->
<!-- #include file="../css.asp"-->
<%
oabusyname=session("oabusyname")
oabusyusername=session("oabusyusername")
oabusyuserdept=session("oabusyuserdept")
oabusyuserlevel=session("oabusyuserlevel")
if oabusyusername="" then 
	response.write("<script language=""javascript"">")
	response.write("window.top.location.href='../../default.asp';")
	response.write("</script>")
	response.end
end if
%>

<html>

<head>

<title>Untitled Document</title>

<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

</head>

<body bgcolor="#FFFFFF" text="#000000">

<form name="d" method="post" action="../dbdisp/disp.asp">
<input type="hidden" name="opFlag" value="">
<%
set rs=server.createobject("adodb.recordset")
sql="select * from userinf where username='" & oabusyusername&"'"
rs.open sql,oconn,1,1
allow_car_manage=rs("allow_car_manage")     
if allow_car_manage="yes" then
%> 
    <input type="hidden" name="LinkFlag" value="000111">
    <input type="hidden" name="EnabledAddNew" value="yes">
	<%  else  %>
	<input type="hidden" name="LinkFlag" value="000100">
    <input type="hidden" name="EnabledAddNew" value="no">
   <%  end if  %>

<input type="hidden" name="EditFile" value="../carmanage/fyedit.asp">
<input type="hidden" name="mFiledsCount" value="8">
<input type="hidden" name="mFileds" value="(select Cchexin from carmanage where carmanage.Cbianhao=carfy.Cnumber),(select Cchepai from carmanage where carmanage.Cbianhao=carfy.Cnumber),Criqi,Cshouzhi,Cfeiyong,Cpeople,Cjianshu,Cbeizhu,">
<input type="hidden" name="mFiledsCaptions" value="车型,车牌,日期,收支,费用(元),经办人,简述,备注,">
<input type="hidden" name="mFiledsWidths" value=",,,,,0,0,0,">
<input type="hidden" name="mSortBy2" value="Criqi">
<input type="hidden" name="DispFile" value="../carmanage/fydisp.asp">
<input type="hidden" name="mTable" value="carfy">
<input type="hidden" name="mTitle" value="费用管理">
<input type="hidden" name="mImage" value="../images/car.gif">
</form>

<script language=jscript>
document.all.d.submit()
</script>

</body>

</html>

fymain.asp - 源码说明

本页面展示了「Lirong网络办公系统」中的 fymain.asp 源码文件，采用 ASP 编程语言编写，共 64 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与Lirong相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?