웹마스터 팁
외부페이지에서 로그인 폼 구현하기
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를 만들고 접근 권한을 회원으로 한 뒤 특정 문자열을 집어넣어야 합니다.
그리고 이 방법은 로그인 뒤 특정 액션을 수행할 수 있습니다.
댓글 0
| 제목 | 글쓴이 | 날짜 |
|---|---|---|
| 외부페이지에서 로그인 폼 구현하기 | 컴퓨터매니아 | 2013.09.09 |
| [주옥시리즈] 타이틀 제어 애드온 | socialskyo | 2013.09.09 |
| [주옥시리즈] [1.7.4] 로그인창 옆에 신규 쪽지 수 보여주기 [3] | socialskyo | 2013.09.09 |
추천 취소 기능 만들기
[5]
 | Summer | 2013.09.11 |
|
게시글 추천 아이피 가져오기
| Stellar | 2013.09.12 |
| Apache .htaccess 작성요령 [10] | 컴매냐 | 2013.09.19 |
| 스케치북 게시판에 로그인/로그아웃 버튼 만들기 [1] | Arp. | 2013.09.22 |
|
XE 로만든 앱 + 푸쉬기능 구현하기 (안드로이드)
[53]
| Xiso | 2013.10.16 |
| Content 확장위젯2 에서 권한설정 안되던 버그 xe1.7 | garnecia | 2013.11.18 |
|
[수정]알림센터 Lite에 메일발송 기능을 추가하기
[11]
| 매실茶 | 2013.11.25 |
|
소셜 XE 페이스북 로그인 에러 해결 방법
| 신평 | 2013.11.30 |
| 새로운 쪽지 유무에 따라 이미지 변경하는 법 [2] | 멀티비타민 | 2013.12.16 |
| 나만의 익명게시판에서 닉네임 확인하는 방법(꼼수라고 밝힙니다.) [5] | 착한부산남자 | 2014.01.03 |
| 스케치북 게시판 사용시 "내용을 입력해주세요"라고 뜨면서 댓글 입력이 안될경우 체크해봐야할 사항 [1] | socialskyo | 2014.01.07 |
| 1.5 -> 1.7 업글중 백지상태 부분!! | una_nampyeon | 2014.02.03 |
| 스윙브라우저 유저분들 필독. [10] | KSG2013 | 2014.02.08 |
|
글쓰기를 클릭하면 띄워지는 테두리 없는 예쁜 팝업 띄우기 core. 1.7.4
[4]
| 마음의빈자리 | 2014.02.11 |
| nginx 에서 서브도메인 사용시 로그인유지방법 [3] | garnecia | 2014.02.26 |
| 로그인 안하면 코멘트 볼 수 없게 스킨 수정하는 법 [3] | W.O | 2014.03.23 |
| VB.NET에서 XE로그인 연동하기.[내용추가] [3] | AppSeedKorea | 2014.03.26 |