728x90
 
네이트 앱스 프렌즈 파이터즈(FF) 클럽 주소
프로그램 사용방법
1. 프로그램을 다운받는다.
2. 프로그램을 실행한다.
3. 자신의 도장(종목)을 선택한다.
4. 상태편 도장(종목)을 선택한다.
5. 고유번호가 다나올때까지 기다린다.
6. 수동으로 클릭하여 일촌맺기를 신청하거나, 자동으로 일촌신청을 한다.

// 클럽내에있는 일촌맺기 게시판에 올라와있는 게시글을 추출해내서 일촌을 맺는 형식입니다.

프렌즈 파이터즈(FF) 클럽 쉽게 일촌맺기 프로그램 10.12.23
다운로드

// 오류 및 오작동은 댓글로 적어주세요.

/*
제작 환경
윈도우 비스타 서비스 팩2 + 관리자 권한(필수)
인터넷 익스플로러 7
*/


 

728x90

싸이월드 Open일촌평보기 (닫혀있는 일촌평 보기/쓰기)

- 클릭하시면 원본 크기로 보실수 있습니다 -

- 클릭하시면 원본 크기로 보실수 있습니다 -


다운로드 :

사용방법 :
싸이월드 고유번호를 입력하거나, 싸이월드 도메인주소만 입력하시면 됩니다.

프로그램 설명 :
싸이월드 일촌들의 일촌평이 닫혀있을때
일촌평을 볼수 있게 해주는 프로그램이다.

728x90


싸이월드 스크랩 올리기 Returns Ver 2.4.0



사용방법은 프로그램내에 [사용법] 버튼을 클릭하시면 나옵니다.


싸이월드 스크랩 올리기 Returns Ver 2.4.0 다운로드

//
고유번호 심어져 있는거 지우실려면
프로그램이 설치된 폴더에 있는
MCSGO.dll or MCSGO.INI 파일을 삭제해주시면됩니다.
//
에러가 발생시 다운받아 설치해주세요. ( 경로 바꾸시지 마시고 )

문의 - 네이트온(kyh3423@nate.com) & 네이트온(wkrdjqska012@nate.com)
728x90

VB 다음 로그인 주소 소스 (비주얼베이직)



웹브라우저 이름 : w1

w1.Navigate "http://www.daum.net" ' 로그인 페이지

w1.Document.loginform.id.Value = "아이디"
w1.Document.loginform.enpw.Value = "비밀번호"
w1.Document.loginform.submit '확인버튼

728x90

VB 웹브라우저 새창 제어 소스


웹브라우저 이름 : w1 , w2

Private Sub w1_NewWindow2(ppDisp As Object, Cancel As Boolean)
Set ppDisp = w2.Object
'웹브1(w1)에서 발생된 새창(팝업)을 웹브2(w2)에서 이벤트를 발생시킨다
'웹브1에서 발생된 팝업창을 웹브2에서 띄우는겁니다

End Sub

728x90



VB 파일구리 로그인 주소 소스 (비주얼베이직)

 

// 웹브라우저 이름 : w1

w1.Document.loginform1.UserID.Value = "아이디" '아이디
w1.Document.loginform2.Password.Value = "비밀번호" '비밀번호
w1.Navigate "javascript:PreLogin('1');" '로그인버튼

Private Sub Form_Load()
w1.Navigate "http://www.fileguri.com/login/Fglogin.asp?loginGbn=true"  '로그인페이지
End Sub

728x90
VB 티스토리 로그인 주소 소스 (비주얼베이직)


Private Sub Form_Load()
w1.Navigate2 "http://www.tistory.com/"
End Sub

//웹브라우저 이름 w1

w1.Document.All.loginid.Value = "아이디"
w1.Document.All.password.Value = "비밀번호"
w1.Document.loginbox.submit

// http://www.tistory.com/ 메인에서 로그인하는거랑
// 티스토리 http://****.tistory.com/admin 에서 로그인하는건 소스가 약간 다릅니다


참 쉽죠잉?

728x90

VB 네이버 로그인 주소 소스 (비주얼베이직)

Private Sub Form_Load()
w1.Navigate2 "http://static.nid.naver.com/login.nhn?20091104&url=http%3A%2F%2Fwww.naver.com"
End Sub

//웹브라우저 이름 w1

w1.Document.All.uid.Value = "아이디"
w1.Document.All.upw.Value = "비밀번호"
w1.Document.frmNIDLogin.submit '확인버튼



참 쉽죠잉?
728x90

VB 난수 발생 함수 'Rnd' 를 배워보자 (비주얼베이직강좌)



Rnd 함수는 난수를 발생시키는 함수 이다.
0.000001~0.999999 까지의 난수 즉 0도 아니고 1도 아닌 수를 뜻한다.

Rnd 함수를 사용하는 방법은 참 쉽다.
예를 들어

Private Sub Form_Load()
Text1.text = Rnd
End Sub

이런식으로 사용이 가능하다



// 아 귀찮다 ㅋㅋㅋㅋㅋ
// 나도 초본데 누굴 가르쳐..ㅇㅁㅇ

+ Recent posts