Hmm..tadi sich dah coba pake cara gitu,
tp td nyoba pake cara ini jg tetep ga mau, kenapa yach ???
Apa ada sintak yg salah
terimakasih
From:
[email protected] [mailto:[EMAIL PROTECTED] On Behalf Of LiveDeviL
Sent: May 22, 2006 11:14 AM
To: [email protected]
Subject: Re: [Programmer-VB]
execute file *.bat
coba bantu ya...
taruh code berikut di module (paling atas)
Public 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
Public Sub RunShell(nPath As String)
ShellExecute 0&, "open", _
nPath, _
vbNullString, vbNullString, 1
End Sub
'untuk menjalankan batch filenya...
runshell app.path &
"\zip.bat"
mudah2an bisa... (sorry belum sempet cobain) ^^
On 5/22/06, Rivian
<[EMAIL PROTECTED]> wrote:
Dear teman-teman
Mohon bantuannya, saya ada buat file zip.bat yg
tujuannya untuk menzip file yg saya buat,
Trus saya buat button di VB dengan sintak
seperti ini shell app.path & "\zip.bat"
Pertanyaaanya kenapa ga bisa 'run' yach file
tersebut, tetapi kl saya run lsg dari window explorer, bisa jalan dan terbentuk
file zipnya
Terimakasih atas bantuannya
rivian
Wahana
Programmer Groups Links
<*> Untuk mengunjungi sponsor milis ini,
klik link berikut:
http://wahanaprogrammer.net
<*> Untuk menghubungi owner milis ini, kirim
email ke:
[EMAIL PROTECTED]
<*> Konsultasi pemrogramman bisa chat
disini:
Yahoo! Messenger:
wahanaprogrammer
YAHOO!
GROUPS LINKS
--
best regards,
LiveDeviL
Wahana Programmer Groups Links
<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
http://wahanaprogrammer.net
<*> Untuk menghubungi owner milis ini, kirim email ke:
[EMAIL PROTECTED]
<*> Konsultasi pemrogramman bisa chat disini:
Yahoo! Messenger: wahanaprogrammer
SPONSORED LINKS
YAHOO! GROUPS LINKS