📄 upphoto.asp
字号:
<%Option Explicit%><%
dim rs_lar,rs
dim sql
dim i
dim conn,dbpath
'叛断此用户是否已经注册
%><!--#include file="connpic.asp"--><%
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from pic"
rs.open sql,conn,3,2
%>
<html>
<Script language="javascript">
function mysubmit(theform)
{
if(theform.big.value=="")
{
alert("请点击浏览按钮，选择您要上传的jpg或gif文件!")
theform.big.focus;
return (false);
}
else
{
str= theform.big.value;
strs=str.toLowerCase();
lens=strs.length;
extname=strs.substring(lens-4,lens);
if(extname!=".jpg" && extname!=".gif")
{
alert("请选择jpg或gif文件!");
return (false);
}
}
return (true);
}
</script>
<body>
<center>
<form enctype="multipart/form-data" action="addpic.asp" method=post onSubmit="return mysubmit(this)">
<table width="63%" border="1" cellpadding="0" cellspacing="0" bordercolor="#003399">
<tr>
<td width="612" height="28" bgcolor="#336699"><div align="center"><font color="#FFFFFF"><b>相片管理子系统</b></font></div></td>
</tr>
<tr>
<td width="612">
<p> </p>
<p align="center">相片
<input type="file" name="big" size="20">
<font color="#FF0000"> *请选择gif或jpg文件，文件不大于60k*</font></p>
<p align="center"><input type="submit" value=" 上传 " name="B3"> </p></td>
</tr>
</table>
</form>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -