急,帮忙看看什么错,在线等

kcw 2004-05-06 01:35:19
下面这句提示“文件未找到”

Shell "IEXPLORE.EXE " + App.Path + "\" + CStr(Date) + ".html", 1

如果用notepad.exe就可以打开,求解
...全文
18 5 点赞 打赏 收藏 举报
写回复
5 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
recollectpainer 2004-05-06
你将打开方式换成 notepad.exe 则可打开,而改成 IEXPLORE.EXE 打开则不行
说明报错语句中说的文件未找到是指 IEXPLORE.EXE 文件未找到
在 shell 语句中指明 IEXPLORE.EXE 文件所在路径则问题应可解决
  • 打赏
  • 举报
回复
射天狼 2004-05-06
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

Private Sub Command1_Click()
ShellExecute Me.hwnd, "open", "http://www.sohu.com", vbNullString, vbNullString, 1
End Sub
  • 打赏
  • 举报
回复
artoksxb 2004-05-06
这样试试:
Shell "EXPLORER.EXE " + App.Path + "\" + CStr(Date) + ".html", 1
  • 打赏
  • 举报
回复
kcw 2004-05-06
试了一下,不行啊
  • 打赏
  • 举报
回复
yjplus 2004-05-06
"\"换为"/"试试
  • 打赏
  • 举报
回复
相关推荐
发帖
VB基础类
加入

7544

社区成员

VB 基础类
申请成为版主
帖子事件
创建了帖子
2004-05-06 01:35
社区公告
暂无公告