| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1416 人关注过本帖
标题:VB 用 Shell " explorer " 打开.dat 结尾的文件,总是无效的过程调用或函数 ...
只看楼主 加入收藏
郭金龙
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2014-10-13
结帖率:50%
收藏
已结贴  问题点数:20 回复次数:4 
VB 用 Shell " explorer " 打开.dat 结尾的文件,总是无效的过程调用或函数, 问题在哪
标准模块:
Type pinfo
name As String * 4
age As Integer
addr As String * 10
End Type

窗体模块
Option Base 1(声明)
Private Sub Form_Click()
Static a() As pinfo
Open App.Path & "\p_list.dat" For Append As #1
n = InputBox("请问你要输入几个人的信息?")
ReDim a(n) As pinfo
For i = 1 To n
  a(i).name = InputBox("请输入姓名")
  a(i).age = InputBox("请输入年龄")
  a(i).addr = InputBox("请输入所在地区")
  Write #1, a(i).name, a(i).age, a(i).addr

Next
Close #1
  b = MsgBox("文件写入完毕是否查看该文件?", vbYesNo + vbQuestion)
If b = vbYes Then
  Shell " explore " & App.Path & "\p_list.dat"
End If
End Sub
搜索更多相关主题的帖子: 信息 姓名 
2014-11-17 08:23
风吹过b
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:364
帖 子:4937
专家分:30047
注 册:2008-10-15
收藏
得分:10 
Shell " explore " & App.Path & "\p_list.dat"

你这条命令的意思是让 WINDOWS 资源管理器 ( explore ,这个命令 我没测试,不知有没有错误)
但 WINDOWS 资源管理器 自己是打不开 dat 这个文件, 然后就调用外部程序来打开,然后外部程序打开时,出现错误。所以就报你的错。

修改方向:
1、文件后缀,使用  .txt
2、自己写一个 针对这个 dat 文件的查看器,然后 shell 时,使用自己的这个文件查看器来查看 dat 文件。
3、指定使用 记事本 来打开这个 dat 文件。  
shell "%windir%\system32\notepad.exe  " & App.Path & "\p_list.dat"

方法和命令均未测试。

授人于鱼,不如授人于渔
早已停用QQ了
2014-11-17 15:06
zhengang1026
Rank: 6Rank: 6
等 级:侠之大者
威 望:1
帖 子:136
专家分:409
注 册:2013-2-6
收藏
得分:10 
回复 2 楼 风吹过 b
为什么还是显示“实时错误53,文件未找到”?
shell 函数到底该怎么用?
2014-11-17 19:03
zhengang1026
Rank: 6Rank: 6
等 级:侠之大者
威 望:1
帖 子:136
专家分:409
注 册:2013-2-6
收藏
得分:0 
用 Shell "C:\windows\system32\notepad.exe  " & App.Path & "\p_list.dat"可以,
看样子VB是不认"%windir%"这种表述方式
2014-11-17 19:37
zhengang1026
Rank: 6Rank: 6
等 级:侠之大者
威 望:1
帖 子:136
专家分:409
注 册:2013-2-6
收藏
得分:0 
另外,被调用的应用在其他位置也不行。例如我将notepad.exe复制到D盘根目录下,然后用下列句子调用什么反映都没有,大侠们能解释下为什么吗?
 Shell "d:\notepad.exe  " & App.Path & "\p_list.dat", vbNormalFocus
甚至将notepad.exe复制到C盘根目录下或C盘windows目录下都没用,非得在C:\windosw\system32目录下才行,奇了怪了!

[ 本帖最后由 zhengang1026 于 2014-11-17 20:07 编辑 ]
2014-11-17 20:00
快速回复:VB 用 Shell " explorer " 打开.dat 结尾的文件,总是无效的过程调用或 ...
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.015064 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved