Mengunakan perintah DOS melalui VB 6

[JagoVB]

Gan ane mohon bantuanya nih, ane kan lagi belajar VB 6, kemaren ane baca artikel di suatu blog tentang menggunakan perintah dos melalui VB 6,

katanya kodenya kaya gini


Code:

Private sub command1_click()

sYourCommand="copy C:\vb.txt D:\vb.txt"
shell "cmd \c " & sYourCommand

End Sub

terus ane coba ganti jadi perintah ping tapi napa gax bisa????

munculnya cuma cmd kosong...



nih code yang udah ane rubah jadi ping


Code:

Private sub command1_click()

sYourCommand = "ping 192.168.8.1 -t"
Shell "cmd \c " & sYourCommand

End Sub

buat agan yang uda senior mohon bimbingannya yah, bagian mana yang salah :hope:




Quote:






Originally Posted by mico75
http://static.kaskus.us/images/buttons/viewpost.gif (http://ceriwis.us/showthread.php?p=345248710#post345248710)


Kalau


Code:

sYourCommand = "ping 192.168.8.1 -t"
Shell "cmd /c " & sYourCommand

Gimana?http://img.kaskus.us/images/kaskusmobile_hp.gif







satu masalah selesai, satu lagi datang..... :ganteng:

maklum newbie..



ane coba cara diatas buat scrip attrib qo gax bisa yah????


Code:


Private Sub Command1_Click()
sYourCommand = "F:\attrib +s +h *.* /s /d"

Shell "cmd /c " & sYourCommand
End Sub

Mohon pencerahan agan2 sekalian :hope:

</div>