Returns or modifies the user-definable URL of an object.
Rhino.ObjectURL (strObject [, strURL])
Rhino.ObjectURL (arrObjects, strURL)
strObject |
Required.字符串。The identifier of the object. |
arrObjects |
Required.Array.An array of strings identifying the objects to modify. |
strURL |
可选参数。字符串。The new object URL.If omitted, the current object URL is returned.Note, if arrObjects is specified, strURL is required. |
String |
If an object URL is not specified, the current object URL if successful. |
String |
If an object URL is specified, the previous object URL if successful. |
Number |
If arrObjects is specified, then the number of objects modified if successful. |
Null |
如果执行不成功或出错,返回空值。 |
Dim strObject, strURL, objShell
strObject = Rhino.GetObject("Select object")
If Not IsNull(strObject) Then
strURL = Rhino.ObjectURL(strObject)
If Not IsNull(strURL) Then
Set objShell = CreateObject("WScript.Shell")
objShell.Run strURL
Set objShell = Nothing
End If
End If