vb 할줄아는형 있으신가 사진업로드하려고하는데 좀 힘들어요 도와주세요

i5-760(220.94) 2012.12.17 15:35:43

조회 144 추천 0 댓글 1

Function UploadImage(winsock As winsock)

Dim filen$, strBoundary$, header$, footer$, head$

Dim temp() As Byte

filen = App.Path & "\image" & NowfileName & ".png"

strBoundary = "---------------------------7d9399321e05d2"

header = "--" & strBoundary & vbCrLf & _

"Content-Disposition: form-data; name=""userfile""; filename=""11.png""" & vbCrLf & _

"Content-Type: ""image/png""" & vbCrLf & vbCrLf

footer = vbCrLf & "--" & strBoundary & "--" & vbCrLf

winsock.Close

winsock.Connect "upload.krkrkrkr.kr", 80

DoEvents

sleep 1

Loop While winsock.State <> sckConnected

head = "POST /ajaxUpload_ok.php HTTP/1.0" & vbCrLf & _

"Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, */*" & vbCrLf & _

"Content-Type: multipart/form-data, boundary=" & strBoundary & vbCrLf & _

"Host: upload.krkrkrkr.kr" & vbCrLf & _

"Cache-Control: no-cache" & vbCrLf & _

"Content-Length: " & CLng(Len(header) + Len(footer) + FileLen(filen)) & vbCrLf & _

vbCrLf & header

winsock.SendData head

Open filen For Binary Access Read As #1

ReDim temp(LOF(1))

Get #1, , temp

Close #1

' 파일의 바이너리 읽어오는 부분

winsock.SendData temp

winsock.SendData footer

End Function

이게 네이버 카페에서본 이미지 업로드하는소스인데

vb6.0소스라서그런지 .net에선 안먹힘..

솔직히 저소스도 잘 이해안되는데 좀 도와주세요 사진업로드하는거 꼭만들어야됨 ㅜㅜ

고정닉 0

전체 댓글 0개

등록순 최신순 답글순

본문 보기

타인의 권리를 침해하거나 명예를 훼손하는 댓글은 운영원칙 및 관련 법률에 제재를 받을 수 있습니다.
Shift+Enter 키를 동시에 누르면 줄바꿈이 됩니다.

