<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
dim rs ,sql,i,ArticleID
ArticleID=request.QueryString("articleid")
set rs=server.createobject("adodb.recordset")
sql="select * from article where ArticleID="&ArticleID
rs.open sql,conn,1,3
rs("Hits") = rs("Hits") + 1
rs.update
%>
Macau Cable TV, Limited
|
|
 |
|
|
| 澳門有線電視版權所有 |
| Copyright 2001-2007 Macau Cable TV, Ltd. All Rights Reserved. E-mail:enquiry@macaucabletv.com |
|
|
|
|
|
