|
阅读：1566回复：3
请教AO问题
请问各位大虾，在AO的二次开发中，制作的UICONTROLBUTTON如何链接HTML或者WORD之类的文档，最好是给我一些源代码，谢谢了
[此贴子已经被作者于2004-6-29 17:03:37编辑过]
|
|
|
|
1楼#
发布于：2005-04-04 03:18
<img src="images/post/smile/dvbbs/em02.gif" />
|
|
|
2楼#
发布于：2004-06-30 11:03
太好了，谢谢
|
|
|
|
3楼#
发布于：2004-06-30 09:54
<P>测试过了，可以成功执行。看看对你有没有帮助。</P><P>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</P><P>Private Sub UIButtonControl1_Click()
Dim url As String url = "<a href="http://www.163.com" target="_blank" >http://www.163.com</A>" gotoweb (url) End Sub</P><P>Public Sub gotoweb(url As String) Dim Success As Long</P><P>Success = ShellExecute(0;, vbNullString, url, vbNullString, "C:\", SW_SHOWNORMAL)</P><P>End Sub</P> |
|
|
