Re: [Programmer-VB] execute file *.bat

Sun, 21 May 2006 22:55:22 -0700

coba cek sudah terbentuk atau belum file zipnya, kalo sudah baru jalankan send email...

public function fileExists(byval nPathFile as string) as boolean
  dim nret as long
 
  fileExists = true
 
  on error goto Hell
  nret=filelen(nPathFile)
  exit function

Hell:
  fileExists = false
end function

contoh:
if fileExists (app.path & "\contoh.zip") then sendEmail()

On 5/22/06, Rivian <[EMAIL PROTECTED]> wrote:

Ooo gitu.. aku coba, satu lagi yach pak, pertanyaannya..kl untuk mencek error dari sintak tadi gimana yach pak, soalnya td setelah beberapa kali berhasil create file zip-nya..ada 2 kali ga berhasil, jd program yg saya buat ini khan lsg send by e-mail, takutnya file zipnya belum terbentuk tp email sudah terkirim

 

Mungkin ga, karena saya pake pkzip dari dos ambil resourcesnya gede..jdnya ada yg ga berhasil

 

 

 terimakasih

 

 

 

    Rivian

From: [email protected] [mailto:[email protected]] On Behalf Of Sistyo Alfan Tribowo
Sent: May 22, 2006 12:04 PM


To: [email protected]
Subject: RE: [Programmer-VB] execute file *.bat

 

Tambahan :

Menurut saya, kalau zip nya gak kebentuk blm tentu script kamu gak jalan.

Coba modifikasi zipnya, sebutin setiap informasi path secara absolute.

 

Misalnya punya ku ini :

Copy data.txt data2.txt

Jika di jalankan dari menu "run", file nya bisa ter-copy.

 

Tapi kalau dijalankan dari shell via VB, filenya gak tercopy. Usut punya usut, errornya "0 file(s) copied". Artinya udah tahu kan?

 

Setelah dirubah spt ini :

copy c:\data.txt c:\data2.txt

 

dari menu run, ok. Dari shell VB, ok.

 

From: Sistyo Alfan Tribowo [mailto:[EMAIL PROTECTED]]
Sent: Monday, May 22, 2006 11:58 AM
To: '[email protected]'
Subject: RE: [Programmer-VB] execute file *.bat

 

Aku pakai ini kok bisa ya?

 

Shell "c:\tes.bat"

 

Isi tes.bat–nya ini :

copy c:\data.txt c:\data2.txt

 

 

 

From: [email protected] [mailto:[email protected]] On Behalf Of Rivian
Sent: Monday, May 22, 2006 11:02 AM
To: [email protected]
Subject: [Programmer-VB] execute file *.bat

 

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