웹마스터 팁

  2. Support
  3. 웹마스터 팁

외부페이지에서 로그인 폼 구현하기

2013.09.09 06:31

컴퓨터매니아

많은 분들이 알고 계시는 팁이지만 한번 적어봅니다. PHP 없이도 할 수 있습니다.


<HTML>


<html>
<head>
</head>
<body>
<form action="http://사이트주소/?mid=모듈아이디?act=procMemberLogin" method="post">
   아이디: <input type="text" name="user_id" required="required"><br>
   비밀번호: <input type="password" name="password" required="required"><br>
   <input type="submit" value="Submit">
</form> 
</body>
</html>


'모듈아이디' 부분은 지정하지 않아도 상관없지만 로그인 후 그 페이지로 이동합니다.

단, 로그인 여부를 확인하여 특정 액션을 수행하게 하려면 PHP를 사용해야 합니다.



<VB(Visual Basic)> - 이건 EXE 파일을 만들 때 쓰이는 것입니다.


일단, C:\Windows\System32\WinHttp.dll 참조를 추가하고 원하는 부분에다가 이 코드를 넣습니다.


참고로 TextBox1 은 아이디, TextBox2는 비밀번호입니다.


Dim loginvar As New WinHttp.WinHttpRequest
        If TextBox1.Text.Trim() = "" Or TextBox2.Text.Trim() = "" Then
            MsgBox("아이디와 비밀번호를 입력하세요.", MsgBoxStyle.Exclamation, "로그인 오류")
            TextBox2.Text = ""
            TextBox1.Focus()
        Else
            loginvar.Open("POST", "http://사이트주소/index.php?mid=login_test&act=procMemberLogin")
            loginvar.SetRequestHeader("Referer", "http://사이트주소/?act=dispMemberLoginForm")
            loginvar.SetRequestHeader("Content-Type", "application/x-www-form-urlencoded; charset=UTF-8")                                   loginvar.Send("user_id=" & TextBox1.Text & "&password=" & TextBox2.Text)      loginvar.Send("user_id=" & TextBox1.Text & "&password=" & TextBox2.Text)
            If InStr(System.Text.Encoding.UTF8.GetString(loginvar.ResponseBody), "특정문자열") Then
                MsgBox("로그인 성공", MsgBoxStyle.Exclamation)
            Else
                MsgBox("아이디와 비밀번호가 올바르지 않습니다.", MsgBoxStyle.Exclamation, "로그인 오류")
                TextBox2.Text = ""
                TextBox1.Focus()
            End If

        End If


이 방법을 이용하려면 login_test라는 mid를 만들고 접근 권한을 회원으로 한 뒤 특정 문자열을 집어넣어야 합니다.

그리고 이 방법은 로그인 뒤 특정 액션을 수행할 수 있습니다.

이 게시물을

asdf

좋아요
목록
제목 글쓴이 날짜

등록된 글이 없습니다.
태그 쓰기