{"id":13423,"date":"2020-12-24T12:00:32","date_gmt":"2020-12-24T03:00:32","guid":{"rendered":"https:\/\/www.ka-net.org\/blog\/?p=13423"},"modified":"2020-12-24T16:09:55","modified_gmt":"2020-12-24T07:09:55","slug":"input-type-file%e3%81%ae%e3%80%8c%e3%82%a2%e3%83%83%e3%83%97%e3%83%ad%e3%83%bc%e3%83%89%e3%81%99%e3%82%8b%e3%83%95%e3%82%a1%e3%82%a4%e3%83%ab%e3%81%ae%e9%81%b8%e6%8a%9e%e3%80%8d%e3%83%80%e3%82%a4","status":"publish","type":"post","link":"https:\/\/www.ka-net.org\/blog\/?p=13423","title":{"rendered":"input type file\u306e\u300c\u30a2\u30c3\u30d7\u30ed\u30fc\u30c9\u3059\u308b\u30d5\u30a1\u30a4\u30eb\u306e\u9078\u629e\u300d\u30c0\u30a4\u30a2\u30ed\u30b0\u3092\u5236\u5fa1\u3059\u308bVBA\u30de\u30af\u30ed"},"content":{"rendered":"

\u4e45\u3057\u3076\u308a\u306eVBA\u30cd\u30bf\u3067\u3059\u3002
\n\u300cInternet Explorer\u3092\u64cd\u4f5c\u3057\u3066 input type="file" \u3067\u8868\u793a\u3055\u308c\u308b\u201c\u30a2\u30c3\u30d7\u30ed\u30fc\u30c9\u3059\u308b\u30d5\u30a1\u30a4\u30eb\u306e\u9078\u629e\u30c0\u30a4\u30a2\u30ed\u30b0\u201d\u3092\u5236\u5fa1\u3067\u304d\u306a\u3044\u304b\uff1f\u300d<\/i>\u3068\u306e\u3054\u8cea\u554f\u3092\u3044\u305f\u3060\u304d\u307e\u3057\u305f\u3002<\/p>\n

Q&A\u30b5\u30a4\u30c8\u3067\u3082\u305f\u307e\u306b\u898b\u304b\u3051\u308b\u8cea\u554f\u3067\u3059\u3002
\n\u305d\u308c\u3060\u3051\u591a\u304f\u306e\u65b9\u304c\u8e93\u304b\u308c\u3066\u3044\u308b\u306e\u3060\u308d\u3046\u3068\u601d\u3044\u307e\u3059\u3002<\/p>\n

\u6700\u521d\u306b\u65ad\u3063\u3066\u304a\u304d\u307e\u3059\u3068\u3001\u500b\u4eba\u7684\u306b\u306f input type="file" \u306e\u5236\u5fa1\u306f\u8003\u3048\u306a\u3044\u65b9\u304c\u826f\u3044<\/span>\u3068\u601d\u3063\u3066\u3044\u307e\u3059\u3002<\/p>\n

\u30bb\u30ad\u30e5\u30ea\u30c6\u30a3\u4e0a\u306e\u89b3\u70b9\u304b\u3089IE8\u306e\u6642\u70b9\u3067\u3059\u3067\u306b\u8aad\u307f\u53d6\u308a\u5c02\u7528\u306b\u306a\u3063\u3066\u3044\u307e\u3059\u3057(\u4e0b\u8a18\u53c2\u7167)\u3001\u3053\u3053\u3092\u7121\u7406\u3057\u3066\u81ea\u52d5\u5316\u3059\u308b\u3088\u308a\u306f\u3001\u30b5\u30a4\u30c8\u5074\u3067\u7528\u610f\u3055\u308c\u3066\u3044\u308bAPI\u7b49\u3001\u6b63\u898f\u306e\u65b9\u6cd5\u3092\u691c\u8a0e\u3057\u305f\u65b9\u304c\u826f\u3044\u3060\u308d\u3046\u3068\u601d\u3044\u307e\u3059\u3002<\/p>\n

\u30e6\u30fc\u30b6\u30fc\u304c\u5165\u529b\u3059\u308b\u30ed\u30fc\u30ab\u30eb \u30d5\u30a1\u30a4\u30eb\u306e\u30d1\u30b9\u3092\u30ad\u30fc\u30b9\u30c8\u30ed\u30fc\u30af\u306e\u76e3\u8996\u306b\u3088\u3063\u3066 \u201c\u76d7\u3080\u201d \u653b\u6483\u3092\u9632\u3050\u305f\u3081\u3001\u30d5\u30a1\u30a4\u30eb \u30d1\u30b9\u306e\u7de8\u96c6\u30dc\u30c3\u30af\u30b9\u3092\u8aad\u307f\u53d6\u308a\u5c02\u7528\u306b\u3057\u307e\u3057\u305f\u3002\u30d5\u30a1\u30a4\u30eb\u3092\u30a2\u30c3\u30d7\u30ed\u30fc\u30c9\u3059\u308b\u5834\u5408\u3001\u30e6\u30fc\u30b6\u30fc\u306f\u30d5\u30a1\u30a4\u30eb\u306e\u53c2\u7167\u30c0\u30a4\u30a2\u30ed\u30b0 \u30dc\u30c3\u30af\u30b9\u3092\u4f7f\u7528\u3057\u3066\u30d5\u30a1\u30a4\u30eb\u3092\u6307\u5b9a\u3059\u308b\u5fc5\u8981\u304c\u3042\u308a\u307e\u3059\u3002<\/p><\/blockquote>\n

https:\/\/docs.microsoft.com\/ja-jp\/previous-versions\/msdn10\/dd550608(v=msdn.10)<\/a> \u3088\u308a<\/p>\n

\u3068\u306f\u3044\u3048\u3001 input type="file" \u3067\u8868\u793a\u3055\u308c\u308b\u300c\u30a2\u30c3\u30d7\u30ed\u30fc\u30c9\u3059\u308b\u30d5\u30a1\u30a4\u30eb\u306e\u9078\u629e\u300d\u30c0\u30a4\u30a2\u30ed\u30b0\u306e\u5236\u5fa1\u306b\u306f\u8208\u5473\u304c\u3042\u3063\u305f\u306e\u3067\u3001\u4eca\u56de\u8a66\u3057\u3066\u307f\u308b\u3053\u3068\u306b\u3057\u307e\u3057\u305f\u3002<\/p>\n

input type="file" \u306e\u300c\u30a2\u30c3\u30d7\u30ed\u30fc\u30c9\u3059\u308b\u30d5\u30a1\u30a4\u30eb\u306e\u9078\u629e\u300d\u30c0\u30a4\u30a2\u30ed\u30b0\u3092\u5236\u5fa1\u3059\u308bVBA\u30de\u30af\u30ed<\/h4>\n

\u203b\u4e0b\u8a18\u30b3\u30fc\u30c9\u306e\u5b9f\u884c\u306f\u81ea\u5df1\u8cac\u4efb\u3067\u884c\u3063\u3066\u304f\u3060\u3055\u3044\u3002<\/span>
\n\u203b\u4e0b\u8a18\u30b3\u30fc\u30c9\u306f\u30c0\u30a4\u30a2\u30ed\u30b0\u306e\u4ed5\u69d8\u5909\u66f4\u306b\u3088\u3063\u3066\u3001\u5b9f\u884c\u3067\u304d\u306a\u304f\u306a\u308b\u53ef\u80fd\u6027\u304c\u3042\u308a\u307e\u3059\u3002<\/span><\/p>\n

Option Explicit\r\n\r\nPublic Sub Sample()\r\n  Dim tmpFolderPath As String\r\n  Dim scriptPath As String\r\n  Dim batchPath As String\r\n  Dim dt As String\r\n  Const TemporaryFolder = 2\r\n  Const READYSTATE_COMPLETE = 4\r\n  Const UploadFilePath = "C:\\wk\\tmp\\\u6f22 \u5b57 \u30d5\u30a1\u30a4\u30eb\u30c6_\u30b9_\u30c8.txt" '\u30a2\u30c3\u30d7\u30ed\u30fc\u30c9\u3059\u308b\u30d5\u30a1\u30a4\u30eb\u306e\u30d1\u30b9\r\n  \r\n  '\u30b9\u30af\u30ea\u30d7\u30c8\u30fb\u30d0\u30c3\u30c1\u306e\u30d1\u30b9\u8a2d\u5b9a\r\n  dt = Format(Now, "yyyymmddhhnnss")\r\n  With CreateObject("Scripting.FileSystemObject")\r\n    tmpFolderPath = .GetSpecialFolder(TemporaryFolder).Path\r\n    scriptPath = .BuildPath(tmpFolderPath, dt & "_SendFilePathToUploadDialog.ps1")\r\n    batchPath = .BuildPath(tmpFolderPath, dt & "_SendFilePathToUploadDialog.bat")\r\n  End With\r\n  \r\n  'IE\u64cd\u4f5c\r\n  With CreateObject("InternetExplorer.Application")\r\n    .Visible = True\r\n    .Navigate "https:\/\/localhost\/sample\/file.html"\r\n    Do While (.Busy = True) Or (.ReadyState <> READYSTATE_COMPLETE)\r\n      DoEvents\r\n    Loop\r\n    \r\n    '[\u30a2\u30c3\u30d7\u30ed\u30fc\u30c9\u3059\u308b\u30d5\u30a1\u30a4\u30eb\u306e\u9078\u629e]\u30c0\u30a4\u30a2\u30ed\u30b0\u8868\u793a\u524d\u306b\u30d1\u30b9\u8a2d\u5b9a\u51e6\u7406\u5b9f\u884c\r\n    SendFilePathToUploadDialog UploadFilePath, scriptPath, batchPath\r\n    .document.getElementsByTagName("input")(0).Click\r\n    \r\n    .document.getElementsByTagName("input")(1).Click\r\n  End With\r\n  \r\n  Kill scriptPath: Kill batchPath '\u30b9\u30af\u30ea\u30d7\u30c8\u30fb\u30d0\u30c3\u30c1\u524a\u9664\r\nEnd Sub\r\n\r\nPrivate Sub SendFilePathToUploadDialog(ByVal TargetFilePath As String, _\r\n                                       ByVal ScriptFilePath As String, _\r\n                                       ByVal BatchFilePath As String)\r\n'[\u30a2\u30c3\u30d7\u30ed\u30fc\u30c9\u3059\u308b\u30d5\u30a1\u30a4\u30eb\u306e\u9078\u629e]\u30c0\u30a4\u30a2\u30ed\u30b0\u306b\u30d5\u30a1\u30a4\u30eb\u30d1\u30b9\u8a2d\u5b9a\r\n  Dim scriptCode As String\r\n  Dim batchCode As String\r\n  \r\n  scriptCode = GetPSCode(TargetFilePath)\r\n  batchCode = "@echo off" & vbCrLf\r\n  batchCode = batchCode & "cd \/d %~dp0" & vbCrLf\r\n  batchCode = batchCode & "PowerShell -NoProfile -ExecutionPolicy Unrestricted """ & ScriptFilePath & """"\r\n  \r\n  '\u30b9\u30af\u30ea\u30d7\u30c8\u30fb\u30d0\u30c3\u30c1\u4f5c\u6210\r\n  CreateScriptFile scriptCode, ScriptFilePath\r\n  CreateScriptFile batchCode, BatchFilePath, "Shift-JIS"\r\n  \r\n  '\u30d0\u30c3\u30c1\u7d4c\u7531\u3067\u30b9\u30af\u30ea\u30d7\u30c8\u5b9f\u884c\r\n  CreateObject("WScript.Shell").Run BatchFilePath, 2, False\r\nEnd Sub\r\n\r\nPrivate Sub CreateScriptFile(ByVal Code As String, _\r\n                             ByVal TargetFilePath As String, _\r\n                             Optional ByVal FileCharset As String = "UTF-8")\r\n'\u30b9\u30af\u30ea\u30d7\u30c8\u30fb\u30d0\u30c3\u30c1\u30d5\u30a1\u30a4\u30eb\u4f5c\u6210\r\n  Const adTypeText = 2\r\n  Const adCRLF = -1\r\n  Const adWriteChar = 0\r\n  Const adSaveCreateOverWrite = 2\r\n  \r\n  With CreateObject("ADODB.Stream")\r\n    .Type = adTypeText\r\n    .Charset = FileCharset\r\n    .LineSeparator = adCRLF\r\n    .Open\r\n    .WriteText Code, adWriteChar\r\n    .SaveToFile TargetFilePath, adSaveCreateOverWrite\r\n    .Close\r\n  End With\r\nEnd Sub\r\n\r\nPrivate Function GetPSCode(ByVal TargetFilePath As String) As String\r\n'PowerShell\u30b3\u30fc\u30c9\u53d6\u5f97\r\n  Dim s As String\r\n  \r\n  s = "$source = @""" & vbCrLf\r\n  s = s & "using System;" & vbCrLf\r\n  s = s & "using System.Windows.Automation;" & vbCrLf\r\n  s = s & "" & vbCrLf\r\n  s = s & "namespace UIAutTools" & vbCrLf\r\n  s = s & "{" & vbCrLf\r\n  s = s & "  public class Program" & vbCrLf\r\n  s = s & "  {" & vbCrLf\r\n  s = s & "    public static void SendFilePathToUploadDialog(string filePath)" & vbCrLf\r\n  s = s & "    {" & vbCrLf\r\n  s = s & "      System.Threading.Thread.Sleep(2000); \/\/\u30c0\u30a4\u30a2\u30ed\u30b0\u8868\u793a\u5f85\u3061" & vbCrLf\r\n  s = s & "      PropertyCondition cndDialogName = new PropertyCondition(AutomationElement.NameProperty, ""\u30a2\u30c3\u30d7\u30ed\u30fc\u30c9\u3059\u308b\u30d5\u30a1\u30a4\u30eb\u306e\u9078\u629e"");" & vbCrLf\r\n  s = s & "      PropertyCondition cndDialogClassName = new PropertyCondition(AutomationElement.ClassNameProperty, ""#32770"");" & vbCrLf\r\n  s = s & "      AndCondition cndDialog = new AndCondition(new Condition[] {cndDialogName, cndDialogClassName});" & vbCrLf\r\n  s = s & "      AutomationElement elmDialog = AutomationElement.RootElement.FindFirst(TreeScope.Subtree, cndDialog);" & vbCrLf\r\n  s = s & "      " & vbCrLf\r\n  s = s & "      PropertyCondition cndFileNameEditCtrlName = new PropertyCondition(AutomationElement.NameProperty, ""\u30d5\u30a1\u30a4\u30eb\u540d(N):"");" & vbCrLf\r\n  s = s & "      PropertyCondition cndFileNameEditCtrlClassName = new PropertyCondition(AutomationElement.ClassNameProperty, ""Edit"");" & vbCrLf\r\n  s = s & "      AndCondition cndFileNameEditCtrl = new AndCondition(new Condition[] {cndFileNameEditCtrlName, cndFileNameEditCtrlClassName});" & vbCrLf\r\n  s = s & "      AutomationElement elmFileNameEditCtrl = elmDialog.FindFirst(TreeScope.Subtree, cndFileNameEditCtrl);" & vbCrLf\r\n  s = s & "      if (elmFileNameEditCtrl != null)" & vbCrLf\r\n  s = s & "      {" & vbCrLf\r\n  s = s & "        ValuePattern vptn = elmFileNameEditCtrl.GetCurrentPattern(ValuePattern.Pattern) as ValuePattern;" & vbCrLf\r\n  s = s & "        vptn.SetValue(@filePath);" & vbCrLf\r\n  s = s & "      }" & vbCrLf\r\n  s = s & "      " & vbCrLf\r\n  s = s & "      PropertyCondition cndOpenButtonName = new PropertyCondition(AutomationElement.NameProperty, ""\u958b\u304f(O)"");" & vbCrLf\r\n  s = s & "      PropertyCondition cndOpenButtonClassName = new PropertyCondition(AutomationElement.ClassNameProperty, ""Button"");" & vbCrLf\r\n  s = s & "      AndCondition cndOpenButton = new AndCondition(new Condition[] {cndOpenButtonName, cndOpenButtonClassName});" & vbCrLf\r\n  s = s & "      AutomationElement elmOpenButton = elmDialog.FindFirst(TreeScope.Subtree, cndOpenButton);" & vbCrLf\r\n  s = s & "      if (elmOpenButton != null)" & vbCrLf\r\n  s = s & "      {" & vbCrLf\r\n  s = s & "        InvokePattern iptn = elmOpenButton.GetCurrentPattern(InvokePattern.Pattern) as InvokePattern;" & vbCrLf\r\n  s = s & "        iptn.Invoke();" & vbCrLf\r\n  s = s & "      }" & vbCrLf\r\n  s = s & "    }" & vbCrLf\r\n  s = s & "  }" & vbCrLf\r\n  s = s & "}" & vbCrLf\r\n  s = s & """@" & vbCrLf\r\n  s = s & "Add-Type -TypeDefinition $source -ReferencedAssemblies(""UIAutomationClient"", ""UIAutomationTypes"")" & vbCrLf\r\n  s = s & "[UIAutTools.Program]::SendFilePathToUploadDialog(""" & TargetFilePath & """)"\r\n  \r\n  GetPSCode = s\r\nEnd Function<\/pre>\n
\u52d5\u4f5c\u753b\u9762<\/h4>\n
\"\"<\/a><\/p>\n
\u51e6\u7406\u6982\u8981<\/h4>\n
\u4e0a\u8a18\u30de\u30af\u30ed\u3067\u884c\u3063\u3066\u3044\u308b\u51e6\u7406\u306f\u4e0b\u8a18\u306e\u901a\u308a\u3067\u3059\u3002<\/p>\n
    \n
  1. \u30c0\u30a4\u30a2\u30ed\u30b0\u3092\u5236\u5fa1\u3059\u308b\u305f\u3081\u306ePowerShell\u30b9\u30af\u30ea\u30d7\u30c8\u3092\u4f5c\u6210<\/li>\n
  2. PowerShell\u30b9\u30af\u30ea\u30d7\u30c8\u3092\u5b9f\u884c\u3059\u308b\u305f\u3081\u306e\u30d0\u30c3\u30c1\u4f5c\u6210<\/li>\n
  3. Internet Explorer\u3092\u64cd\u4f5c\u3057\u3066\u300c\u30a2\u30c3\u30d7\u30ed\u30fc\u30c9\u3059\u308b\u30d5\u30a1\u30a4\u30eb\u306e\u9078\u629e\u300d\u30c0\u30a4\u30a2\u30ed\u30b0\u8868\u793a<\/li>\n
  4. PowerShell\u30b9\u30af\u30ea\u30d7\u30c8\u3067\u30c0\u30a4\u30a2\u30ed\u30b0\u5236\u5fa1<\/li>\n<\/ol>\n
    \u30c0\u30a4\u30a2\u30ed\u30b0\u3092\u5236\u5fa1\u3059\u308b\u305f\u3081\u306ePowerShell\u30b9\u30af\u30ea\u30d7\u30c8<\/h4>\n
    \u30c0\u30a4\u30a2\u30ed\u30b0\u3092\u5236\u5fa1\u3059\u308b\u305f\u3081\u306ePowerShell\u30b9\u30af\u30ea\u30d7\u30c8\u306f\u4e0b\u8a18\u306e\u3088\u3046\u306a\u30b3\u30fc\u30c9\u306b\u306a\u3063\u3066\u3044\u307e\u3059\u3002<\/p>\n
    $source = @"\r\nusing System;\r\nusing System.Windows.Automation;\r\n\r\nnamespace UIAutTools\r\n{\r\n  public class Program\r\n  {\r\n    public static void SendFilePathToUploadDialog(string filePath)\r\n    {\r\n      System.Threading.Thread.Sleep(2000); \/\/\u30c0\u30a4\u30a2\u30ed\u30b0\u8868\u793a\u5f85\u3061\r\n      PropertyCondition cndDialogName = new PropertyCondition(AutomationElement.NameProperty, "\u30a2\u30c3\u30d7\u30ed\u30fc\u30c9\u3059\u308b\u30d5\u30a1\u30a4\u30eb\u306e\u9078\u629e");\r\n      PropertyCondition cndDialogClassName = new PropertyCondition(AutomationElement.ClassNameProperty, "#32770");\r\n      AndCondition cndDialog = new AndCondition(new Condition[] {cndDialogName, cndDialogClassName});\r\n      AutomationElement elmDialog = AutomationElement.RootElement.FindFirst(TreeScope.Subtree, cndDialog);\r\n      \r\n      PropertyCondition cndFileNameEditCtrlName = new PropertyCondition(AutomationElement.NameProperty, "\u30d5\u30a1\u30a4\u30eb\u540d(N):");\r\n      PropertyCondition cndFileNameEditCtrlClassName = new PropertyCondition(AutomationElement.ClassNameProperty, "Edit");\r\n      AndCondition cndFileNameEditCtrl = new AndCondition(new Condition[] {cndFileNameEditCtrlName, cndFileNameEditCtrlClassName});\r\n      AutomationElement elmFileNameEditCtrl = elmDialog.FindFirst(TreeScope.Subtree, cndFileNameEditCtrl);\r\n      if (elmFileNameEditCtrl != null)\r\n      {\r\n        ValuePattern vptn = elmFileNameEditCtrl.GetCurrentPattern(ValuePattern.Pattern) as ValuePattern;\r\n        vptn.SetValue(@filePath);\r\n      }\r\n      \r\n      PropertyCondition cndOpenButtonName = new PropertyCondition(AutomationElement.NameProperty, "\u958b\u304f(O)");\r\n      PropertyCondition cndOpenButtonClassName = new PropertyCondition(AutomationElement.ClassNameProperty, "Button");\r\n      AndCondition cndOpenButton = new AndCondition(new Condition[] {cndOpenButtonName, cndOpenButtonClassName});\r\n      AutomationElement elmOpenButton = elmDialog.FindFirst(TreeScope.Subtree, cndOpenButton);\r\n      if (elmOpenButton != null)\r\n      {\r\n        InvokePattern iptn = elmOpenButton.GetCurrentPattern(InvokePattern.Pattern) as InvokePattern;\r\n        iptn.Invoke();\r\n      }\r\n    }\r\n  }\r\n}\r\n"@\r\nAdd-Type -TypeDefinition $source -ReferencedAssemblies("UIAutomationClient", "UIAutomationTypes")\r\n[UIAutTools.Program]::SendFilePathToUploadDialog("** \u30d5\u30a1\u30a4\u30eb\u30d1\u30b9 **")<\/pre>\n
    \u666e\u901a\u306e\u30c0\u30a4\u30a2\u30ed\u30b0\u5236\u5fa1\u306a\u3089UI Automation\u306e\u51e6\u7406\u3060\u3051\u3067\u5b8c\u7d50\u3067\u304d\u308b\u306f\u305a\u3067\u3059\u304c\u3001PowerShell\u3068\u306e\u7d44\u307f\u5408\u308f\u305b\u306b\u3088\u308b\u4ed5\u69d8\u306e\u305b\u3044\u304b\u3001\u4e0b\u8a18\u30b5\u30a4\u30c8\u8a18\u8f09\u306e\u7f60\u306b\u30ac\u30c3\u30c4\u30ea\u3068\u30cf\u30de\u308a\u307e\u3057\u305f\u3002<\/p>\n
    \"\"<\/div>
    Qiita<\/div><\/div>
    \"\"<\/figure>
    PowerShell\u306eUIAutomation\u306f\u8907\u96d1\u602a\u5947\u306a\u308a - Qiita<\/div>
    https:\/\/qiita.com\/mima_ita\/items\/3f2aa49fceca7496c587<\/div>
    #\u3069\u307c\u3062\u3067\u3046\u3054\u304b\u306a\u3044\u306e\u3049\u304a\u304a\u304a\u304a\uff01\uff01C#\u3067\u306f\u52d5\u3044\u305f\u3067\u3057\u3087\u3046\uff01\uff01\uff01\uff01\uff01PowerShell\u306eUIAutomation\u3092\u4f7f\u3063\u3066\u30a6\u30a3\u30f3\u30c9\u30a6\u306e\u64cd\u4f5c\u3057\u3066\u3044\u308b\u3068\u3001\u305f\u307e\u306b\u30b3\u30f3\u30c8\u30ed\u30fc\u30eb\u306e\u64cd\u4f5c\u306b\u5931\u6557\u3059\u308b\u3053\u3068\u304c\u3042\u308a\u307e\u3059\u3002C#\u3084VB.NET,\u3055\u3089\u306b\u306fV...<\/div><\/div>
    <\/div><\/div><\/a><\/div><\/div>\n
    \u79c1\u306e\u74b0\u5883\u3067\u306f\u3001\u30c0\u30a4\u30a2\u30ed\u30b0\u304b\u3089AutomationElement\u3092\u53d6\u5f97\u3059\u308b\u90e8\u5206\u306e\u307f\u3092C#\u306b\u6295\u3052\u305f\u5834\u5408\u3067\u3082\u5fc5\u8981\u306a\u8981\u7d20\u304c\u53d6\u5f97\u3067\u304d\u306a\u304b\u3063\u305f\u305f\u3081\u3001\u30c0\u30a4\u30a2\u30ed\u30b0\u306e\u5236\u5fa1\u90e8\u5206\u3059\u3079\u3066\u3092C#\u3067\u66f8\u304f\u3053\u3068\u306b\u3057\u307e\u3057\u305f\u3002<\/p>\n
    \u30bb\u30ad\u30e5\u30ea\u30c6\u30a3\u306b\u3088\u308a\u5b9f\u884c\u3067\u304d\u306a\u3044PowerShell\u306e\u51e6\u7406<\/h4>\n
    \u6700\u521d\u306f\u4e0a\u8a18PowerShell\u30b9\u30af\u30ea\u30d7\u30c8\u3092\u30a8\u30f3\u30b3\u30fc\u30c9\u3057\u3066\u3001EncodedCommand<\/a>\u30aa\u30d7\u30b7\u30e7\u30f3\u3067\u6e21\u305d\u3046\u3068\u8003\u3048\u3066\u3044\u305f\u306e\u3067\u3059\u304c\u3001\u3044\u3056\u5b9f\u884c\u3057\u3066\u307f\u308b\u3068\u3001\u4e0b\u56f3\u306e\u3088\u3046\u306b\u201c\u30bb\u30ad\u30e5\u30ea\u30c6\u30a3\u306b\u5f71\u97ff\u3092\u53ca\u307c\u3059\u53ef\u80fd\u6027\u306e\u3042\u308b\u554f\u984c\u70b9\u304c\u691c\u77e5\u3055\u308c\u307e\u3057\u305f\u201d<\/span>\u8b66\u544a\u304c\u8868\u793a\u3055\u308c\u3001\u5b9f\u884c\u304c\u30d6\u30ed\u30c3\u30af\u3055\u308c\u307e\u3057\u305f\u3002<\/p>\n
    \"\"<\/a><\/p>\n
    \u3084\u308d\u3046\u3068\u3057\u3066\u3044\u308b\u3053\u3068\u306fEmotet<\/a>\u307f\u305f\u3044\u306a\u3082\u306e\u306a\u306e\u3067\u3001\u30d6\u30ed\u30c3\u30af\u3055\u308c\u308b\u306e\u3082\u5f53\u7136\u3068\u8a00\u3048\u308b\u304b\u3082\u3057\u308c\u307e\u305b\u3093\u3002<\/p>\n
    \u81f4\u3057\u65b9\u306a\u3044\u306e\u3067\u3001PowerShell\u30d5\u30a1\u30a4\u30eb(ps1)\u3092\u4e00\u6642\u7684\u306b\u4f5c\u6210\u3057\u3001\u305d\u308c\u3092\u30d0\u30c3\u30c1\u30d5\u30a1\u30a4\u30eb\u304b\u3089\u5b9f\u884c\u3059\u308b\u5f62\u3092\u3068\u308b\u3053\u3068\u306b\u3057\u307e\u3057\u305f\u3002<\/p>\n
    \n
    \n