Senin, 18 November 2013

Bls: Re: [belajar-access] sembunyikan Navigasi

 

Klo kasusnya d Ms. Access 2003 gimana ya?... saya coba pakai fungsi yg d bahas disini, tidak berjalan,,,, maaf bg Junus nebeng pencerahan....?

Dikirim dari Yahoo Mail pada Android



From: Haer Talib <haertalib@gmail.com>;
To: Belajar Access <belajar-access@yahoogroups.com>;
Subject: Re: [belajar-access] sembunyikan Navigasi
Sent: Mon, Nov 18, 2013 8:44:17 AM

 

Hallo all,
lama juga saya nggak buka milis... maaf :)

Bang M Junus
Mungkin solusinya kelihatan manjur.
Tapi coba tekan F11, nanti navigation pane nya muncul lagi lho :)

Dan juga user bisa juga membuka file database sambil menekan SHIFT.

Apa yang anda perlukan adalah rangkaian Startup Options.

Ngaturnya di Access Options.
Paling tidak anda harus matikan juga:
1. Allow full menus, ini tidak menghilangkan backstage view, tapi meminimumkan menu yang tersedia.
2. Access special keys, utk mematikan misalnya tombol F11.
3. matikan shift key, pakai: ChangeProperty "AllowBypassKey", DB_BOOLEAN, False
    ==> Pakai procedure yg dikasih bang Heru

semoga berhasil.

HAER




Haer Talib

RumahAccess Indonesia
Tempatnya Belajar Microsoft Access
Artikel | Forum | Milis | Download | Training | Links | Blog | Event




2013/11/18 mochamad junus <madjoens@yahoo.co.id>


terima kasih mas heru atas bantuannya, pada saat saya eksekusi (file ekstensi masih ACCDB) navigasinya tidak tampak -berhasil- tapi pada saat ekstensinya saya simpan ke accde dan saat user mencentang pilihan di option navigation pane kemudian di close and open file kembali tetap kelihatan mas navigation pane nya. Dari sini saya sempat bingung mas kemudian tanya2 ke simbah oglek akhirnya dapat ilmu baru, yaitu menghilangkan tampilan backstagenya -menggunakan ribbon xml- , dari kombinasi keduanya maka apa yang jadi problem saya bisa terpecahkan.

terima kasih sekali lagi mas atas bantuannya.


Pada Sabtu, 16 November 2013 5:58, Heru Wibowo <heru.wibowo4456@gmail.com> menulis:
 
Ini yang biasa saya pake di MS Access 2007
Pake function ini Mas...letakkan di module lalu panggil melalui form yang pertama kali startup.
Function ChangeProperty(strPropName As String, varPropType As Variant, varPropValue As Variant) As Integer
    Dim dbs As Object, prp As Variant
    Const conPropNotFoundError = 3270
    Set dbs = CurrentDb
    On Error GoTo Change_Err
    dbs.Properties(strPropName) = varPropValue
    ChangeProperty = True
Change_Bye:
    Exit Function

Change_Err:
    If Err = conPropNotFoundError Then    ' Property not found.
        Set prp = dbs.CreateProperty(strPropName, _
            varPropType, varPropValue)
        dbs.Properties.Append prp
        Resume Next
    Else
        ' Unknown error.
        ChangeProperty = False
        Resume Change_Bye
    End If
End Function

Function DisableStdOption()
 On Error GoTo Err_DisableStdOption
 
 ChangeProperty "StartupShowDBWindow", DB_Boolean, False
     
 'turn off the database window in normal use
 DoCmd.RunCommand acCmdWindowHide

Exit_DisableStdOption:
 Exit Function
         
Err_DisableStdOption:
 MsgBox "Error #" & Err.Number & ": " & Err.Description
 Resume Exit_DisableStdOption
End Function

katakanlah dikasi nama modSecure
Form yang pertama kali startup katakanlah StartUp
pada event On Open form StartUp tersebut kasi script u/ memanggil fungsi  DisableStdOption

Private Sub Form_Open(Cancel As Integer)
Call DisableStdOption
End Sub

Mudah mudahan yang dimaksud itu.

Salam,
HW

2013/11/14 mochamad junus <madjoens@yahoo.co.id>
 
thanks gan atas atensinya, sudah saya coba masukkan kode tersebut  tapi yang ter hide ribbon nya-justru ribbon tersebut yang saya butuhkan gan-, yang saya maksudkan adalah fungsi untuk menghide navigasinya.

demikian gan terima kasih    


Pada Rabu, 13 November 2013 13:07, Ardiansyah Arifin <aarifin2@yahoo.co.id> menulis:
 
Bos.... coba pake ini : DoCmd.ShowToolbar "Ribbon", acToolbarNo


Regards,

Ardi



Pada Selasa, 12 November 2013 16:13, mochamad junus <madjoens@yahoo.co.id> menulis:
 


From: mochamad junus <madjoens@yahoo.co.id>;
To: <belajar-access@yahoogroups.com>;
Subject: [belajar-access] sembunyikan Navigasi
Sent: Mon, Nov 4, 2013 2:41:47 AM

 
Kepada Para master and suhu Access yang terhormat,

mohon pencerahannya ya....

bagaimana ya caranya meng hide navigasi pane di access?, sebelumnya saya mencoba menggunakan command "DoCmd.RunCommand acCmdWindowHide" saya taruh di form aktif pada saat membuka aplikasi dan berhasil *:D tersenyum lebar!, namun pada saat aplikasi tersebut saya simpan menggunakan ekstensi "ACCDE" command tersebut tidak berjalan-navigasi nya bisa kelihatan-, saya mohon bantuannya bagaimana agar command"DoCmd.RunCommand acCmdWindowHide" bisa berjalan di ekstensi" ACCDE"?
demikian, terima kasih atas bantuannya selama ini.

wassalammualaikum Wr.Wb











__._,_.___
Reply via web post Reply to sender Reply to group Start a New Topic Messages in this topic (9)
Recent Activity:
SPAM IS PROHIBITED
.

__,_._,___

Tidak ada komentar:

Posting Komentar