⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 index.asp

📁 个人相册程序-------------供大家分享
💻 ASP
字号:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>飞鸟个人相册  订购QQ:28928247</title>
</head>

<%
response.write("<SCRIPT LANGUAGE=JavaScript>" & vbcrlf)
response.write("<!--" & vbcrlf)
response.write("var InternetExplorer = navigator.appName.indexOf(""Microsoft"") != -1;" & vbcrlf)
response.write("// Handle all the the FSCommand messages in a Flash movie" & vbcrlf)
response.write("function scriptmain_DoFSCommand(command, args) {" & vbcrlf)
response.write("  var scriptmainObj = InternetExplorer ? scriptmain : document.scriptmain;" & vbcrlf)
response.write("	if(command == ""setwinheight""){" & vbcrlf)
response.write("		scriptmain.style.pixelHeight=args;" & vbcrlf)
response.write("		document.height" & vbcrlf)
response.write("	}" & vbcrlf)
response.write("}" & vbcrlf)
response.write("// Hook for Internet Explorer " & vbcrlf)
response.write("if (navigator.appName && navigator.appName.indexOf(""Microsoft"") != -1 && " & vbcrlf)
response.write("	  navigator.userAgent.indexOf(""Windows"") != -1 && navigator.userAgent.indexOf(""Windows 3.1"") == -1) {" & vbcrlf)
response.write("	document.write('<SCRIPT LANGUAGE=VBScript\> \n');" & vbcrlf)
response.write("	document.write('on error resume next \n');" & vbcrlf)
response.write("	document.write('Sub scriptmain_FSCommand(ByVal command, ByVal args)\n');" & vbcrlf)
response.write("	document.write('  call scriptmain_DoFSCommand(command, args)\n');" & vbcrlf)
response.write("	document.write('end sub\n');" & vbcrlf)
response.write("	document.write('</SCRIPT\> \n');" & vbcrlf)
response.write("}" & vbcrlf)
response.write("//-->" & vbcrlf)
response.write("</SCRIPT>")

show_mode=request("show_mode")
path=request("path")
i_c=request("i_c")
bbs=request("bbs")
skin=request("skin")
if show_mode<>"" then
str="index.swf?show_mode="&show_mode&"&path="&path&"&i_c="&i_c&"&bbs="&bbs&"&skin="&skin&""
else
str="index.swf"
end if
%>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table id="mainTable" width="100%" height="100%" border="0" align="center" cellpadding="0" cellspacing="0">

  <tr>
    <td width="100%" align="center" valign="top" > 
      <object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" id=scriptmain name=scriptmain codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="1010" height="100%">
        <param name="movie" value="<%=str%>">
        <param name="quality" value="high">
        <PARAM NAME=salign VALUE=T>
        <PARAM NAME=scale VALUE=noscale>
        <param name="LOOP" value="false">
        <param name="menu" value="false">
      <embed src="<%=str%>" width="1010" height="100%" loop="false" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" salign="T" name="scriptmain" menu="false"></embed></object>
    </td>
  </tr>
</table>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -