| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 443 人关注过本帖
标题:請教怎麼用程序實現與DOS輸入一樣的功能?急!
只看楼主 加入收藏
gelinqu
Rank: 1
等 级:新手上路
帖 子:138
专家分:0
注 册:2005-12-17
收藏
 问题点数:0 回复次数:1 
請教怎麼用程序實現與DOS輸入一樣的功能?急!
我有一個TXT文檔,是一些打印機的設置,我想程序怎次運行的時候就將這個TXT文檔上的內容複製到我的打印機的內部設置裏。我在DOS裏執行 copy c:\print.txt prn就可以實現我的功能。

有這樣的一個API嗎?或者怎樣自動在程序執行是調用DOS執行這條命令?
shell cmd.exe能調出DOS窗口,但之後的命令要怎麼執行呢?(命令是固定的)
搜索更多相关主题的帖子: DOS 
2007-01-07 11:49
Joforn
Rank: 6Rank: 6
等 级:贵宾
威 望:23
帖 子:1242
专家分:122
注 册:2007-1-2
收藏
得分:0 

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 Form_Load()
Dim FileLink As Long

FileLink = FreeFile
Open "C:\Test.txt" For Append As #FileLink
Print #FileLink, "打印测试"
Close #FileLink
ShellExecute 0, "open", "Notepad.exe ", "/p C:\test.txt", "C:\", 1 '将C:\test.txt 改成你要打印的文件名。
End Sub

[此贴子已经被作者于2007-1-7 12:45:47编辑过]


VB QQ群:47715789
2007-01-07 12:43
快速回复:請教怎麼用程序實現與DOS輸入一樣的功能?急!
数据加载中...
 
   



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

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