[VBA]파일 다운로드 하기

Function DownloadFromURL(FileUrl As String, NewFullName As String) Dim oXMLHTTP As Object, oStream As Object On Error GoTo ERROR_EXIT Set oXMLHTTP = CreateObject("MSXML2.XMLHTTP") oXMLHTTP.Open "GET", FileUrl, False oXMLHTTP.send If oXMLHTTP.Status = 200 Then Set oStream = CreateObject("ADODB.Stream") oStream.Open oStream.Type = 1 oStream.Write oXMLHTTP.responseBody oStream.SaveToFile NewFullNam..
Excel & VBA 2023. 8. 10. 15:02
아두이노 드론 모터 제어 테스트

const int MOTOR_A = 23;const int MOTOR_B = 19;const int MOTOR_C = 18;const int MOTOR_D = 26;const int CHANNEL_A = 1;const int CHANNEL_B = 2;const int CHANNEL_C = 3;const int CHANNEL_D = 4;const int MOTOR_FREQ = 5000;const int MOTOR_RESOLUTION = 10;int selectedMotor = 0;int previousMotor = 0;void setup() {  ledcSetupChannels();  ledcAttachPins();  ledcWriteChannels(0);  Serial.begin(115200);}void..
esp32 드론 만들기 2023. 7. 12. 01:58
code128 font

=SUBSTITUTE(code128(A2),"Â"," ")
Excel & VBA 2023. 3. 16. 10:55
code39 font

Excel & VBA 2023. 3. 11. 07:58
엑셀 & VBA - 서식 삭제하기

Range("A1:A15").ClearFormats
Excel & VBA 2023. 3. 6. 18:35
C# chart 데이터 가져오기 연습

private void chart1_MouseClick(object sender, MouseEventArgs e) { HitTestResult result = chart1.HitTest(e.X, e.Y); if (result.ChartElementType == ChartElementType.DataPoint && result.PointIndex != -1) { Log(result.PointIndex.ToString()); } }
C# Programming 2023. 1. 4. 08:23
Sqlite 테이블 비우기

sqlite에는 truncate 가 없습니다 대신 delete from 테이블명; 이라고 하면 truncate와 같은 기능을 합니다
Sqlite Database 2023. 1. 3. 21:21
Ebest 뉴스 받기

readonly XARealClass NWS = new XARealClass(); void NewsRequest() { NWS.ResFileName = @"Res\NWS.res"; NWS.SetFieldData("InBlock", "nwcode", "NWS001"); NWS.AdviseRealData(); } private void NWS_ReceiveRealData(string szTrCode) { string date = NWS.GetFieldData("OutBlock", "date"); string time = NWS.GetFieldData("OutBlock", "time"); string id = NWS.GetFieldData("OutBlock", "id"); string realkey = NWS..
System Trading 2022. 11. 27. 15:03
1 2 3 4 5 6 ··· 16