上方，是我们前行的方向和目标
<%
dim ID
ID = int(Request.QueryString("ID"))
Dim strUrl, TitleLen, Num, Cols, DateSkins
SqlNewsList = " select * from ArticleList00 where ArtID = "&ID&" order by ArtRank "
set RsNewsList = server.CreateObject("adodb.recordset")
RsNewsList.open SqlNewsList, objConn, 1, 1
if RsNewsList.eof or RsNewsList.bof then
Response.Write("
错误参数
") response.End() end if %>
错误参数
") response.End() end if %>
<%
if RsNewsList.eof or RsNewsList.bof then
Response.Write("
资料整理中
") else %> <% = RsNewsList("ArtContent") %> <% end if RsNewsList.close set RsNewsList = nothing %>
资料整理中
") else %> <% = RsNewsList("ArtContent") %> <% end if RsNewsList.close set RsNewsList = nothing %>
深圳市上步路国企大厦B座26C
电话：0755 - 2238 4158
传真：0755 - 2238 5058