tnews.asp

来自「1．理解Winsock编程模型； 2．掌握Winsock编程的基本方法」· ASP 代码 · 共 54 行

ASP
54 行
字号 
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
 if session("uname")="" then
%>
<script language="javascript">
				if 	(confirm("您进行的是非法登录，请重新登录!"))
				  location.href="admin.asp";			
				</script>
<%
end if
%>
<!--#include file="conn.asp"-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>石家庄经济学院信息工程学院！</title>
<link rel="STYLESHEET" href="images/css.css" type="text/css">
</head>

<body>
<% id=request("id")
Set rs=Server.CreateObject("ADODB.Recordset")
								
		sql="select * from sptp where spid="&request("id")
		rs.open sql,conn,3,2	
Set rs1=Server.CreateObject("ADODB.Recordset")
		sql1="select * from news where newsid="&id
		rs1.open sql1,conn,3,2 %>
		
<table width="500"  border="1" align="center" cellpadding="0" cellspacing="0">
<tr>
    <td><div align="center">图片ID号</div></td>
    <td><div align="center">新闻标题</div></td>
    <td><div align="center">图片预览</div></td>
  </tr>
<% 
i=1
do while not rs.eof 
%>

  <tr>
    <td><div align="center"><%=rs("id")%></div></td>
    <td><div align="center"><%=rs1("title")%></div></td>
    <td><div align="center"><a href="<%=rs("FilePath")%>" target="_blank">第<%=i%>张图片</a></div></td>
	<% i=i+1
	rs.movenext
	loop
	%>
  </tr>
</table>
</body>
</html>

tnews.asp - 源码说明

本页面展示了「1．理解Winsock编程模型； 2．掌握Winsock编程的基本方法」中的 tnews.asp 源码文件，采用 ASP 编程语言编写，共 54 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与Winsock相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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