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




SPONSORED LINKS
Programmer Indonesia Basic programming language
Computer programming languages Programming languages Java programming language


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
Programmer Indonesia Basic programming language
Computer programming languages Programming languages Java programming language


YAHOO! GROUPS LINKS




Kirim email ke