delinsql的专栏

用户操作

[留言] [发消息] [加为好友]

订阅我的博客

[编辑]delinsql的公告

[编辑]文章分类

存档

NEW WEB SKILL OK 收藏

<SELECT onchange=PPAppend() name=pinpailist>
<%opendatabase
set rss=server.CreateObject("adodb.recordset")
sql="select pinpai from pinpai order by id"
rss.Open sql,cn,1,1
do while not rss.eof
%>
            <OPTION value=<%=trim(rss("pinpaijc"))%>><%=trim(rss("pinpai"))%></OPTION>
    <%
      rss.movenext
      loop
      set rss=nothing
      closedatabase%>
   <OPTION value="AllPinPai">AllPinPai</OPTION>
          </SELECT>

if (form1.password.value.trim().length<3 | form1.password.value.trim().length>30)
{
alert("password length error.")
form1.password.focus()
return (false)
}

if (form1.repassword.value.trim().length<3 | form1.repassword.value.trim().length>30)
{
alert("repassword length error.")
form1.repassword.focus()
return (false)
}

if (form1.repassword.value!=form1.password.value)
{
alert("repassword is not equal to password. ")
form1.password.focus()
return (false)
}

if (form1.pinpai.value.trim()=="")
{
alert("pinpai isn't allow null. ")
form1.pinpai.focus()
return (false)
}

return (true)
}

function mysubmit()
{
if (from_check())
{
form1.submit()
}

}

function myreset()
{
form1.username.value=""
form1.password.value=""
form1.repassword.value=""
form1.memo.value=""
}

function deleteit(v)
{
if (confirm("確認刪除？刪除後不可恢復..."))
{
this.location = "admin.asp?deleteid=" + v;}
}

</script>
<script language="vbscript">
sub PPAppend()
dim str,text
str=Trim(form1.pinpai.value)
text=Trim(form1.pinpailist.value)
if instr(1,text,"AllPinPai",1)>0 then
  form1.pinpai.value="AllPinPai"
else
  if instr(1,str&",",text&",",1)>0 then exit sub
  if len(str)=0 then
   str=text
  else
   str=str&","&text
  end if
  str=replace(str,"AllPinPai,","",1,-1,1)
  form1.pinpai.value=str
end if
end sub
</script>

SELECT {
BORDER-RIGHT: #000000 0px solid; BORDER-TOP: #000000 0px solid; FONT-SIZE: 12px; MARGIN: 0px; BORDER-LEFT: #000000 0px solid; COLOR: #000000; LINE-HEIGHT: 15px; BORDER-BOTTOM: #000000 0px solid;BACKGROUND-COLOR: #ffffff
}

