以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  为什么打不开网址啊，刚学，又不是很理解。谢谢  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=99756)
--  作者：yytx1106
--  发布时间：2017/4/26 11:40:00
--  为什么打不开网址啊，刚学，又不是很理解。谢谢
Dim Proc As New Process \'定义一个新的Process
Dim r As Row = Tables("兽药").Current
Dim v As String
V = r("网址")
With Tables("兽药").Current \'引用当前行
    If .IsNull("网址") = False Then \'如果已经输入网址

Proc.File = " v "  
Proc.Start()
       
    End If
End With
--  作者：有点色
--  发布时间：2017/4/26 11:41:00
--  

Proc.File = " v "  

 

改成

 

Proc.File = v
--  作者：yytx1106
--  发布时间：2017/4/26 11:47:00
--  
非常感谢 ，可以了
--  作者：yytx1106
--  发布时间：2017/4/26 12:16:00
--  
专家好，
我这个做，网址是没有问题了。
但是如果是路径就打不开了。因为 表里 路径是有方括号的。。因此打不开。。 如何只读取方括号里的路径内容 ，谢谢   []
--  作者：有点色
--  发布时间：2017/4/26 12:29:00
--  

Dim Proc As New Process \'定义一个新的Process
Dim r As Row = Tables("兽药").Current

With Tables("兽药").Current \'引用当前行
    If .IsNull("网址") = False Then \'如果已经输入网址
        Dim v As String
        V = r("网址").trim("[", "]")
        Proc.File = v
        Proc.Start()
    End If
End With
--  作者：yytx1106
--  发布时间：2017/4/26 12:37:00
--  
好的，非常有用，非常感谢