📄 fawen.asp
字号:
<!--#include file="check.asp"-->
<!--#INCLUDE FILE="connect.asp" -->
<%
on error resume next
function MakeName()
dim fname
fname = now()
fname = replace(fname,"-","")
fname = replace(fname," ","")
fname = replace(fname,":","")
fname = replace(fname,"PM","")
fname = replace(fname,"AM","")
fname = replace(fname,"上午","")
fname = replace(fname,"下午","")
fname = int(fname) + int((10-1+1)*Rnd + 1)
MakeName=fname
end function
response.write "<html><head><title></title>"
response.write "<meta http-equiv='Content-Type' content='text/html; charset=gb2312'>"
if Request.ServerVariables("Request_Method")="POST" and request("flag")="2" then
set bzwb=server.createobject("oaserver.fawen")
bzwb.main(conn)
response.write("<script language=javascript>alert('提交公文成功！')</script>")
response.write("<script>document.location='fawen.asp'</script>")
response.end
end if
documentname=makename&".doc"
LocalFile="fawen.asp"
TempleFile="loadtemple.asp"
SaveFile="savedoc.asp"
PsoFile="pso.asp"
HttpUrl="http://" & Request.ServerVariables("HTTP_HOST") & Request.ServerVariables("SCRIPT_NAME")
HttpUrl=Left(HttpUrl,Len(HttpUrl)-Len(LocalFile))
TempleUrl=HttpUrl & TempleFile
SaveUrl=HttpUrl & SaveFile
PsoUrl=HttpUrl & PsoFile
response.write "<link rel='stylesheet' href='fawen.css' type='text/css'></head>"
response.write "<body leftmargin='0' topmargin='0' marginwidth='0' marginheight='0' oncontextmenu='return false'>"
%>
<script language="javascript" src="fawen.js"></script>
<script language=javascript>
function checkform() {
if (form.wenhao.value=="") {
alert("请填写发文号！")
form.wenhao.focus()
return false
}
if (form.mainsend.value=="") {
alert("你的主送单位没有填写！")
form.mainsend.focus()
return false
}
if (form.title.value=="") {
alert("你没有填写发文主题！")
form.title.focus()
return false
}
if (form.hiddenselect.value=="") {
alert("你没有选择办理人！")
form.username.focus()
return false
}
if (form.clicknum.value=="") {
alert("你还没有起草公文正文呢！")
return false;
}
if(document.form.file.value!="") {
var isValid=1
var temp=document.form.file.value
if(temp.indexOf(".")==-1) {isValid=0}
if(temp.indexOf("\\")==-1) {isValid=0}
if (isValid==0) {alert("附件路径有误！");document.form.file.focus();return false;}
}
if (!confirm("您是否要提交公文呢？"))
{return false;}
else
{ SaveUrl="<%=SaveUrl%>"
FileName="<%=documentname%>"
FileSize="<%=session("MaxSize")%>"
FilePath="" //为空表示文件在默认位置
result=form.web.upload(SaveUrl,FileName,FilePath,FileSize) //上传公文到数据库
if (!result)
{
alert("找不到公文或与服务器连接失败！")
return false;
} //公文上传失败，返回起草公文页面
if(document.form.file.value!="") { //如果有附件上传附件
var result=false
var PsoUrl="<%=PsoUrl%>" //保存附件文件url路径
var MaxSize="<%=session("MaxSize")%>" //限制上传附件文件的大小
var PsoPath=document.form.file.value //定义附件路径
var PsoFile //定义附件的文件名
var PsoType //定义附件的扩展名
PsoFile=PsoPath
while(PsoFile.indexOf("\\")>0) //获得附件的文件名
{
i = PsoFile.indexOf("\\")
PsoFile = PsoFile.substring(i + 1, PsoFile.length);
} //获得附件的文件名
PsoPath=PsoPath.substring(0,PsoPath.lastIndexOf("\\")) //获得附件的路径
PsoType=PsoFile
if (PsoType.lastIndexOf(".")>0) //获得附件的扩展名
{
i = PsoType.lastIndexOf(".")
PsoType = PsoType.substring(i + 1, PsoType.length);
}
result=form.web.upload(PsoUrl,PsoFile,PsoPath,MaxSize) //向服务器上传附件
document.form.fujian.value=PsoFile
if (!result)
{
alert("你选择的附件不存在或为空文件！")
document.form.fujian.value=""
document.form.file.focus();
return false; //上传附件失败，返回起草公文页面
}
document.form.fujian.value=PsoFile
document.form.fujiantype.value=PsoType
form.web.delfile() //删除临时文件
} //上传附件完毕
} //上传公文与附件完毕
}
function OpenWindows() //下载打开公文函数
{
if(document.form.clicknum.value=="") //如果ckicknum的值为空说明还没有下载公文
{
var result
doc=document.form.temple.value
if (doc=="")
{
alert("在模板库里没有模板，请与管理员联系");
return false;
}
HTTPURL="<%=TempleUrl%>"+"?id="+doc
result=form.web.download(HTTPURL,"<%=documentname%>"); //判断下载文件是否成功
if (!result)
{
alert("打开公文模板失败，请与管理员联系！")
return false;
}
else {
document.form.clicknum.value="writedocument"
document.form.temple.disabled="true"
}
}
var url="writeword.asp?documentname="+"<%=documentname%>" //调用writeword.asp来打开文件
OpenWord(url)
return false;
}
</script>
<%
response.Write "<form name='form' method='POST' action='fawen.asp'>"
set bzwb=server.createobject("oaserver.fawen")
bzwb.main1(conn)
%>
<!--#include file="turnonefawen.asp"-->
<%
response.Write "</td></tr><tr>"
response.Write "<td valign='bottom' height='35' class='bblue' align='center'> 下一流程："
response.Write "<select name='typed'><option value='1'>核稿</option>"
response.Write "<option value='2'>审核</option><option value='4'>签发</option></select>"
response.Write "<input class=lineinput type='text' name='username' size='14' maxlength='20' value='请选择办理人' onClick='checkpeople()' style='cursor:hand'>"
response.Write " <input type='image' name='send' value='提交公文' onClick='return checkform()' src='images/addpapergif.gif' alt='提交公文'>"
response.Write " <input type='image' name='send2' value=' 返 回 ' onClick='history.go(-1);return false;' src='images/fanhuigif.gif' alt='返回'>"
response.Write "</td><td valign='bottom' height='35'>"
response.Write "<input type='hidden' name='hiddenselect'><input type='hidden' name='hiddennum' value='0'>"
response.Write "<input type='hidden' name='single' value='1'><input type='hidden' name='flag' value='2'>"
response.Write "<input type='hidden' name='fujian'><input type='hidden' name='fujiantype'>"
response.write "<input type='hidden' name='documentname' value='"&documentname&"'><input type='hidden' name='clicknum'>"
response.Write "</td></tr><tr><td valign='top' height='25' colspan='3'><div align='left'>"
response.Write "<table width='100%' border='0' cellspacing='0' cellpadding='0' height='100%'>"
response.Write "<tr><td width='90%'> </td><td width='10%'>"
response.Write "<object classid='clsid:8C9AA244-AC33-47F9-8968-CC114654A6EC' codebase='web.ocx' id='web' width='1' height='1'>"
response.Write "<param name='_ExtentX' value='847'><param name='_ExtentY' value='847'>"
response.Write "</object></td></tr></table>"
response.Write "</div></td></tr></table></form>"
response.Write "</body></html>"
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -