갤러리 이미지 04
동영상 샘플04
'Microsoft.Jet.OLEDB.4.0' 공급자는 로컬 컴퓨터에 등록할 수 없습니다.Microsoft.Jet.OLEDB.4.0 은 32bit에서만 작동 된다.그래서, 64bit로빌드 했을때위 에러가 발생함.속성에서 빌드 부분의 플랫폼 대상을 x86 으로 바꾸어 줄 것!웹 인경우에는 IIS 셋팅에서 응용 프로그램 풀의32비트 응용 프로그램 사용을 True 로 바꾸어 줄 것!또는 프로그램 적으로 64bit가 사용가능한"Microsoft.ACE.OLEDB.12.0"을 이용하여 파일을 열면 된다.http:…
PrivateFunctionnhnQRLink(ByValnhnIDAsString,ByValnhnCookieAsString,ByVallinkAsString)AsStringDimTAsString=""Try'ServicePointManager.Expect100Continue=True'ServicePointManager.SecurityProtocol=SecurityProtocolType.TlsOrSecurityProtocolType.Tls11OrSecurityProtocolType.Tls12OrSecurityProt…
Sub로또645_회차별_추첨결과()DimURLAsString,IEAsObject,TAsStringApplication.ScreenUpdating=0SetIE=CreateObject("WinHttp.WinHttpRequest.5.1")URL="https://dhlottery.co.kr/gameResult.do?"URL=URL&"method=allWinExel&nowPage="URL=URL&"&drwNoStart=1&drwNoEnd=65…
vba 사용하는 사람이면 그냥 32비트 깔아라...엑셀 2016을 설치하고 나서 영 불편한 게 아니네요....64 비트 실행 환경에서 ScriptControl이 제공되지 않아 오류가 발생합니다.미래를 생각하는 가장 좋은 방법은 ScriptControl의 대안을 고려하는 것입니다.그러나 다른 수단이 없는 것은 아닙니다.64 비트 Windows에는 32 비트 실행 환경도 있습니다.ScriptControl은 32 비트 실행 환경에서 제공됩니다.Function CreateObjectx86(sProgID) Static oWnd As…
[vb6.0/vba]WinHttp를 이용하여 443포트 통신으로 위키백과(ko.wikipedia.org) 에서 특정 키워드로 검색하여 특정 단어가 있는지 체크하기Functionprogram1472(ByValSearchStringAsString,ByValWordsAsString)DimURLAsString,TAsString,CookieAsStringURL="http://ko.wikipedia.org/wiki/"&URLEncode(SearchString)WithCreateObject("MSXML2.X…
안녕하세요"Sort" 정렬에 대해 올려 봅니다.Sub program1472() [B4].SpecialCells(5).Offset(1).Sort [B5], 1'오름차순' [B4].SpecialCells(5).Offset(1).Sort [B5], 2 '내림차순End Sub명령어 설명드리면...[B4]은 B4셀을 의미 합니다.[B4].SpecialCells(5)은 B4셀에서 인접한 모든 셀입니다..Offset(1)은 1줄 아래 입니다..Sort은 정렬 한다는 거구요[B5]은 B5셀이 기준이 된다는 거구요뒤에 숫자 1은 …
"https://coinmarketcap.com/exchanges/indodax/"의 데이터를 크롤링 하고자 합니다.잘 가지고 옵니다. Subprogram1472_com()DimURLAsString,CookieAsStringDimTAsStringURL="https://coinmarketcap.com/exchanges/indodax/"WithCreateObject("MSXML2.XMLHTTP.6.0").Open"GET",URL.SetRequestHeader…
https://kr.investing.com/equities/south-korea/사이트의 443 포트 접속 파싱하기Subprogram1472_com()DimTAsString,URLAsStringURL="https://kr.investing.com/equities/StocksFilter?noconstruct=1&smlID=694&sid=&tabletype=price&index_id=49661"WithCreateObject("MSXML2.XMLHTTP.6.0").Open…