1,079
社区成员
发帖
与我相关
我的任务
分享
string ls_path, ls_file
int li_rc
ls_path = '\\192.168.1.200\项目\图片'
li_rc = GetFileSaveName ( "Select File", &
ls_path, ls_file, "jpg", &
"All Files (*.*),*.*" , "", &
32770)
IF li_rc = 1 Then
ls_path //返回的文件完整路径名(含文件名)
ls_file //返回的文件名(不含路径)
End If
//声明API
Function Long ShellExecute(Long hwindow, String lpOperation, String lpFile, String lpParameters, String lpDirectory, Long nShowCmd) Library 'shell32.dll' Alias for 'ShellExecuteA'
//调用
ShellExecute(handle(this), '', "c:\a.jpg", '','', 1)
//声明API
function long shRunDefltBrowser(string szUrl) library "pbvm90.dll"//这是PB9的写法,其他版本需要更改dll名称
//调用
shRunDefltBrowser("c:\a.jpg")