📄 flash.asp
字号:
<%
dim db_path,connm,myconnm
db_path="/Databases/vicndatadata.mdb"
Set Connm = Server.CreateObject("ADODB.Connection")
myconnm="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db_path&"")
Connm.Open myconnm
%>
<%
if request("style")="update" then
alink=request("alink")
aimage=request("aimage")
atext=request("atext")
blink=request("blink")
bimage=request("bimage")
btext=request("btext")
clink=request("clink")
cimage=request("cimage")
ctext=request("ctext")
dlink=request("dlink")
dimage=request("dimage")
dtext=request("dtext")
elink=request("elink")
eimage=request("eimage")
etext=request("etext")
image_width=request("image_width")
image_height=request("image_height")
text_height=request("text_height")
sql="select * from flash"
set rs=server.createobject("adodb.recordset")
rs.open sql,myconnm,1,3
rs("alink")=alink
rs("aimage")=aimage
rs("atext")=atext
rs("blink")=blink
rs("bimage")=bimage
rs("btext")=btext
rs("clink")=clink
rs("cimage")=cimage
rs("ctext")=ctext
rs("dlink")=dlink
rs("dimage")=dimage
rs("dtext")=dtext
rs("elink")=elink
rs("eimage")=eimage
rs("etext")=etext
rs("image_width")=image_width
rs("image_height")=image_height
rs("text_height")=text_height
rs.update
rs.close
Response.Write("<script language=javascript>alert('修改成功．请返回！');window.location.replace('flash.asp')</script>")
end if
%>
<html>
<head>
<title>系统设置</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../css/css.css" rel="stylesheet" type="text/css">
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_openBrWindow(theURL,winName,features) { //v2.0
window.open(theURL,winName,features);
}
//-->
</script>
</head>
<body topmargin="0">
<%
if session("flag")>0 then
Response.Write("<br><br><br><center>对不起。你没有权限进入此页面！！！</center>")
Response.end
end if
%>
<table width=600 height="273" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="1" height="273" align="center"><br> </td>
<td width="481" valign="top"> <form name="form" id="form" method="post" action="flash.asp?style=update" onSubmit="return clasky__checkform()">
<%
sql1="select * from [flash]"
set rs=server.CreateObject("Adodb.recordset")
rs.open sql1,myconnm,1,1
%>
<table width="600" height="716" border="0" cellpadding="0" cellspacing="0">
<tr align="center">
<td height="30" colspan="3"><strong>FLASH滚动展示系统设置</strong></td>
</tr>
<tr>
<td width="76" height="22">图片5链接</td>
<td colspan="2"><input name="alink" type="text" id="alink" value="<%=rs("alink")%>" size="45"></td>
</tr>
<tr>
<td width="76" height="22">图片5文件</td>
<td colspan="2"><input name="aimage" type="text" id="aimage" value="<%=rs("aimage")%>" size="45">
<input name="Submit4" type="button" class=2 onClick="MM_openBrWindow('flash_images_5_upload.asp','','width=350,height=200')" value="上 传" >
</td>
</tr>
<tr>
<td width="76" height="22">图片5简述</td>
<td colspan="2"><input name="atext" type="text" id="atext" value="<%=rs("atext")%>" size="45"></td>
</tr>
<tr>
<td height="16" colspan="3"></td>
</tr>
<tr>
<td width="76" height="22">图片4链接</td>
<td colspan="2"><input name="blink" type="text" id="blink" value="<%=rs("blink")%>" size="45"></td>
</tr>
<tr>
<td width="76" height="22">图片4文件</td>
<td colspan="2"><input name="bimage" type="text" id="bimage" value="<%=rs("bimage")%>" size="45">
<input name="Submit42" type="button" class=2 onClick="MM_openBrWindow('flash_images_4_upload.asp','','width=350,height=200')" value="上 传" ></td>
</tr>
<tr>
<td width="76" height="22">图片4简述</td>
<td colspan="2"><input name="btext" type="text" id="btext" value="<%=rs("btext")%>" size="45"></td>
</tr>
<tr>
<td height="16" colspan="3"></td>
</tr>
<tr>
<td width="76" height="22">图片3链接</td>
<td colspan="2"><input name="clink" type="text" id="clink" value="<%=rs("clink")%>" size="45"></td>
</tr>
<tr>
<td width="76" height="22">图片3文件</td>
<td colspan="2"><input name="cimage" type="text" id="cimage" value="<%=rs("cimage")%>" size="45">
<input name="Submit43" type="button" class=2 onClick="MM_openBrWindow('flash_images_3_upload.asp','','width=350,height=200')" value="上 传" ></td>
</tr>
<tr>
<td width="76" height="22">图片3简述</td>
<td colspan="2"><input name="ctext" type="text" id="ctext" value="<%=rs("ctext")%>" size="45"></td>
</tr>
<tr>
<td height="16" colspan="3"></td>
</tr>
<tr>
<td width="76" height="22">图片2链接</td>
<td colspan="2"><input name="dlink" type="text" id="dlink" value="<%=rs("dlink")%>" size="45"></td>
</tr>
<tr>
<td width="76" height="22">图片2文件</td>
<td colspan="2"><input name="dimage" type="text" id="dimage" value="<%=rs("dimage")%>" size="45">
<input name="Submit44" type="button" class=2 onClick="MM_openBrWindow('flash_images_2_upload.asp','','width=350,height=200')" value="上 传" ></td>
</tr>
<tr>
<td width="76" height="22">图片2简述</td>
<td colspan="2"><input name="dtext" type="text" id="dtext" value="<%=rs("dtext")%>" size="45"></td>
</tr>
<tr>
<td height="16" colspan="3"></td>
</tr>
<tr>
<td width="76" height="22">图片1链接</td>
<td colspan="2"><input name="elink" type="text" id="elink" value="<%=rs("elink")%>" size="45"></td>
</tr>
<tr>
<td width="76" height="22">图片1文件</td>
<td colspan="2"><input name="eimage" type="text" id="eimage" value="<%=rs("eimage")%>" size="45">
<input name="Submit45" type="button" class=2 onClick="MM_openBrWindow('flash_images_1_upload.asp','','width=350,height=200')" value="上 传" ></td>
</tr>
<tr>
<td width="76" height="22">图片1简述</td>
<td colspan="2"><input name="etext" type="text" id="etext" value="<%=rs("etext")%>" size="45"></td>
</tr>
<tr>
<td height="36" colspan="3"><div align="center"><strong> 视觉选项</strong></div></td>
</tr>
<tr>
<td width="76" height="27">展示宽度</td>
<td width="55"> <input name="image_width" type="text" id="image_width" value="<%=rs("image_width")%>" size="6">
</td>
<td width="469" rowspan="2"><font color="#999999">为了网页美观考虑，建议宽高比例设置为4：3</font></td>
</tr>
<tr>
<td width="76" height="22">展示高度</td>
<td width="55"> <input name="image_height" type="text" id="image_height" value="<%=rs("image_height")%>" size="6">
</td>
</tr>
<tr>
<td width="76" height="22">底部文字行高</td>
<td colspan="2"><input name="text_height" type="text" id="text_height" value="<%=rs("text_height")%>" size="6"></td>
</tr>
<tr>
<td height="22"> </td>
<td colspan="2"><input type="submit" name="Submit" value="设置完毕">
<input type="button" name="Submit2" value="取消" onClick="javascript:history.back();">
</td>
</tr>
<tr>
<td colspan="3"><p> </p></td>
</tr>
</table>
</form></td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -