vba - 通过 VBA 在受密码保护的网络共享计算机上打开和保存文件

Question

我正在使用下面的代码打开并保存位置 10.42.X.X 的文件。如何编写代码以提供用户名和密码来访问此 IP 机器？

objPPTX.Presentations.Open "\\10.42.x.x\Reports_New\PRESTIGE LEVEL\Pending IMs\Pending IMs Report Template_Dont 

ActiveWorkbook.ExportAsFixedFormat xlTypePDF, "\\10.42.X.X\Reports_New\PRESTIGE LEVEL\Pending IMs\Pending IMs.pdf"

Answer 1

首先映射位置/驱动器，然后像这样传递用户名和密码变量

Dim objNetwork as Object, persistent as Boolean
persistent = false
set objNetwork = WScript.CreateObject("WScript.Network")
objNetwork.MapNetworkDrive "drivelettergoeshere:", ""\\10.42.x.x\............", persistent, "username", "password"