내 접근 방식은 원래 로그인 시스템에 한 번 로그인하고 사용자 이름과 비밀번호를 기록한 다음 포럼 사용자를 데이터베이스에 추가한 다음(비밀번호는 32비트 MD5임) Snowman의 방법을 사용하여 로그인을 통합하고 동기화하는 것입니다. . 참조할 수 있는 함수는 다음과 같습니다.
다음과 같이 코드 코드를 복사합니다.
<%
'포럼 사용자 등록, 매개변수 설명
'사용자 이름 사용자 로그인 이름
'비밀번호 사용자는 로그인 비밀번호를 가지고 있습니다.
'groupid 사용자 그룹 ID, 고위 회원의 경우 사용자 그룹 ID는 17, 일반 회원의 경우 사용자 그룹 ID는 10입니다.
'이메일,실명,휴대폰,전화 이메일,실명,휴대폰,전화
하위 regbbsuser(사용자 이름, 비밀번호, 그룹 ID, 이메일, 실제 이름, 모바일, 전화)
'데이터베이스 연결
MM_conn_bbs_STRING=드라이버={SQL Server};서버=SURUI;uid=sa;pwd=sa;database=ntylswbbs;
connbbs=Server.Createobject(ADODB.Connection) 설정
connbbs.open MM_conn_bbs_STRING
'사용자 이름이 존재하는지 확인하세요.
checkuser=select * from dnt_users 여기서 사용자 이름='&username'
checkuserrs=connbbs.execute(checkuser)를 설정합니다.
checkuserrs.eof가 아니면
사용자가 있다=true
또 다른
사용자 보유=거짓
종료하면
'사용자가 존재하지 않으면 포럼 사용자를 추가하세요.
haveuser=false인 경우
'dnt_users(사용자 정보) 테이블 업데이트
sql1=dnt_users에서 * 선택
rs1=server.createobject(ADODB.Recordset) 설정
rs1.open sql1,connbbs,1,3
rs1.addnew
rs1(사용자 이름)=사용자 이름
rs1(비밀번호)=md532(비밀번호)
rs1(그룹ID)=그룹ID
rs1(이메일)=이메일
rs1.업데이트
RS1.닫기
'새로 생성된 사용자의 ID를 읽습니다.
sql2=dnt_users에서 * 선택(사용자 이름='&사용자 이름')
rs2=server.createobject(ADODB.Recordset) 설정
rs2.open sql2,connbbs,1,1
사용자UID=rs2(UID)
RS2.닫기
'dnt_userfields(사용자 관련 정보) 테이블 업데이트
sql3=dnt_userfields에서 * 선택
rs3=server.createobject(ADODB.Recordset) 설정
rs3.open sql3,connbbs,1,3
rs3.addnew
rs3(uid)=사용자 ID
진짜 이름<>이면
rs3(실명)=실명
종료하면
모바일이라면<>
rs3(모바일)=모바일
종료하면
전화<>라면
RS3(전화)=전화
종료하면
RS3.업데이트
RS3.닫기
'dnt_statistics(포럼 상태 정보) 테이블 업데이트
sql4=dnt_statistics에서 * 선택
rs4=server.createobject(ADODB.Recordset) 설정
rs4.open sql4,connbbs,1,3
rs4(총 사용자)=rs4(총 사용자)+1
rs4(마지막 사용자 이름)=사용자 이름
rs4(마지막 사용자 ID)=사용자 ID
RS4.업데이트
RS4.닫기
종료하면
connbbs.close
서브 끝
'통화 기능
regbbsuser(asp,123456789,18,[email protected],la la la,13580351626,0207235803)로 전화하세요.
%>