View Single Post
  #1  
Old 20th November 2011
JagoVB JagoVB is offline
Ceriwiser
 
Join Date: Nov 2011
Posts: 508
Rep Power: 14
JagoVB mempunyai hidup yang Normal
Default Mengunakan perintah DOS melalui VB 6

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




Quote:






Originally Posted by mico75



Kalau


Code:

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

Gimana?







satu masalah selesai, satu lagi datang.....

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



Reply With Quote