[belajar-access] Re: Ketika di Klik Masuk Browser

 

Dear Kang Cecep,

Kalau diset pada event on click sepertinya riskan ya, karena nanti saat input, event ini akan aktif. Tapi tidak mengapa, sekedar belajar, bisa dimodif lagi nanti.

Saya coba tadi, dengan membuat text box biasa dengan nama Text42, diisi dengan tulisan: http://imopi.wordpress.com/

Kemudian pada event on click:

Private Sub Text42_Click()
DoCmd.RunCommand acCmdRefreshPage
If IsNull(Me!Text42) Then Exit Sub
Dim Fl As Long
Fl = Shell("RUNDLL32.EXE URL.DLL,FileProtocolHandler " & Me!Text42, vbNormalFocus)
End Sub

Procedure diatas berlaku tidak hanya untuk hyperlink, tapi berlaku untuk membuka semua file yang terdaftar di Windows kita, termasuk MDB, DOX, XLS, PDF, dsb.

Silahkan ganti isinya dengan (misal): D:\Test.docx
Maka file dokumen Test.docx akan langsung terbuka, dengan syarat file tersebut memang ada, dan alamatnya benar.

Wassalaamu'alaikum Warahmatullahi Wabarakatuh,
Sofyan Efendi
http://imopi.wordpress.com/

--- In belajar-access@yahoogroups.com, "cepwahyu" <cepwahyu@...> wrote:
>
> Halllo pencinta access semua,
>
>
>
> Saya punya satu texbox yg isinya alamat website, saya ingin ketika diklik
> langsung membuka browser...
>
> Please help...
>
>
>
> Best Regards
>
> CW
>

__._,_.___

Reply to sender | Reply to group | Reply via web post | Start a New Topic

Messages in this topic (2)

Recent Activity:

• New Members 12

Visit Your Group

SPAM IS PROHIBITED

Switch to: Text-Only, Daily Digest • Unsubscribe • Terms of Use

.

__,_._,___