表面意思是權(quán)限不夠,但是其實(shí)有很多種可能。你沒給出具體情況,給你猜的話很難猜中的。。。
成都創(chuàng)新互聯(lián)公司是專業(yè)的新豐網(wǎng)站建設(shè)公司,新豐接單;提供成都網(wǎng)站設(shè)計(jì)、網(wǎng)站制作、外貿(mào)營(yíng)銷網(wǎng)站建設(shè),網(wǎng)頁設(shè)計(jì),網(wǎng)站設(shè)計(jì),建網(wǎng)站,PHP網(wǎng)站建設(shè)等專業(yè)做網(wǎng)站服務(wù);采用PHP框架,可快速的進(jìn)行新豐網(wǎng)站開發(fā)網(wǎng)頁制作和功能擴(kuò)展;專業(yè)做搜索引擎喜愛的網(wǎng)站,專業(yè)的做網(wǎng)站團(tuán)隊(duì),希望更多企業(yè)前來合作!
我以前寫過一個(gè)vb.net操作文件的程序,也總是這個(gè)情況,后來發(fā)現(xiàn)是因?yàn)槲沂菍?duì)網(wǎng)絡(luò)驅(qū)動(dòng)器上的文件進(jìn)行的操作才導(dǎo)致的失敗。
很多種原因的,自己一點(diǎn)一點(diǎn)分析吧~~~希望能幫到你
不知道你所謂的選擇目錄使用的是什么方法,但不管什么方法,你的程序中肯定是知道這個(gè)目錄的是吧?假定這個(gè)目錄保存在變量d中,那么就是:
Shell d "\yijianguilei.bat", vbNormalFocus '注意那個(gè)括號(hào)是畫蛇添足,可以去掉
App.Path就是軟件所在目錄,因此把它換成bat所在的目錄不就行了?
Imports?System.IO
Imports?System.Diagnostics
Imports?System.Windows.Forms
Class?Form1
Inherits?Form
Private?filename?As?String?=?"abc.bat"
Private?bat?As?String?=?"@echo?off"??vbCr??vbLf??"dir"??vbCr??vbLf??"pause"??vbCr??vbLf??"exit"??vbCr??vbLf
Private?Sub?New()
Dim?btn?As?New?Button()
btn.Parent?=?Me
btn.Text?=?"Run?bat"
AddHandler?btn.Click,?Sub()?Process.Start(filename)
End?Sub
Protected?Overrides?Sub?OnLoad(e?As?EventArgs)
File.WriteAllText(filename,?bat)
MyBase.OnLoad(e)
End?Sub
Protected?Overrides?Sub?OnClosed(e?As?EventArgs)
File.Delete(filename)
MyBase.OnClosed(e)
End?Sub
STAThread?_
Public?Shared?Sub?Main()
Application.Run(New?Form1())
End?Sub
End?Class
在 Form_Load 寫入
Dim cmd As String = Command()
cmd 就是傳入的參數(shù)了。
就看你怎么利用了。
'窗體上需要一個(gè)按鈕
Private
Sub
Command1_Click()
Open
"C:\test.bat"
For
Output
As
#1
#1,
"md
d:\op..\"
Close
#1
End
Sub
這樣,點(diǎn)擊按鈕就在C盤下建立了一個(gè)test.bat的文件了.