+ -
当前位置:首页 → 问答吧 → 求救!一个简单的vb的问题

求救!一个简单的vb的问题

时间:2011-09-23

来源:互联网

定义了一个创建文件夹的方法

Private Sub Command1_Click()
  If Dir("\\192.168.75.122\hc\cc", vbDirectory) <> "" Then
  MsgBox "exist "
  Else
  MkDir "\\192.168.75.122\hc\cc"
  MsgBox "create "
  End If
End Sub

上面这种写法就没有问题,但是换成下面:


Private Sub Command1_Click()
  Dim folden_path As String
  folden_path = "\\192.168.75.122\hc\cc"
  If Dir(folden_path, vbDirectory) <> "" Then
  MsgBox "exist "
  Else
  MkDir "\\192.168.75.122\hc\cc"
  MsgBox "create "
  End If
End Sub

把路径放在变量里就不行,报错:意外错误52

为什么???

作者: huxiang1988   发布时间: 2011-09-23

试了可以用的

作者: xiaoyao961   发布时间: 2011-09-23

热门下载

更多