body,td,th {
color: #FFFFFF;
font-size: 10px;
font-family: Arial, Helvetica, sans-serif;
}
body {
background-image: url(img/101bg.jpg);
}
.unnamed1 {
background-color: #000000;
}
.style14 {font-size: 12px;color: #FF00FF}
.style15 {
font-size: 16px;
font-weight: bold;
}
-->
</style>

</head>

<% @LANGUAGE = "VBScript" %>
<% Response.Buffer = True %>
<%
session.Timeout=60
if isnull(session("loginadmin")) then
response.redirect("login.asp?info=login overtime.")
end if
if session("loginadmin")="" then
response.redirect("login.asp?info=login overtime.")
end if
kind=Request("show")
if trim(kind)="" then
response.redirect("login.asp?info=kind error.")
end if
%>
<SCRIPT language=javascript>

self.moveTo(-5,-5)
self.resizeTo(screen.availWidth+10,screen.availHeight+10)

function openimg(d,a,b,c){
window.open("show.asp?kind="+d+"&pp="+a+"&cm="+b+"&ys="+c,"Showimg","toolbar=no,location=no,status=no,menubar=no,scrollbars=no,resizable=no,width=800,height=660,top=-5,left=-5");
}

</SCRIPT>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=big5">
<title>COUR CARRE</title>
<style type="text/css">
<!--

a:link{text-decoration: none; color: black;}
   a:visited{text-decoration: none; color: black;}
   a:active{text-decoration: none; color: White;}
   a:hover{text-decoration: none;color:White;}
body {
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
background-color: #000000;
background-image: url(img/ccbg.gif);
}
.style5 {
color: #000000;
font-weight: bold;
}
.style8 {
color: #666666;
font-weight: bold;
}
.style7 {font-size: 16px}
.style10 {font-family: Arial, Helvetica, sans-serif}
.style15 {font-family: Arial, Helvetica, sans-serif; font-size: 16px; }
.pp {
position: relative;
bottom: 30px;
left: 15px;
font-family: Geneva, Arial, Helvetica, sans-serif;
font-weight: bold;
font-size: 12px;
letter-spacing: 3px;
}
-->
</style>
</head>

<body>
<table width="100%" border="0" cellpadding="0" cellspacing="0" background="img/ccbg.gif">
<tr bordercolor="0" bgcolor="#000000">
    <td height="115" colspan="4" valign="bottom" bordercolor="0">
      <p> </p>
      <table width="100%" border="0" cellspacing="0" cellpadding="00">
        <tr>
          <td width="65%"> </td>
          <td width="31%"><img src="img/cctitle.jpg" width="328" height="55"></td>
          <td width="4%"> </td>
        </tr>
    </table></td>
</tr>
<tr valign="bottom">
<tr align="center" valign="bottom">
    <td height="35" ><div align="center" class="style7 style10">
        <p align="center" class="style5" >SUNGLASSES METAL </p>
    </div></td>
    <td height="35"><div align="center" class="style15">
        <div align="center"><span class="style8" onMouseOver="this.style.color ='#000000';" onMouseOut="this.style.color = '#666666';">SUNGLASSES PLASTIC </span></div>
    </div></td>
    <td height="35"><div align="center" class="style15">
        <div align="center"><span class="style8" onMouseOver="this.style.color ='#000000';" onMouseOut="this.style.color = '#666666';">OPTICAL METAL </span></div>
    </div></td>
    <td height="35"><div align="center" class="style15">
        <div align="center"><span class="style8" onMouseOver="this.style.color ='#000000';" onMouseOut="this.style.color = '#666666';">OPTICAL PLASTIC </span></div>
    </div></td>
</tr>
</tr>
<tr>
    <td width="25%"> </td>
    <td width="28%"> </td>
    <td width="26%"> </td>
    <td width="21%"> </td>
</tr>
<tr>
    <td colspan="4" valign="bottom">
<table width="100%" border="0">
    <tr valign="bottom">
      <td width="31%" height="49" > </td>
      <td width="38%" onclick=javascript:MarqueeLeft() onMouseOver="this.style.color ='#FFFFFF';this.style.cursor='hand'" onMouseOut="this.style.color = '#000000';"><strong>＜</strong></td>
      <td width="4%" onclick=javascript:MarqueeRight() onMouseOver="this.style.color ='#FFFFFF';this.style.cursor='hand'" onMouseOut="this.style.color = '#000000';"><strong>＞</strong></td>
      <td width="27%" > </td>
    </tr>
    <tr valign="bottom">
      <td height="8" colspan="4" ><img src="img/spacer.gif" width="1" height="1"></td>
      </tr>
</table>

<table width=100% border=0 cellpadding=0 cellspacing=0 >
<tr><td height=199 style="border:0px;padding-top:8px" align=center valign=top>
<table width=1000 border=0 cellpadding=0 cellspacing=0>
<tr><td>
<div id=demo style=overflow:hidden;height:199;width:1004;color:#ffffff>
<table align=left cellpadding=0 cellspace=0 border=0><tr>
<td id=demo1 valign=top>
  <table border=0 cellpadding=0 cellspacing=0>
  <tr>
<%
strpath=server.mappath("show")
strpath=strpath&"\"&Session("show")&"\"&kind
Set fs = Server.CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFolder(strpath&"\1")
Set fc=f.Files
For Each objfile in fc
if right(ucase(trim(objfile.name)),4)=".JPG" then
strname=ucase(objfile.name)
aa=split(replace(trim(strname),".JPG",""),"_")
pp=aa(0)
cm=aa(1)
ys=aa(2)
%>
  <td><table width="0" border="0" cellspacing="0" cellpadding="0">
<tr>
    <td width="36"><a href="Javascript:openimg('<%=kind%>','<%=pp%>','<%=cm%>','<%=ys%>')"><img border="0" width="360" height="200" src=<%="show\"&Session("show")&"\"&kind&"\1\"&strname%>></a></td>
    </tr>
<tr>
    <td><span class="pp"><%=pp%></span></td>
    </tr>
</table>

<%end if
  next
  set fc=nothing
set f=nothing
  %>
  </tr>
  </table>
</td><td id=demo2 valign=top></td></tr></table></div>

</td></tr>
</table>
</td></tr>
</table>
<p>

</p>
<p align="right">  </p>

<script>
var speed=30
var temp=1
var myleft=-1

function NoError() {
return(true);
}
onerror=NoError;

demo2.innerHTML=demo1.innerHTML
function Marquee(){
if(demo2.offsetWidth-demo.scrollLeft<=0)
demo.scrollLeft-=demo1.offsetWidth
else{
demo.scrollLeft+=2
}
}

function MarqueeLeft(){
clearInterval(MyMar)
speed=speed-15
if (speed<15) {speed=15}
if (temp==1||myleft==0){speed=30}
MyMar=setInterval(Marquee,speed)
demo.onmouseover=function() {clearInterval(MyMar)}
demo.onmouseout=function() {MyMar=setInterval(Marquee,speed)}
temp=2
myleft=1
}

//var speed=30
//demo2.innerHTML=demo1.innerHTML
demo.scrollLeft=demo.scrollWidth
function Marquee2(){
if(demo.scrollLeft<=0)
demo.scrollLeft+=demo2.offsetWidth
else{
demo.scrollLeft-=2
}
}
function MarqueeRight(){
clearInterval(MyMar)
speed=speed-15
if (speed<15) {speed=15}
if (temp==1||myleft==1){speed=30}
MyMar=setInterval(Marquee2,speed)
demo.onmouseover=function() {clearInterval(MyMar)}
demo.onmouseout=function() {MyMar=setInterval(Marquee2,speed)}
temp=2
myleft=0
}

MyMar=setInterval(Marquee,speed)
demo.onmouseover=function() {clearInterval(MyMar)}
demo.onmouseout=function() {MyMar=setInterval(Marquee,speed)}
</script> </td>
</tr>
</table>