|
Software : Microsoft-IIS/6.0 System OS : Windows NT HM1024 5.2 build 3790 ID : IUSR_HM1024_229 PHP Version : 5.2.17 on cgi-fcgi Server ip : 191.252.45.12 | Server Port : 80 | Your ip : 216.73.216.3 | Admin : Free Disk: 9.34 GB / 39.99 GB Safemode: OFF Time On Server : 14 Dec 2025 14:15:37 Disabled Functions: escapeshellarg, escapeshellcmd, exec, passthru, proc_close, proc_open, shell_exec, system, dl, popen, php_check_syntax, php_strip_whitespace, symlink, link, openlog, apache_child_terminate MySQL: ON | MSSQL: ON | Oracle: OFF | Perl: OFF | cURL: ON | WGet: OFF [ A ] [ C ] [ D ] [ E ] [ F ] > E: \ home \ superlisboa \ web \ site \ |
| Filename | E:\home\superlisboa\web\site\artigos2.asp |
| Size | 1.76 kb |
| Permission | rw-rw-rw- |
| Owner | IUSR_HM1024_229 |
| Create time | 26-Oct-2016 08:37 |
| Last modified | 26-Oct-2016 08:37 |
| Last accessed | 26-Oct-2016 08:37 |
| Actions | edit | rename | delete | download (gzip) |
| View | text | code | image |
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<style type="text/css">
<!--
body,td,th {
font-family: ;
font-size: 11px;
color: #FFFFFF;
}
body {
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
background-image: url();
}
.scroll {
scrollbar-arrow-color:#000000;
scrollbar-highlight-color:#FFFFFF;
scrollbar-face-color:#FFFFFF;
scrollbar-shadow-color:#FFFFFF;
scrollbar-darkshadow-color:#FFFFFF;
scrollbar-track-color:#FFFFFF;
}
a {
font-size: 11px;
color: #000000;
}
a:link {
text-decoration: underline;
color: #FFFFFF;
}
a:visited {
text-decoration: underline;
color: #FFFFFF;
}
a:hover {
text-decoration: none;
color: #CCCCCC;
}
a:active {
text-decoration: underline;
}
-->
</style>
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" class="scroll">
<table width="100%" border="0" cellpadding="0" cellspacing="1" bordercolor="#000000">
<tr>
<!--#include file="admin/conexao.asp" -->
<%
sqlstmt = "select * from artigos ORDER BY data DESC"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sqlstmt, db, 3, 3
TotalRecs = rs.recordcount
x = 0
For x = 1 to 5
If rs.eof then
Exit For
Else
data = rs("data")
cod = rs("cod")
titulo = rs("titulo")
link = data
description = "<a class='link2' target='news' href='detalhe_artigos.asp?cod=" & cod & "'>" & titulo & "</a>"
%>
<TD
vAlign=top width=1%> </TD>
<TD width="99%" colspan="2"
vAlign=top> <font face="Tahoma" size="2">
<% =description%>
</font></TD>
</tr>
<%
rs.MoveNext
End If
Next%>
</table>
</body>
</html>
-=[ b374k recoded by Mr.HaurgeulisX196 ]=-
© 2015 Andela1C3 v.3