🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Thread View: pl.comp.bazy-danych.msaccess
3 messages
3 total messages Started by Józef J Tue, 01 Sep 2020 13:34
access nie wykonuje kodu VBA
#137687
Author: Józef J
Date: Tue, 01 Sep 2020 13:34
1 lines
1520 bytes
Formularz we właściwościach pól „AfterUpdate()” wykonuje kod VBA. Baza jest udostępniona  w środowisku sieciowym . Po uruchomieniu bazy danych przez innych użytkowników, kod VBA nie wykonuje się (dla accdb i accde po kompilacji). Czy czegoś brakuje.
Re: access nie wykonuje kodu VBA
#137689
Author: Radosław Biernacki
Date: Wed, 02 Sep 2020 22:14
7 lines
1847 bytes
wtorek, 1 września 2020 o 15:34:54 UTC+2 Józef J napisał(a):
> Formularz we właściwościach pól „AfterUpdate()” wykonuje kod VBA. Baza jest udostępniona w środowisku sieciowym . Po uruchomieniu bazy danych przez innych użytkowników, kod VBA nie wykonuje się (dla accdb i accde po kompilacji). Czy czegoś brakuje.
Trochę mało danych :( Co to za kod? Kod VBA nigdy nie wykonuje się automatycznie w nowych lokalizacjach. Musi być zaufana: 
[HKEY_CURRENT_USER\Software\Microsoft\Office\16.0\Access\Security\Trusted Locations\aplikacja]
"Description"="Plik aplikacji"
"Path"="c:\\aplikacja\\"
To oczywiście tylko przykład. Zależy od wersji Office.
Re: access nie wykonuje kodu VBA
#137690
Author: Józef J
Date: Thu, 03 Sep 2020 20:24
22 lines
3052 bytes
czwartek, 3 września 2020 o 00:14:11 UTC+2 rade...@gmail.com napisał(a):
> wtorek, 1 września 2020 o 15:34:54 UTC+2 Józef J napisał(a): 
> > Formularz we właściwościach pól „AfterUpdate()” wykonuje kod VBA. Baza jest udostępniona w środowisku sieciowym . Po uruchomieniu bazy danych przez innych użytkowników, kod VBA nie wykonuje się (dla accdb i accde po kompilacji). Czy czegoś brakuje.
> Trochę mało danych :( Co to za kod? Kod VBA nigdy nie wykonuje się automatycznie w nowych lokalizacjach. Musi być zaufana: 
> [HKEY_CURRENT_USER\Software\Microsoft\Office\16.0\Access\Security\Trusted Locations\aplikacja] 
> "Description"="Plik aplikacji" 
> "Path"="c:\\aplikacja\\" 
> To oczywiście tylko przykład. Zależy od wersji Office.
Wersja: access 2010
Kod VBA wpisuje identyfikator użytkownika, datę i czas logowania, (formularz LOG jest uruchamiany przy AUTOSTART). 
Private Sub Form_Load()
[Forms]![LOG]![Login] = UserNameWindows() & " " & Now()
End Sub
Następnie kod VBA jest użyty w innym formularzu do wprowadzania danych (po aktualizacji pola1, dodatkowo w polu 2 jest wpis identyfikatora użytkownika (informacja kto wprowadził dane)
Private Sub Pole1_AfterUpdate()
[Forms]![DANE_WE]![Pole2] = UserNameWindows() & " " & Now()
End Sub
Dodatkowo jest funkcja:
Function UserNameWindows() As String
UserNameWindows = VBA.Environ("USERNAME")
End Function
Podejrzewam, że użytkownicy nie wskazali zaufanej lokalizacji (nie mam w tej chwili od nich zwrotnej informacji) . Czy może być jakaś inna przyczyna.
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads