📄 newpath.asp
字号:
<!--#include file="asp/opendb.asp"-->
<!--#include file="asp/sqlstr.asp"-->
<!--#include file="asp/checkuser.asp"-->
<!--#include file="asp/top.asp"-->
<%
set conn=opendb("oabusy","conn","accessdsn")
if request("submit")="提交" then
meetword=request("meetword")
'meethtml=request("meethtml")
fileword=request("fileword")
'filehtml=request("filehtml")
url=request("url")
path=request("path")
homename=request("homename")
pagecount=request("pagecount")
sql="select * from path"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1
if not rs.eof and not rs.bof then
rs.Close
set rs=nothing
sql="delete * from path"
conn.execute sql
end if
sql = "Insert Into path(meetword,fileword,path,url,homename,pagecount) Values( "
sql=sql & SqlStr(meetword) & ","
'sql = sql & SqlStr(meethtml) & ", "
sql = sql & SqlStr(fileword)& ", "
'sql = sql & SqlStr(filehtml)& ","
sql = sql & SqlStr(path)& ", "
sql = sql & SqlStr(url)& ", "
sql = sql & SqlStr(homename)& ", "
sql = sql & sqlstr(pagecount) & ")"
' sql="update path set meetword='"&meetword&"',meethtml='"&meethtml&"',fileword='"&fileword&"',"
' sql=sql & "filehtml='"&filehtml&"', url='"&url&"',path='"&path&"',homename='"&homename&"',"
' sql=sql &"pagecount="&pagecount&" where id=0"
conn.Execute sql
%>
<!--#include file="asp/valuser.asp"-->
<font color="red">文件会议系统数据添加成功！<a href='<%=oabusyuserurl%>','_parent'>重新登录</a></font>
<%
end if
%> <!--#include file="asp/checkuser.asp"-->
<br>
<br>
<br>
<% set rs=server.CreateObject("adodb.recordset")
sql="select * from path"
rs.open sql,conn,1
if not rs.eof and not rs.bof then
meetword=rs("meetword")
meethtml=rs("meethtml")
fileword=rs("fileword")
filehtml=rs("filehtml")
url=rs("url")
path=rs("path")
homename=rs("homename")
pagecount=rs("pagecount")
rs.close
end if
set rs=nothing
%>
<html>
<script Language="JavaScript">
function form_check(){
if(document.form2.meetword.value==""){window.alert("会议文档上传路径不能为空");document.form2.meetword.focus();return (false);}
//if(document.form2.meethtml.value==""){window.alert("会议HTML上传路径不能为空");document.form2.meethtml.focus();return (false);}
if(document.form2.fileword.value==""){window.alert("文件文档上传路径不能为空");document.form2.fileword.focus();return (false);}
// if(document.form2.filehtml.value==""){window.alert("文件HTML上传路径不能为空");document.form2.filehtml.focus();return (false);}
if(document.form2.url.value==""){window.alert("主页URL");document.form2.url.focus();return (false);}
if(document.form2.path.value==""){window.alert("主页绝对地址不能为空");document.form2.path.focus();return (false);}
if(document.form2.homename.value==""){window.alert("系统名称不能为空");document.form2.homename.focus();return (false);}
if(document.form2.pagecount.value==""){window.alert("每页显示条数");document.form2.pagecount.focus();return (false);}
}
</script>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<link rel="stylesheet" href="css/css.css">
<style type="text/css">
<!--
.style1 {color: #FF0000}
-->
</style>
</head>
<body topmargin="5" leftmargin="0">
<center>
<b>文件会议系统基本数据</b>
</center>
<center>
<form method=post name=form2 action="newpath.asp" onsubmit="">
<table width="80%" border="0" cellpadding="1" cellspacing="0" align="center">
<tr>
<td>
<table width="100%" border="0" cellpadding="1" cellspacing="1">
<tr>
<td>
<table width="100%" border="0" bgcolor="#cccccc" cellpadding="0" cellspacing="1">
<tr>
<td colspan="2"> </td>
</tr>
<tr bgcolor="#eeeeee">
<td height="28" align="center">文档上传目录：</td>
<td height="28">
<input type=text name="meetword" size=58 value="<%=meetword%>" style='border:1 solid #000000;background:#ffffff'>
<font color="#0000FF"><b>会议</b></font> </td>
</tr>
<tr bgcolor="#eeeeee">
<td height="28" align="center"><span class="style1">(目录必须存在)</span></td>
<td> </td>
</tr>
<tr bgcolor="#eeeeee">
<td height="28" align="center">
<p>文档上传目录：</p> </td>
<td height="2">
<input type=text name="fileword" size=58 value="<%=fileword%>" style='border:1 solid #000000;background:#ffffff'>
<font color="#0000FF"><b>文件</b></font> </td>
</tr>
<tr bgcolor="#eeeeee">
<td height="28" align="center"><span class="style1">(目录必须存在)</span></td>
<td height="7"> </td>
</tr>
<tr bgcolor="#eeeeee">
<td height="28" align="center">
主页路径URL：</td>
<td>
<input type="text" name="url" size="58" value="<%=url%>" style='border:1 solid #000000;background:#ffffff'> </td>
</tr>
<tr bgcolor="#eeeeee">
<td height="28" align="center">主页绝对路径：</td>
<td>
<input type="text" name="path" size="58" value="<%=path%>" style='border:1 solid #000000;background:#ffffff'> </td>
</tr>
<tr bgcolor="#eeeeee">
<td height="28" align="center"> 系统名称：</td>
<td>
<input type="text" name="homename" value="<%=homename%>" size="58" style='border:1 solid #000000;background:#ffffff'> </td>
</tr>
<tr bgcolor="#eeeeee">
<td height="28" align="center">文件条数/页：</td>
<td>
<input type="text" name="pagecount" value="<%=pagecount%>" size="10" style='border:1 solid #000000;background:#ffffff'>
条</td>
</tr>
</table>
</table></table></table>
<br>
<input type="submit" name="submit" value="提交" onclick="return form_check();"style='border:1 solid #000000;background:#999900'>
</form>
</center>
</body>
</html>
<% conn.close
set conn=nothing%><!--#include file="footer.htm"-->⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -