URL image convert to Base64 String

Progmming/.Net|2019. 5. 9. 09:59
반응형

웹상에 이미지를 Base64 인코딩해서 저장 할 때


VB.net

WebClient wc = new WebClient();
byte[] bytes = wc.DownloadData("https://k.kakaocdn.net/dn/r7sss/btquy1QuriI/TBzrcBzkzzj6SucXKqbYR0/img.png");

' Base64 인코딩
base64Str  = Convert.ToBase64String(bytes)


※ 참고 사이트


https://stackoverflow.com/questions/11801630/how-can-i-convert-image-url-to-system-drawing-image

댓글()

전송 연결 net_io_connectionclosed에서 데이터를 읽을 수 없습니다.

에러노트|2019. 3. 15. 13:47
반응형

오류 메시지  : 전송 연결 net_io_connectionclosed에서 데이터를 읽을 수 없습니다.


vb.net 에서 SmtpClient + google smtp 로 메일 발송 시 오류가 남.



SmtpClient는 SSL 모드 (포트 465에 필요한 것)로 SMTP 서버에 연결하는 것을 지원하지 않기 때문에 발생한 오류.


smtpMail = New SmtpClient()

smtpMail.EnableSsl = True

smtpMail.UseDefaultCredentials = False


그리고 기존에 465 포트를 이용했다면 587로 변경.



위와 같이 변경하면 정상적으로 메일 발송이 가능함.

댓글()

[vb.net] 정해진 시간에 지정 URL로 브라우저 실행하는 프로그램

Progmming/.Net|2018. 6. 19. 16:38
반응형

얼마전부터 새로이.. 어플리케이션 공부를 시작했습니다.


어딘가 특별나게 써먹을 목적으로 하는건 아니고 


그때 그때 필요한게 있으면 만들어서 써볼까하는 마음으로요.




10원짜리 툴 첫번째.




개발 배경 


지정 시간에 오픈하는 핫딜의 경우 까먹기 쉬워서


알람도 맞추고 했으나 결국은 로그인하다가 시간 까먹고 끝..


그래서 지정된 시간에 브라우저 열어주면 좋겠다 싶어서 만들었습니다.


한때는 https://time.navyism.com/ 네이비즘 사이트도 애용했으나 


그 기능을 합쳐서 도전.







사용법 


1. 핫딜 오픈 시간 입력.


2. 몇분전에 알림 받을 지 선택 ( 기본 3분전 )


3. 핫딜 URL 입력 길어도 됩니다. 그냥 몽땅 때려넣음.


4. 시작



시작되면 몇초가 남았는지..나오고 0초가 되면 브라우저가 실행됩니다.



64Bit OS가 기본이라 생각(?)하고 브라우저는 


C:\Program Files (x86)\Google\Chrome\Application\chrome.exe 


C:\Program Files\Internet Explorer\iexplore.exe


위 2개의 경로를 확인하여 실행합니다.


윈도우 기본 브라우저 경로를 어떻게 가져와야 하는지 모르겠네요..


-_-ㅎ.. 아시는분 팁좀 부탁드립니다.





각각의 실행 파일과 소스 파일를 첨부합니다.


HDA.exe


HDA.zip




ps. 개인적인 스터디와 재미 , 흥미로 인한 코딩이므로 무의미한 디스는 거부하겠습니다. 

반사!



적절한 조언은 감사히 받겠습니다 :)

댓글()

[ VB.net ] 특정 웹서버 시간 읽어오기

Progmming/.Net|2018. 6. 4. 14:14
반응형

핫딜 주소와 시간을 셋팅해서 


구매시에 도움을 주는 CS프로그램을 하나 만들어보려고 하는 중에 정리.


1분 1초가 중요한 거라 해당 웹 서버의 시간을 읽어와서 처리하는 샘플 코드.


요점은 WebResponse의 해더에서 Date를 읽어와서 이용하는 것. 


아래는 인터파크의 웹서버 시간을 읽어오기 위한 코드.


   

Imports System.Net

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim myHttpWebRequest As HttpWebRequest = CType(WebRequest.Create("http://www.interpark.com"), HttpWebRequest)
        Dim myHttpWebResponse As HttpWebResponse = CType(myHttpWebRequest.GetResponse(), HttpWebResponse)

        Dim i As Integer
        While i < myHttpWebResponse.Headers.Count
            Console.WriteLine(ControlChars.Cr + "Header Name:{0}, Value :{1}", myHttpWebResponse.Headers.Keys(i), myHttpWebResponse.Headers(i))
            i = i + 1
        End While


        myHttpWebResponse.Close()

        myHttpWebRequest = Nothing
        myHttpWebResponse = Nothing

    End Sub
End Class



출력 결과 형태는 굵게 표시한 Date 를 이용하면 된다.


Header Name:Age, Value :182


Header Name:Vary, Value :Accept-Encoding, User-Agent


Header Name:Content-Length, Value :2935


Header Name:Content-Type, Value :text/html


Header Name:Date, Value :Mon, 04 Jun 2018 05:15:04 GMT


Header Name:Last-Modified, Value :Wed, 28 Feb 2018 05:30:03 GMT


Header Name:P3P, Value :CP="ALL CURa ADMa DEVa TAIa OUR BUS IND PHY ONL UNI PUR FIN COM NAV INT DEM CNT STA POL HEA PRE LOC OTC"


댓글()