Wednesday, June 20, 2012

Cara Yang Cerdik Untuk Mentrap On Error Resume Next - VB6

Mengenai cara men-trap (menjebak) objek error yang berada di bawah bari On Error Resume Next - Bagaimana kita dapat melakukan sebuah pengecualian dalam baris yang berada di bawah On Error Resume Next, di bawah adalah contoh kode VB6 beserta penjelasannya:...
READ MORE - Cara Yang Cerdik Untuk Mentrap On Error Resume Next - VB6

Sunday, June 17, 2012

Contoh Menambahkan Attribut Pada Tag HTML - VB Code

Private Function AddPreWithClassName() Dim d As New MSHTML.HTMLDocument Dim l As HTMLMetaElement Dim x As HTMLHtmlElement d.body.innerHTML = txtPost.Text For Each l In d.All If l.tagName = "PRE" Then l.className...
READ MORE - Contoh Menambahkan Attribut Pada Tag HTML - VB Code

URL Encode - Decode UTF8 Menggunakan Script Control

Mungkin bisa disebut sebagai cara termudah untuk melakukan Encoding dan Decoding URL UTF8 dalam VB6, dengan memanfaatkan OCX Microsoft Script Control. Adapun kode untuk Encode dan Decode URL UTF8 menggunakan Visual Basic 6.0 adalah sebagai berikut: '================================================================='UrlEncodeUtf8...
READ MORE - URL Encode - Decode UTF8 Menggunakan Script Control

VB6 Code - Mencari seluruh Printer Port

Lebih tepatnya mencari port printer tertentu dari seluruh printer port yang ada menggunakan kode VB6. Adapun kode VB6 untuk mencari port tertentu dari seluruh printer port yang ada adalah sebagai berikut:Public Function FindPrinterPort(Port As String)...
READ MORE - VB6 Code - Mencari seluruh Printer Port