Postingan

Menampilkan postingan dari Maret, 2009

jalanin Perintah DOS dari VB

Berikut trik ngejalanin perintah DOS dari vb, siapa tau berguna. Buat Project baru dengan 1 textbox dan 1 command button. Tambahin Kode ini: Private Sub Form_Load() Shell "cmd.exe", vbNormalFocus End Sub Private Sub Command1_Click() Clipboard.Clear Clipboard.SetText Text1 + Chr$(13) AppActivate "cmd.exe" SendKeys "% ep", 1 End Sub isi perintah Dos di text1, misal nya 'DIR *.EXE' lalu klik command1, maka perintah dos tersebut akan langsung dieksekusi..