Tanya jawab mengenai pemrograman

[suandi_bsi]

Hai semua warga AP yang terkasih...

Di Thread ini, saya berharap kita semua dapat berbagi ilmu mengenai pemrograman komputer, yah.. Supaya kita-kita bisa share, tanya-tanya, supaya kita ngerti.

Sebenarnya, saya ada pertanyaan sedikit nih, mengenai pemrograman menggunakan VisualBasic 6 alias VB6. Kawan-kawan semua ada yang tahu tidak? Bagaimana caranya menghapus file menggunakan VB?

Misalnya kita punya file namanya test.txt, dan kita ingin menghapusnya. Syntax apa yang digunakan? Kalau untuk mengcreatenya, saya sudah bisa.. Tapi menghapus masih bingung.. Hehe..(Bisa bikin ga bisa apus).

Semoga ada yang dapat membantu saya... Kawan-kawan yang lain juga boleh tanya seputar VB koq. Kalau saya ngerti, pasti saya bantu juga.
Terima kasih banyak ya...

Semoga banyak reply di Thread ini, soalnya saya benar-benar ingin tahu jawaban dari permasalahan yang sedang saya hadapi ini. Makasih semua ya.. Tuhan Yesus Memberkati...

Regard
Suandi

[Jack_12]

first, ke Project - References
Tambahkan :
- Microsoft Scripting Runtime
- Windows Script Host Object Model

lalu coding untuk hapus filenya simple :


Dim fso As New Scripting.FileSystemObject
fso.DeleteFile "c:\test.txt"


selamat mencoba

[suandi_bsi]

Sukses banget bro.. Makasih banyak yach..... Kalau cara supaya document word dapat kita baca menggunakan vb gimana? Misalnya aku punya 1 buah control textbox, dan 1 buah control command button. Aku ingin, anggap saja dhe misalnya aku punya file document word di c:\test.doc, bagaimana sih caranya kalau kita pencet command button itu, nanti tulisan yang ada di c:\test.doc itu muncul di textbox? Sebelumnya makasih banyakkkkk ya... GBU

Regard
Suandi

[Maranatha]

Alo??? Ada orang? Seseorang balas reply ini, plzzzzzz.

[Jack_12]

Itu si Maranatha kenapa tuh ?

Anyway untuk menjawab si suandi :

Reference yang lu harus pake masih sama
- Microsoft Scripting Runtime
- Windows Script Host Object Model

Anggap lu punya object textbox bernama Text1, codingnya seperti ini :

Dim fso As New Scripting.FileSystemObject
Dim fst As Scripting.TextStream
Dim var_txt As String

Set fst = fso.OpenTextFile("c:\test.txt")
var_txt = fst.ReadAll
Text1.Text = var_txt

Perlu diingat bahwa ini untuk membaca file text alias string. Kalau file lu adalah .doc, dia gak akan menampilkan sempurna selayaknya microsoft word. Jadi gak ada tuh italic, bold, underline, or fasilitas-fasilitas yang ada di microsoft word

[paulfaith]

Originally Posted by Jack_12

first, ke Project - References
Tambahkan :
- Microsoft Scripting Runtime
- Windows Script Host Object Model

lalu coding untuk hapus filenya simple :


Dim fso As New Scripting.FileSystemObject
fso.DeleteFile "c:\test.txt"


selamat mencoba

ga usah tambah reference juga bisa, langsung aja pake command KILL juga bisa krn method ini ada di library default VB yaitu VBA, misalnya hapus COMMAND.COM di C:\

KILL "C:\command.com"

[paulfaith]

Originally Posted by suandi_bsi

Sukses banget bro.. Makasih banyak yach..... Kalau cara supaya document word dapat kita baca menggunakan vb gimana? Misalnya aku punya 1 buah control textbox, dan 1 buah control command button. Aku ingin, anggap saja dhe misalnya aku punya file document word di c:\test.doc, bagaimana sih caranya kalau kita pencet command button itu, nanti tulisan yang ada di c:\test.doc itu muncul di textbox? Sebelumnya makasih banyakkkkk ya... GBU

Regard
Suandi

kalo cuma utk baca file aja, bisa langsung pake keyword OPEN, ga usah tambah reference, misalnya:

OPEN "filename.ext" FOR INPUT ACCESS READ AS #1

#1 itu maksudnya handle filenya, km bisa ganti dengan sembarang angka, misalnya #99. Utk close file bisa dng statement CLOSE, misalnya:

CLOSE #1

kalo utk baca file MS Word yg formatnya .doc, ada dua cara, pertama pake OLE Automation, yg kedua pake Office Object Library. Kalo cara pertama, kagak usah tambah reference, kamu bisa pake control OLE Container di toolbox standard. Kalo mo pake Office Library, misalnya km tambahin reference ke Microsoft Office 11.0 Object Library kalo km pake Office 2003.
Kalo mo lebih jelasnya, googling aja, ato ubek2 di MSDN. Perlu diingat bhw akses ke Office Object Library performance agak lambat krn library (COM) itu adalah ActiveX EXE yg sifatnya out-of-process, ga seperti library ADODB yg cepat krn dia sifatnya in-process.

[Masih_Kecil]

Saya mau tanya..
Tolong dijawab ya...
Saya ingn membuat suatu program interaksi manusia dengan komputer. yang saya maksud interaksi adalah dalam bentuk komunikasi.
mungkin blum bisa berkomunikasi dengan suara alias berbicara. tetapi dengan mengetik atau chating. jadi program saya tersebut dapat menjawab segala pertanyaan-pertanyaan yang diajukan oleh pengguna.

