摘要:
如果像我一样,你面对的是一些只接受表单内容的第三方网络服务,你可以解决这个问题: // Let's assume you've got your key-value pairs organised into a nice Dictionary<string, string> called formD 阅读全文
摘要:
@echo off for /f "skip=3 tokens=4" %%i in ('sc query RabbitMQ') do set "zt=%%i" &goto :next :next if /i "%zt%"=="RUNNING" ( echo 已经发现该服务在运行,现在已经停止运行 r 阅读全文
摘要:
Sub sleep(T As Long) Dim time1 As Long time1 = timeGetTime Do DoEvents Loop While timeGetTime - time1 < T End Sub Sub getpicture() Dim d, i&, sp As Sh 阅读全文
摘要:
'Sub getpicture() 'Dim d, i&, sp As Shape, arr 'Set d = CreateObject("scripting.dictionary") 'For Each sp In Sheet1.Shapes ' If sp.Type = msoPicture T 阅读全文