데이터베이스 연결 :
다음은 참조 내용입니다.
<%
set conn = server.createobject (adodb.connection)
Conn.open 드라이버 = {Microsoft Access Driver (*.mdb)};
%>
데이터베이스 열기 :
다음은 참조 내용입니다.
exec = 선택 * 데이터베이스 테이블에서 선택하십시오
set rs = server.createobject (adodb.oldset)
Rs.OOPEN EXEC, CONN, 1,1
파라미터 1, 1 읽기
내용 형식을 읽으십시오 : <%= rs (필드)%>
레코드 처리 프로그램 추가 :
다음은 참조 내용입니다.
<%
set conn = server.createobject (adodb.connection)
Conn.open 드라이버 = {Microsoft Access Driver (*.mdb)};
이름 = request.form (필드) 이름, tel, 필드 값을 제출하는 메시지
전화 = request.form (필드)
message = request.form (필드)
exec = 테이블 이름 (필드) 값에 삽입 ( '+field+')은 쉼표로 쉼표로 분리됩니다.
conn.execute exec를 사용합니다
conn.close
Conn = 아무것도 설정하지 않습니다
%>
검색 처리 프로그램 :
다음은 참조 내용입니다.
<%
name = request.form (필드) 이름, tel은 양식의 양식 설정에 따라 설정된 필드 값입니다.
전화 = request.form (필드)
set conn = server.createobject (adodb.connection)
Conn.open 드라이버 = {Microsoft Access Driver (*.mdb)};
exec = select * from where where name = '+field+'및 tel =+field
set rs = server.createobject (adodb.oldset)
Rs.OOPEN EXEC, CONN, 1,1
%>
'페이지의 내용이 검색되었습니다
<%
rs.eof가 아니라
%> <tr>
<td> <%= rs (이름)%> </td>
<td> <%= rs (tel)%> </td>
<td> <%= rs (시간)%> </td>
</tr>
<%
rs.movenext
고리
%>
레코드 처리 프로그램 삭제 :
다음은 참조 내용입니다.
<%
set conn = server.createobject (adodb.connection)
Conn.open 드라이버 = {Microsoft Access Driver (*.mdb)};
exec = delete *에서 숫자 = & request.form (id)
Conn.Execute exec
%>
레코드 처리 프로그램 수정 :
다음은 참조 내용입니다.
<%
set conn = server.createobject (adodb.connection)
Conn.open 드라이버 = {Microsoft Access Driver (*.mdb)};
exec = select * from table name where number = & request.form (id)
set rs = server.createobject (adodb.oldset)
Rs.OOPEN EXEC, CONN, 1,3 '1,3은 수정 된 의미입니다
rs (name) = request.form (field) 'name, tel, message는 양식 제출에 의해 설정된 필드 값입니다.
rs (tel) = request.form (필드)
rs (메시지) = request.form (필드)
Rs.update
Rs.Close
RS = 아무것도 설정하지 않습니다
conn.close
Conn = 아무것도 설정하지 않습니다
%>
레코드 실행 프로그램 수정 : ID 번호 페이지를 입력하십시오 >>> 해당 ID 데이터 내보내기 >>>>> 직접 수정 된 처리 프로그램
로그인 처리 절차의 예 :
다음은 참조 내용입니다.
<%
희미한 이름, 비밀번호
이름 = request.form (이름)
password = request.form (비밀번호)
Dim Exec, Conn, Rs
exec = select *에서 테이블 이름에서 (name = '& field &'및 password = '& field &')
set conn = server.createobject (adodb.connection)
Conn.open 드라이버 = {Microsoft Access Driver (*.mdb)};
set rs = server.createobject (adodb.oldset)
Rs.OOPEN EXEC, CONN
그렇지 않다면 그렇다면
Rs.Close
conn.close
세션 (확인) = 예
세션 (확인) = 오른쪽
Response.redirect index.asp
또 다른
세션 (확인) = 아니요
세션 (확인) = w
Response.Rogin.asp
끝 If
%>
각 배경 페이지 플러스 :
<%세션이 아닌 경우 (확인) = 예 '세션에서 확인 된 문자열 변수를 정의합니다.
Response.Rogin.asp
또 다른
%>