sampai saat ini saya menggunakan sistem persamaan (fungsi OR)dan menggunakan banyak elseif-nya... ya... dengan ilmu yang pas-pasan.. apa yg dapat saya buat.. karena itu saya berharap bantuan saudara sekalian..

hm.. salah seorang senior saya di kampus menganjurkan saya menggunakan sistem index..
ada yg berminat membantu saya??
agar program tersebut dapat sempurna dan berkapasitas kecil..
thx aLL..
GBU (may God Bless Us)

[paulfaith]

Originally Posted by Masih_Kecil

Saya mau tanya..
Tolong dijawab ya...
Saya ingn membuat suatu program interaksi manusia dengan komputer. yang saya maksud interaksi adalah dalam bentuk komunikasi.
mungkin blum bisa berkomunikasi dengan suara alias berbicara. tetapi dengan mengetik atau chating. jadi program saya tersebut dapat menjawab segala pertanyaan-pertanyaan yang diajukan oleh pengguna.

sampai saat ini saya menggunakan sistem persamaan (fungsi OR)dan menggunakan banyak elseif-nya... ya... dengan ilmu yang pas-pasan.. apa yg dapat saya buat.. karena itu saya berharap bantuan saudara sekalian..

hm.. salah seorang senior saya di kampus menganjurkan saya menggunakan sistem index..
ada yg berminat membantu saya??
agar program tersebut dapat sempurna dan berkapasitas kecil..
thx aLL..
GBU (may God Bless Us)

Maksudnya bikin chatbot? pakai AIML aja, itu udh jadi framework.

[Yosia]

Originally Posted by paulfaith

kalo cuma utk baca file aja, bisa langsung pake keyword OPEN, ga usah tambah reference, misalnya:

OPEN "filename.ext" FOR INPUT ACCESS READ AS #1

#1 itu maksudnya handle filenya, km bisa ganti dengan sembarang angka, misalnya #99. Utk close file bisa dng statement CLOSE, misalnya:

CLOSE #1

Tambahan saja...
Untuk mengganti #1 (file handle) sebagai antisipasi error yg kadang2 bisa muncul, coba ganti program diatas dengan code dibawah ini.

Dim nNumFile As Long: nNumFile = FreeFile()

OPEN "filename.ext" FOR INPUT ACCESS READ AS #nNumFile

Untuk closenya

CLOSE #nNumFile

*wah Jack12 dan Paulfaith ternyata jago VB juga yah

[ijing]

sorry nich...gaptek sich
mo nanya nich kopm aku ga isa masuk ke friendster...katanya ini web dah di-block...nah klo mo matiin block-nya gimana ya??

[Yosia]

Originally Posted by ijing

sorry nich...gaptek sich
mo nanya nich kopm aku ga isa masuk ke friendster...katanya ini web dah di-block...nah klo mo matiin block-nya gimana ya??

Kalau mengaksesnya dari kantor, coba tanyakan ke orang IT kantormu, apakah mereka memblok situs friendster (biasanya lewat server proxy), soalnya banyak kantor yang menerapkan aturan memblok situs-situs tertentu yang dianggap merugikan pemakaian resource (membebani bandwidth network) dan mengganggu konsentrasi kerja (staff tidak mengerjakan tugas kantor malah banyak mengakses internet).

[ijing]

aku pake komp rmh punya...
padahal dulu sebelum di format lg isa masuk ke webs itu tapi sekarang sama skali ga isa, mo denger lg lewat air hidup ato situs2 rohani aja ga isa ,nah...gimana cara matiin tuh block???

[grapow]

tanya nih gimana biar komp kita ga bisa di remote sama org lain...

[worshiper]

Originally Posted by grapow

tanya nih gimana biar komp kita ga bisa di remote sama org lain...

jangan ada program seperti Radmin (remote administrator)

[grapow]

Originally Posted by worshiper

jangan ada program seperti Radmin (remote administrator)

klo setahuku sih di komp ku ga ada program kyk gitu, ngeceknya gmn bro..

[h1mu12a]

g agak bingung ama maksud diremote org??
stau g, yg biasa remote.

kl di komp lu py 1 user aja (misalnya administrator). kl ada org lain remote pasti yg lain ga bisa login. kec kalo da di sett 2 user.

kl ga ada prog spt Radmin, tenang aja komp kamu jg ga bakalan bisa di remote. kl org lain mau remote komp mu, itu butuh grant dan password. kec komp mu ga ada password beda case lagi.

lagian remote komp itu ga akan pernah bisa jika beda LAN ataupun WAN. krn g biasa suka remote2an komp g dr sudirman, krn komp g aslinya ada dibintaro. dan klien g kebetulan py wan asik d... cm sayang blum coba buat maen CS

[worshiper]

Originally Posted by grapow

klo setahuku sih di komp ku ga ada program kyk gitu, ngeceknya gmn bro..

setauku biasanya dari IT ada semacam program yang digunakan untuk remote kompie klien (bisa juga untuk mata2in )...biasanya terinstal di Start -> Program -> Remote Administator (atau semacam ini).
paling eskstrim matikan settingan remote (panjang tutorialnya )

[Yosia]

Originally Posted by grapow

tanya nih gimana biar komp kita ga bisa di remote sama org lain...

Cabut aja kabel networknya

--
Sebenernya yang paling menakutkan dibanding komputer bisa diremote adalah kondisi dimana data dalam komputer (my documents) kita bisa diakses oleh orang lain (via network)