갤러리 리스트
번호	제목	글쓴이	작성일	조회	추천
설문	이번주 설문은 탈모 걱정 없어 보이는 머리숱 금수저 스타는?	운영자	25/07/14	-	-
AD	디지털 액세서리 기간한정 세일!	운영자	25/07/11	-	-
341130	★딴지라디오 13시간 연속 투표 생중계 방송	ㅇㄹㅇ(1.227)	12.12.19	52	0
341129	다트 M2의 새 기능 [2]	고랭?	12.12.19	93	0
341128	아침이 밝았습니다.	ㅇ(110.15)	12.12.19	57	0
341126	1빠로 투표할라고 왔는데 사람많네	얼룩돼지	12.12.19	46	0
341125	i － SCSI． [1]	때릴꺼야?(116.40)	12.12.19	53	0
341124	리눅스 이클립스 좃같은 버그 있던데	길가던놈	12.12.19	74	0
341123	횽들 Cocos2d에서 텍스트 파일 읽는거 도와줭 ㅠㅠ [1]	코코스씨1발(14.55)	12.12.19	82	0
341122	클라우드 서버에 바이러스 감염되면 얼마나 좆이냐?	asdasd(119.82)	12.12.19	56	0
341121	클라우드 컴퓨팅? 옛날부터 터미널이라고 불리던거 아님? [8]	ㄹ(118.176)	12.12.19	217	0
341120	간신히 성공했다	12(59.12)	12.12.19	122	0
341119	인공지능 알고리즘 책 춫천좀	asdasd(119.82)	12.12.19	73	0
341117	컴공 대학원 분야가 뭐뭐있냐?	asdasd(119.82)	12.12.19	98	0
341116	aovltmxh@naver.com 이놈 예의가 없네. [4]	그나저나(121.167)	12.12.18	138	0
341115	수학기호에서 연산기호가 먼지 알 수 없을때 어떻게 표기 하나요? [1]	11(220.79)	12.12.18	67	0
341113	연말연초에는 구직이 어렵겠지? [1]	ㅁㅁ(49.1)	12.12.18	118	0
341111	프로그램 개발의뢰 했다 ㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋ [7]	햄톨(222.96)	12.12.18	282	0
341109	횽들아 이거 무슨 영상이야??? 무한 동력이야??? [7]	멍청닭(182.211)	12.12.18	188	0
341108	내 아는사람이 이렇게 조언을 해줬는데... 복잡하다 ㅠㅠ [4]	나의 아는사(222.96)	12.12.18	147	0
341107	mac용 이클립스 질문좀횽들 [10]	Ping_2_U	12.12.18	111	0
341106	삼성 소프트웨어 멤버십 [2]	a(175.192)	12.12.18	366	0
341105	ㅇㅇ	sexer1	12.12.18	33	0
341104	삼성 소프트웨어 멤버쉽 하지마라 [4]	sexer1	12.12.18	553	0
341102	솔직히 컴공나오면 그냥 대학교중퇴해라 [25]	소크락텍스(211.112)	12.12.18	467	0
341101	근데 대학에서 다클라우드쓰는거아니였냐?	ㅇ(211.234)	12.12.18	54	0
341100	개발자 형님들 좀 돠주세요 JSP 팝업존 자바스크립트(jquery)! [1]	궁금한게많으	12.12.18	159	0
341098	NIO vs IO	Kyle(220.244)	12.12.18	125	0
341096	아 도배하려고 도배한게 아니라 오류나서 안올려지는줄 알고 계속했는데 다	123(116.120)	12.12.18	28	0
341095	이제 자바 배우는데 처음부터 막혔어요 HELP!!! [5]	ㄹㄷ(116.120)	12.12.18	123	0
341094	이제 자바 배우는데 처음부터 막혔어요 HELP!!!	fe(116.120)	12.12.18	36	0
341093	내일은 투표일입니당~	멍청닭(182.211)	12.12.18	30	0
341092	형들 이거 무슨파일인지 좀 봐줘 ㅠㅠ	햄톨(222.96)	12.12.18	56	0
341091	이제 자바 배우는데 처음부터 막혔어요 HELP!!!	ㄹㄷ(116.120)	12.12.18	44	0
341089	컴공 비전 없다고 말하는데.. 멀리보면 있다. [8]	형이다(14.45)	12.12.18	411	1
341088	진로 질문좀.. 펌웨어 vs 외국계 회사 웹, 어플 개발 [2]	잉잉잉	12.12.18	159	0
341087	기독교에서 말하는 삼위일체는 배열변수 아니냐? [4]	ㅇㅇ(175.199)	12.12.18	76	0
341086	지방4년제 겜공과 다니다가 현재는 대기업 생산직.. [3]	겜프..(58.236)	12.12.18	241	0
341085	우리학교 클라우드 컴퓨터다. 본체가 없다. [6]	ㅇㅇㅇ(1.209)	12.12.18	244	0
341083	헤헤 꼬꼬마가 다시한번만 질문할게여 ㅎ [7]	ㅇ(1.242)	12.12.18	89	0
341082	25 고졸 -> 직장&방통대 -> 대학원 가능할까요?? [2]	ㅋㅋ(121.167)	12.12.18	331	0
341080	안드로이드 스레드 질문합니다.	질문(218.158)	12.12.18	54	0
341078	꼬마가 형님들에게 질문점 ㅎㅎ [2]	ㅇ(1.242)	12.12.18	57	0
341077	안드로이드앱개발앤 자바가 적절하나요? [4]	날개샀지예	12.12.18	167	0
341075	1학년 수업 들엇는데 후배보다 못함 질문받는다 [2]	ssapo	12.12.18	89	0
341074	형들 리눅스 에서 fsck 명령을 쳤는데 [2]	ddd(121.169)	12.12.18	71	0
341073	다른 SQL 질문 [2]	543543	12.12.18	65	0
341072	ㄴㅇㄹ야 과제 다했다. [9]	WannaParty	12.12.18	142	0
341070	c언어 배열의 이름을 어떻게 바꾸죠? [7]	urban(121.151)	12.12.18	140	0
341067	sts라고 안드로이드하는거 잇는데 그걸로 이용한 간단한 게임 및 프로젝트 [1]	자노짱	12.12.18	55	0
341066	jquery ajax json 이거 세기술을 쓰는데 [14]	천국거지	12.12.18	171	0
341065	형들 멀티프로세스좀 도와주세연..	WannaParty	12.12.18	32	0
뉴스	'우리는 잉꼬부부가 아닙니다' 국제 부부로 변신한 수라 부부! 잉꼬 하우스 최초 국제 고민 부부 등장!	디시트렌드	18:00