具有计划、任务、通告、公文、员工档案、等网络办公功能
源代码在线查看: add.asp
//
// 力天2002网络办公系统
// Copyright (c) 深圳市力天软件开发有限公司
// http://www.ebexpert.net
//
// 文件名 : add.asp
// 描述 : 衣食住行数据添加与提交
// 版本 :
// 作者 : zyh
// 备注 :
if hname"" then
city=trim(request("city"))
phone=trim(request("phone"))
fax=trim(request("fax"))
address=trim(request("address"))
remark=trim(request("remark"))
Set conn=Server.CreateObject("ADODB.Connection")
DBPath1=server.mappath("../access.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath1
conn.Execute "insert into pubfood (hname,city,phone,fax,address,remark) values ('" & hname & "','" & city & "','" & phone & "','" & fax & "','" & address & "','" & remark & "')"
set conn=nothing
%>
window.close();
window.opener.parent.frames("main").document.location ="index.asp?add=judge";
添加衣食住行
onLoad="javaScript:document.form.hname.focus()">
function FrontPage_Form1_Validator(theForm)
{
if (theForm.hname.value == "")
{
alert("请在 hname 域中输入值。");
theForm.hname.focus();
return (false);
}
if (theForm.hname.value.length > 50)
{
alert("在 hname 域中,请最多输入 50 个字符。");
theForm.hname.focus();
return (false);
}
if (theForm.city.value == "")
{
alert("请在 city 域中输入值。");
theForm.city.focus();
return (false);
}
if (theForm.city.value.length > 30)
{
alert("在 city 域中,请最多输入 30 个字符。");
theForm.city.focus();
return (false);
}
if (theForm.phone.value == "")
{
alert("请在 phone 域中输入值。");
theForm.phone.focus();
return (false);
}
if (theForm.phone.value.length > 30)
{
alert("在 phone 域中,请最多输入 30 个字符。");
theForm.phone.focus();
return (false);
}
if (theForm.address.value == "")
{
alert("请在 address 域中输入值。");
theForm.address.focus();
return (false);
}
if (theForm.address.value.length > 100)
{
alert("在 address 域中,请最多输入 100 个字符。");
theForm.address.focus();
return (false);
}
return (true);
}
//-->
添加衣食住行
宾馆名称
I-Maximum-Length="50" -->
所在城市
I-Maximum-Length="30" -->
联系电话
I-Maximum-Length="30" -->
地址
I-Maximum-Length="100" -->
备注