v1. 기록 삭제
opendataconn '데이터베이스 연결 열기
xxlb=RtnReplaceInt(Trim(request(xxlb)),0) '내부에서 외부로 xxlb 변수를 받고 변수 양쪽 끝의 공백을 제거하는 기능입니다. 아마도 교체와 관련이 있을 것 같습니다.
id=changechr(request(id)) 'id를 받아 문자열로 변환
ids=split(id,,) 'ID를 분할하여 id 배열에 저장합니다.
for i=0 to ubound(ids) ' for 루프를 사용하여 배열을 탐색합니다.
tt=trim(ids(i)) '배열 요소의 양쪽 끝에서 공백을 제거하고 tt에 할당합니다.
conn.executedelete from house where id=&tt& '데이터 테이블에서 id=tt 변수의 레코드를 삭제합니다.
다음 '루프 끝
response.redirect house.asp?xxlb=&xxlb& '하우스 페이지로 이동하여 get 메소드를 사용하여 xxlb 매개변수를 전달합니다. 값은 xxlb 변수의 값입니다.
closedataconn은 데이터베이스 연결을 닫습니다.
2. 데이터베이스에 연결
희미한 conn '변수 정의
희미한 char_str(20) '배열 정의
sub OpenDataConn() '맞춤형 프로세스, 사용자 링크 데이터베이스 위치
Dim connstr은 변수를 정의합니다.
connstr = 공급자=Microsoft.Jet.OLEDB.4.0;데이터 소스=
connstr = connstr & Server.MapPath(../../data/fyhouse_free.mdb) '데이터베이스 드라이버 문자열
'response.write connstr은 connstr 변수의 값을 출력합니다.
set conn=Server.CreateObject(AdoDb.Connection) '연결 개체 만들기
conn.Open connstr '데이터베이스 연결
end sub 이 문장은 프로세스의 끝이지만 게시한 코드를 보면 시작이 없습니다.