For문 사용하는데 30초에 100개....
갅쥐누뉨
2023.04.01
함수내용┌─────────────────┐ 함수이름 :Change winhttp로 사이트 로그인해서~ 어쩌구 맞으면 true 틀리면 false└─────────────────┘소스num= 5000For i = 0 To 999999
If change(Form1.Text1.Text) = True Then
MsgBox 성공적으로 올렸습니다!
Exit For
Else
num =num + 1
End If
Ifnum =10000 Then
Exit For
End If
DoEvents이렇게 작성하고num 변수를 5000을 지정하고for문으로 함수에 넣어서 True가 되면 메세지박스가 뜨게하고아니면 num에 1을 더해서 다시 함수돌리기이걸 돌리면 30초에 100개밖에 못하네요,,넘 느린데 빠르게할방법이 없는건가요?
Next i
-
루리
num = 5000
For i = 0 To 999999
If check(Form1.Text1.Text) = True Then
MsgBox \성공적으로 올렸습니다!\
Exit For
Else
num = num + 1
End If
If num = 10000 Then
Exit For
End If
DoEvents
Next i
일단 이 소스는 어떤가요? 비효율적인지..??
한줄로 쓸수있는걸 2줄이상으로 늘어 놨다던가,, 틀린점좀 지적해주세요 -
감추어왔던
사이트가 느리거나 코드를 비효율적으로 짜신거같음
-
내담
로그인을 반복한다는건가여?
| 번호 | 제 목 | 글쓴이 | 날짜 |
|---|---|---|---|
| 2698617 | 윈속.ocx다운받는곳좀여 | 안토니 | 2025-06-18 |
| 2698588 | 자 나를 즐겁게 해봐요 | 다흰 | 2025-06-18 |
| 2698529 | 이거 저작권 상,고,명인데 점부탇드림 (3) | 서향 | 2025-06-17 |
| 2698503 | 오늘도~윈속질문이요~ | 텐시 | 2025-06-17 |
| 2698478 | 비베6에서 exe파일만들때 자동링커되려면 | 달달한캔디 | 2025-06-17 |
| 2698431 | 파일 주소 숨기고 다운로드 하게 하는 방법! (질문임..) (1) | 비마중 | 2025-06-16 |
| 2698405 | 어떤 dll 이 제 보안프로그램 메모리를 자꾸 변조하는데. (2) | 귀염포텐 | 2025-06-16 |
| 2698372 | 웹브라우저 특정부분 보여주기 | 보물선 | 2025-06-16 |
| 2698343 | 위도우 8 - 비주얼베이직 6.0 설치 오류..(Heple...Me..ㅠ_ㅠ) (2) | 접시 | 2025-06-16 |
| 2698319 | 하다가 도중에 오류가떠서 특정부분으로 가게하는건어떻게하나요? | 연하늘 | 2025-06-15 |
| 2698292 | 밑 질문에 이어서 하나 더 질문합니다. | 단화한 | 2025-06-15 |
| 2698262 | 컴포넌트를 내장시킬 방법이 있나요? (1) | 늘다 | 2025-06-15 |
| 2698236 | 소스를 프로그램이 실행하는 기능을 뭐라하나요? | 단순랩퍼 | 2025-06-15 |
| 2698213 | 화면을 스크린 찍는방법과 전송하는방법 (3) | 이치코 | 2025-06-14 |
| 2698185 | 제한된계정으로 레지스트리 등록 | 김애교 | 2025-06-14 |
| 2698149 | 질문좀해볼께요 | 다연 | 2025-06-14 |
| 2698121 | 비베 질문해봅니다.ㅋ | 물병자리 | 2025-06-14 |
| 2698092 | 작업관리자를 Kill로해서 못키게할껀데요 ㅋㅋ (2) | 글길 | 2025-06-13 |
| 2698061 | 타이머 시간 늘리기 인터벌 | 나슬 | 2025-06-13 |
| 2698032 | 질문함니다 (폼문제) (1) | 매1혹 | 2025-06-13 |