웹마스터 팁

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        If ID.Text = "" Or PW.Text = "" Then '필드에 아무것도 없다면
            MsgBox("아이디 또는 비밀번호를 입력해주세요.", vbExclamation, "Error") '에러를 뿜는다.
            Exit Sub
        End If

        WinHttp.Open("POST", "http://홈페이지주소/index.php?mid="MID주소입력"&act=dispMemberLoginForm") '회원로그인폼주소를 입력.
        WinHttp.SetRequestHeader("Content-Type", "application/x-www-form-urlencoded")
        WinHttp.Send("error_return_url=%2Findex.php%3Fmid%3D"MID주소입력"%26act%3DdispMemberLoginForm&mid="MID주소입력"&vid=&ruleset=%40login&success_return_url=http%3A%2F%2F사이트주소입력(HTTP제외)%2Findex.php%3Fmid%3D"MID주소입력"&act=procMemberLogin&xe_validator_id=modules%2Fmember%2Fskin%2Fdefault%2Flogin_form%2F1&user_id=" & ID.Text & "&password=" & PW.Text)
        WinHttp.WaitForResponse()

        If InStr(WinHttp.ResponseText, "message error") Then '요청했던 값에 Message error 문구가 포함되어있으면 에러처리
            MsgBox("로그인에 실패하였습니다 아이디와 비밀번호를 확인하세요" & vbCrLf & "가입되어있지않다면 회원가입후 사용해주세요")
        Else
            Me.Hide() '현재 폼을 숨김
            ' 숨기고 보여줄폼을 입력
        End If
    End Sub

이방법은 간단히 Winhttp를 이용한 방법입니다.


1. 프로젝트 생성

2. 참조에서 winhttp 참조 추가

3. 로그인버튼생성(이름ID)

4. 해당소스입력


예제 파일은 제홈페이지 http://appseedkorea.com 의 XE팁에서 다운로드 가능합니다.

개발하시는데 참고가 되시기바랍니다.


--추가부분--

이소스가 무슨말인지 모르겟다!?!? 라는 분은 http://appseedkorea.com 1:1문의란에

사이트주소 :

테스트아이디 / 비번 :

남겨주시면 해당소스를 맞게 짜서 AppSeedKorea내 XE자료실에 업로드해드립니다.

(별도 메일발송 불가)

단 로그인이외의 지원은 불가합니다


태그 연관 글
  1. [2019/10/20] 묻고답하기 소셜xe 오류이후 관리자 로그인 기능이 사라졌습니다. by 양현석
  2. [2019/03/17] 묻고답하기 제 사이트가 갑자기 로그인이 먹통입니다. by 현명한박사
  3. [2017/12/20] 묻고답하기 로그인이 되지 않습니다. by 0115 *3
  4. [2017/07/20] 묻고답하기 이거 로그인 대문? 어떻게 하나요ㅜㅜ 봐도 모르겠어요ㅜㅜ by 노루 *1
  5. [2016/07/16] 묻고답하기 하나의 XE계정으로 여러 사이트에서 로그인 할 수 있는 방법이 없을까요? by 스카이즈 *1
제목 글쓴이 날짜
한 페이지(화면)에 두개(2개)의 모듈(게시판 등)을 넣는 법 [6] 황건순 2008.08.25
음악넣는 BGM코드 70종류 입니다 [1] 푸른커튼 2008.08.25
댓글(코멘트) 입력창에 이미지 넣기 [19] file skyatc 2008.08.29
밑에 페이지 네비게이션 수정 (다음10개, 이전10개등으로) [6] file Clanss 2008.08.29
메인화면에 플래시 쉽게 삽입하는 방법.. [12] 청개구리00 2008.08.30
문서 카테고리를 메뉴에 적용하기 위한 레이아웃 수정 팁과 개념토론 [7] 제베 2008.08.31
원하는 위치에 구글 (맞춤)검색창 달기 [2] 다케루 2008.09.02
각 리스트형 위젯에 페이지 기능을 달자. [10] 라르게덴 2008.09.02
[우클릭 및 드레그 방지법] 및 [방지된 홈페이지 해재법] >0< [7] 이홍석295 2008.09.03
카멜레온 최근글 위젯 클릭시 새창 팁 가랑바람 2008.09.04
회원 포인트 선물 하기 등 포인트 변경시 바로 적용 방법 한꼬마 2008.09.06
동일서버내 페이지에서 로그인정보 활용하기... [4] 수로 2008.09.06
다음카페에 끊김없이 음악나오게 하기 푸른커튼 2008.09.06
등록하시겠습니까? 등록할까요? 안 나오고 바로 글 등록되게 하는 법 [6] 황건순 2008.09.08
블로그, 홈페이지 가입시 자동 입력되는 http:// 없애기 [2] 류영무 2008.09.09
IP 주소 4자리수 모두 공개하는 방법 [1] 블루파티 2008.09.11
에디터 9pt 추가 및 에디터에도 웹폰트 보이게 하기. [13] file 욜리 2008.09.11
사진 한꺼번에 일괄적으로 올리기 [4] 안정수650 2008.09.12
게시판 에디터 폰트 글자(글씨)크기 변경하는 법 씨에씨에 2008.09.12
주소록 구현 (외부 페이지) [17] CSLab 2008.09.15