datatransfer.asp

来自「该资料包含大量网络开发的案例和源代码」· ASP 代码 · 共 28 行

<%
dim UserId,UserName
UserId=request.Cookies("UserInfo")("UserId")
UserName=request.Cookies("UserInfo")("UserName")

dim BoardID,TopicId
BoardId=clng(request("boardid"))
TopicId=clng(request("topicid"))

dim Page
Page=clng(request("Page"))

dim Anchor
Anchor=clng(request("anchor"))

dim showid,showname
showid=request.QueryString("ShowID")


dim CurrentDate,CurrentWeekDay,PreviousMonthDate,NextMonthDate,ym
dim LinkText,strUrl

dim NavTitle

dim i,j
%>