MS Access使用FollowHyperlink访问需登录网站报Runtime error 8如何解决

企业私有站点的登录认证要求确实是触发该报错的核心诱因。
FollowHyperlink 方法的执行逻辑不是直接唤起系统浏览器打开链接，而是先由Access进程自身发起HTTP请求尝试拉取目标URL的内容：访问公开站点时请求可正常返回内容，方法执行无异常；访问需登录认证的企业私有站点时，Access发起的未携带认证凭据的请求会被站点拦截，返回401/403类的访问拒绝响应，Access无法获取到可下载的有效内容，就会抛出Runtime error 8，提示"The requested information cannot be downloaded"。

核心思路是绕过Access自身的URL内容拉取逻辑，直接唤起系统默认浏览器打开目标地址，让浏览器走正常的企业站点认证流程：员工如果已经在浏览器留存了登录态会直接进入支持站点，未登录状态下会正常跳转至企业统一登录页完成认证，不会触发Access侧的报错。

• 方法1：调用Windows Shell API实现跳转（兼容性最优，适配所有Windows版本和默认浏览器设置）
  直接在窗体的"支持"按钮点击事件中添加如下VBA代码：

  ' 窗体模块顶部通用声明区
  #If VBA7 Then
      Private Declare PtrSafe Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" ( _
          ByVal hWnd As LongPtr, ByVal lpOperation As String, ByVal lpFile As String, _
          ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As LongPtr
  #Else
      Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" ( _
          ByVal hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _
          ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
  #End If
  
  Private Sub 支持按钮_Click()
      Dim supportUrl As String
      supportUrl = "填写你的企业支持站点实际URL"
      ShellExecute Me.hWnd, "open", supportUrl, vbNullString, vbNullString, 1
  End Sub
  

• 方法2：调用系统URL协议处理程序跳转（代码更简洁，无需声明API）
  适合快速实现场景，代码如下：

  Private Sub 支持按钮_Click()
      Dim supportUrl As String
      supportUrl = "填写你的企业支持站点实际URL"
      Shell "rundll32 url.dll,FileProtocolHandler " & supportUrl, vbNormalFocus
  End Sub
  

注意：不要在VBA代码中硬编码企业账号、密码等认证信息，站点认证流程完全交由默认浏览器处理即可，既符合企业信息安全规范，也不会因为后续认证策略调整（比如上线多因素认证）导致跳转功能失效。

内容的提问来源于stack exchange，提问作者Berk