ASP 배치 생성을 작성하는 방법을 거의 잊어버렸습니다. 스스로 정적 페이지를 생성하기 위해 ASP를 작성해야 하는 친구들은 이를 참조할 수 있습니다. 다음과 같이 코드 코드를 복사합니다.
<!-- #include 파일=../conn.asp -->
<!-- #포함 파일=../cls_main.asp -->
<html>
<머리>
<meta http-equiv=Content-Language 콘텐츠=zh-cn>
<meta http-equiv=Content-Type content=text/html; charset=gb2312>
<title>Baidu XML 생성</title>
</head>
<본문>
<%
딤 시드, 이드
sid=abs(요청(sid))
sid=0이면
시드=0
또 다른
sid=cint(요청(sid))
종료하면
eid=cint(요청(eid))
eid=0이면
이드=500
또 다른
eid=cint(요청(eid))
종료하면
희미한 tt,ResNum
tt = 새 Cls_Main 설정
ResNum = CLng(tt.Execute(테이블에서 max(id) 선택)(0))
Mesky = 없음 설정
%>
<테이블 테두리=0 너비=100% id=table1 셀 간격=0 셀 패딩=0>
<양식 방법=POST 작업=?action=html>
<tr>
<td width=9%>시작 ID:</td>
<td width=35%><input type=text name=sid size=20 value=<%=sid%>></td>
<td width=8%>종료 ID:</td>
<td width=23%><input type=text name=eid size=20 value=<%=eid%>>(최대 ID:<%=ResNum%>)</td>
<td 너비=23%><입력 유형=제출 값=제출 이름=B1></td>
</tr>
</form>
<%
request(action)=html이면
Response.Write <tr><td colspan=5> & vbNewLine
응답.쓰기 <br><br> 및 vbNewLine
Response.Write가 <font color='red'><b> & eid & .xml</b></font> 파일을 생성 중입니다... & vbNewLine
응답.쓰기 <br><br> 및 vbNewLine
응답.쓰기 </td></tr><tr><td colspan=5> & vbNewLine
응답.플러시
If (eid-500) > ResNum Then
Response.Write 성공적인 운영을 축하합니다!
응답.플러시
또 다른
생성(시드)
시드=시드+500
이드=이드+500
Response.Write <meta http-equiv=refresh content=10;url=?action=html&sid=&sid&&eid=&eid&>
종료 조건
종료하면
함수creat(id)
Response.Write <IFRame 이름=tt 프레임 테두리=0 너비=100% 높이=30 스크롤링=no src=http://www.xx.com/cls_create.asp?startid=&sid&&endid=&eid&></IFrame>
기능 종료
%>
</td></tr>
</table>
</body>
</html>