WEB源码(ASP,PHP,...)

开发平台：

HTML/CSS

FocusView.asp：源码内容

							﻿<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<% Option Explicit %>
<% response.charset="utf-8" %>
<!--#include file="../Include/Const.asp" -->
<!--#include file="../Include/ConnSiteData.asp" -->
<%
dim rs,ADsName,Content
set rs=server.CreateObject("adodb.recordset")
rs.open "select top 1 * from Wygkcnflash_ADs where ViewFlag"&Language&" order by id desc",conn,1,3
ADsName=rs("ADsName"&Language)
Content=rs("Content"&Language)
rs("ClickNumber")=rs("ClickNumber")+1
rs.update
rs.close
set rs=nothing  
%> 
<HTML>
<HEAD>
<TITLE><%=ADsName%></TITLE>
<META http-equiv="Content-Type" content="text/html; charset=utf-8">
<link rel="stylesheet" href="Images/CssHtml.css">
</HEAD>
<BODY>
<%=Content%>
</BODY>
</html>

						