📄 in_girl.asp
字号:
<%
Public sub StrCount(Str)
Dim I, Counter
Counter = 0
z=0
For I = 1 To Len(Trim(Str))
If Asc(Mid(Str, I, 1))<0 Then
Counter = Counter + 2
Else
Counter = Counter + 1
end if
if counter >= 15 then
z=i
response.write left(str,z)
exit for
end if
Next
if z=0 then
response.write str
end if
End sub
%>
<%
set rs=server.createobject("adodb.recordset")
sql="select piclink,pic,title from changepic order by picorder desc"
rs.open sql,conn,1,1
byhsop_6=0
%>
<script language=JavaScript>
TitlePics = new Array();
Titles = new Array();
TitlePics[0] = "<a href='<%=rs("piclink")%>' target='_blank'><center><img src='<%=rs("pic")%>' alt='<%=rs("title")%>' border=0 height=120 width=220 ></center></a>";
Titles[0] = " <a href='<%=rs("piclink")%>'class='didibaba_a02' target='_blank'><%=rs("title")%></a>";
<%
rs.movenext
%>
TitlePics[1] = "<a href='<%=rs("piclink")%>' target='_blank'><center><img src='<%=rs("pic")%>' alt='<%=rs("title")%>' border=0 height=120 width=220 ></center></a>";
Titles[1] = " <a href='<%=rs("piclink")%>'class='didibaba_a02' target='_blank'><%=rs("title")%></a>";
<%
rs.movenext
%>
TitlePics[2] = "<a href='<%=rs("piclink")%>' target='_blank'><center><img src='<%=rs("pic")%>' alt='<%=rs("title")%>' border=0 height=120 width=220 ></center></a>";
Titles[2] = " <a href='<%=rs("piclink")%>'class='didibaba_a02' target='_blank'><%=rs("title")%></a>";
<%
rs.movenext
%>
TitlePics[3] = "<a href='<%=rs("piclink")%>' target='_blank'><center><img src='<%=rs("pic")%>' alt='<%=rs("title")%>' border=0 height=120 width=220 ></center></a>";
Titles[3] = " <a href='<%=rs("piclink")%>'class='didibaba_a02' target='_blank'><%=rs("title")%></a>";
<%
%>
<%
rs.close
set rs=nothing
%>
var i = 0;
var mytimeout;
function playTitlePics() {
if(TitlePics.length == 1){
span_titlepics.filters[0].apply();
span_titlepics.innerHTML = TitlePics[0];
span_titlepics.filters[0].play();
span_titles.innerHTML = Titles[0];
}else{
if (i == TitlePics.length-1) i = 0; else i++;
span_titlepics.filters[0].apply();
span_titlepics.innerHTML = TitlePics[i];
span_titlepics.filters[0].play();
span_titles.innerHTML = Titles[i];
mytimeout = setTimeout('playTitlePics()',4500);
}
}
</script>
<table id="table33" cellSpacing="0" cellPadding="0" width="779" border="0">
<tr vAlign="top">
<td width="100%" bgColor="#ffffff">
<div>
<table id="table34" cellSpacing="0" cellPadding="0" width="778" bgColor="#ffffff" border="0">
<tr>
<td vAlign="top" align="middle">
<table id="table35" height="10" cellSpacing="0" cellPadding="0" width="100%" border="0">
<tr>
<td> </td>
</tr>
</table>
<!-- 2-3 -->
<table id="table36" cellSpacing="0" cellPadding="0" width="100%" border="0">
<tr vAlign="top">
<td ><!-- ??2 -->
<table id="table37" cellSpacing="0" cellPadding="0" width="99%" border="0" height="200" >
<tr>
<td width="6">
<img height="6" src="images/didi_001.gif" width="6"></td>
<td background="images/didi_005.gif">
<img height="6" src="images/didi_005.gif" width="6"></td>
<td width="6">
<img height="6" src="images/didi_002.gif" width="6"></td>
</tr>
<tr>
<td background="images/didi_007.gif">
</td>
<td vAlign="top">
<table id="table38" cellSpacing="0" cellPadding="5" width="100%" border="0">
<tr class="didibaba_l17">
<td align="middle" width="100" border="0" cellspacing="0" cellpadding="1" valign="top">
<table id="table39" cellSpacing="0" cellPadding="1" border="0">
<tr>
<td border="0" cellspacing="0" cellpadding="1">
<table id="table40" height="10" cellSpacing="1" cellPadding="4" width="10" bgColor="#cccccc" border="0">
<tr>
<td bgColor="#ffffff">
<center>
<span id="span_titlepics"
style="FILTER: progid:DXImageTransform.Microsoft.Wipe(duration=2, gradientsize=0.25,motion=reverse); WIDTH=100">
<img width="100" src="javascript:playTitlePics()" height="75"
border=0></center>
</a></td>
</tr>
</table>
</td>
</tr>
<tr>
<td align="middle" border="0" cellspacing="0" cellpadding="0">
·<span id="span_titles"></td>
</tr>
</table>
</td>
<td vAlign="top" ><!-- ????? 12?-->
<%
Set rs= Server.CreateObject("ADODB.Recordset")
sql="select top 10 newsname,newsid,class,adddate from news order by adddate desc"
rs.open sql,conn,1,1
do while not rs.eof
%>
·<a class="didibaba_a02" title="<%=rs("newsname")%>" href=news.asp?id=<%=rs("newsid")%>>[
<%
if rs("class")=1 then
response.write "新闻"
end if
if rs("class")=2 then
response.write "标准"
end if
if rs("class")=3 then
response.write "政策"
end if
if rs("class")=4 then
response.write "贷款"
end if
%>
]<%StrCount(rs("newsname"))%> <%=month(rs("adddate"))%>-<%=day(rs("adddate"))%></a><br>
<%
rs.movenext
loop
rs.close
set rs=nothing
%>
</td>
</tr>
</table>
<!--???? --> <%set rs2=server.createobject("adodb.recordset")
rs2.open "select top 4 * from xcmn where type=1 and tj=1 ",conn,1,1
%>
<table id="table41" cellSpacing="1" cellPadding="0" width="100%" background="images/didi_010.gif" border="0">
<tr>
<td align="middle" width="25%" >·<a target="_blank" href="carbeauty2.asp?girlid=<%=rs2("girlid")%>">热点新闻-<%=rs2("girlname")%></a></td>
<%rs2.close
set rs2=nothing%></tr>
</table>
</td>
<td background="images/didi_008.gif">
</td>
</tr>
<tr>
<td>
<img height="6" src="images/didi_003.gif" width="6"></td>
<td background="images/didi_006.gif">
<img src="images/didi_006.gif"></td>
<td>
<img height="6" src="images/didi_004.gif" width="6"></td>
</tr>
</table>
</td>
<!-- 3 --><!-- bengin ??3-->
<td width="6"></td>
<td width="312">
<table cellSpacing="0" cellPadding="0" width="100%" border="0" id="table42">
<tr vAlign="top">
<td width="153">
<table cellSpacing="0" cellPadding="0" width="100%" border="0" id="table43">
<tr>
<td width="6">
<img height="6" src="images/didi_001.gif" width="6"></td>
<td background="images/didi_005.gif">
<img height="6" src="images/didi_005.gif" width="6"></td>
<td width="6">
<img height="6" src="images/didi_002.gif" width="6"></td>
</tr>
<tr>
<td background="images/didi_007.gif">
</td>
<td vAlign="top" bgColor="#e4f3fa" height="135">
<table cellSpacing="0" cellPadding="5" width="100%" border="0" id="table51">
<tr>
<td align="middle"><%
set rs=server.createobject("adodb.recordset")
rs.open "select * from xcmn where type=5 order by adddate desc ",conn,1,1
%>
<table height="10" cellSpacing="0" cellPadding="0" width="10" border="0" id="table52">
<tr>
<td ><% if not rs.eof then%><a target="_blank" href="carbeauty2.asp?girlid=<%=rs("girlid")%>">
<img height="150" src="<%=rs("girlpic")%>" width="110" border="0" title="<%=rs("girlname")%>"></a>
<%end if%></td>
</tr>
</table>
</td>
</tr>
<tr>
<td class="didibaba_l17" align="middle">
·<a target="_blank" href="carbeauty2.asp?girlid=<%=rs("girlid")%>">
<%=rs("girlname")%>
<%rs.movenext%></td>
</tr>
</table>
</td>
<td background="images/didi_008.gif">
</td>
</tr>
<tr>
<td>
<img height="6" src="images/didi_003.gif" width="6"></td>
<td background="images/didi_006.gif">
<img height="6" src="images/didi_006.gif" width="6"></td>
<td>
<img height="6" src="images/didi_004.gif" width="6"></td>
</tr>
</table>
</td>
<td width="8"> </td>
<td width="153">
<table cellSpacing="0" cellPadding="0" width="100%" border="0" id="table46">
<tr>
<td width="6">
<img height="6" src="images/didi_001.gif" width="6"></td>
<td background="images/didi_005.gif">
<img height="6" src="images/didi_005.gif" width="6"></td>
<td width="6">
<img height="6" src="images/didi_002.gif" width="6"></td>
</tr>
<tr>
<td background="images/didi_007.gif">
</td>
<td vAlign="top" bgColor="#e4f3fa" height="135">
<table cellSpacing="0" cellPadding="5" width="100%" border="0" id="table55">
<tr>
<td align="middle">
<table height="10" cellSpacing="0" cellPadding="0" width="10" border="0" id="table56">
<tr>
<td >
<% if not rs.eof then%><a target="_blank" href="carbeauty2.asp?girlid=<%=rs("girlid")%>">
<img height="150" src="<%=rs("girlpic")%>" width="110" border="0" title="<%=rs("girlname")%>"></a>
<%end if%></td>
</tr>
</table>
</td>
</tr>
<tr>
<td class="didibaba_l17" align="middle">
·<a target="_blank" href="carbeauty2.asp?girlid=<%=rs("girlid")%>">
<%=rs("girlname")%>
<%rs.close
set rs=nothing%>
</td>
</tr>
</table>
</td>
<td background="images/didi_008.gif">
</td>
</tr>
<tr>
<td>
<img height="6" src="images/didi_003.gif" width="6"></td>
<td background="images/didi_006.gif">
<img height="6" src="images/didi_006.gif" width="6"></td>
<td>
<img height="6" src="images/didi_004.gif" width="6"></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
<!--end ??3 -->
</td>
</tr>
</table>
</div>
</td>
</tr>
</table>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -