中间件编程

开发平台：

Visual C++

ses.ASP：源码内容

							<html>
<%
wj=trim(request("wj"))
if wj<>"" then
i=1
while not i=0 
i=instr(1,wj,"")
wj=right(wj,len(wj)-i)
wend
session("yzbwj")=wj
end if
topic=trim(request("topic"))
session("yzbtopic")=topic
session("yzbxm")=trim(request("xm"))
if trim(topic)<>"" then
%>
<script lanuage="javascript">
parent.header.document.yzb.submit(parent.header.document.yzb);
</script>
<%
end if
%>
<head>
<base target="_blank">
</head>
<body>
<p align="left">
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
<a href="download.asp" target="_top">
上传文件列表</a>
</body>
</html>

						