Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Passwortgeschütztes Formular
Gehe zu Seite Zurück  1, 2, 3, 4
zurück: Mehrfachfilter im Formular weiter: Bei neuem DS gesperrte Felder entsperren Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
WWSelec
Einsteiger


Verfasst am:
29. Jan 2013, 10:09
Rufname:

AW: Passwortgeschütztes Formular - AW: Passwortgeschütztes Formular

Nach oben
       

Ich hätte eine Frage, wie muss man den Code ändern, um es auf einem 64bit Betriebssystem laufen zulassen?

Unter Windows 7/8 32bit läuft das Ganze ohne Probleme. Unter den 64bit Versionen bricht die Datenbank schon am Starten ab.
Super wäre es halt wenn es unter beiden Bitsystemen laufen würde.

Werde die genau Fehlermeldung posten wenn Bedarf ist.
Volli07
Neuling


Verfasst am:
11. Mai 2013, 17:44
Rufname: Volker

AW: Passwortgeschütztes Formular - AW: Passwortgeschütztes Formular

Nach oben
       Version: Office 2013

Hallo,

So sollte es auch unter 64 bit gehen
Code:
Option Compare Database
Option Explicit

Public Declare PtrSafe Function SetTimer Lib "user32" _
    (ByVal Hwnd As LongLong, ByVal nIDEvent As LongLong _
   , ByVal uElapse As LongLong, ByVal lpTimerFunc As LongLong) As LongLong
Private Declare PtrSafe Function KillTimer Lib "user32" _
    (ByVal Hwnd As LongLong, ByVal nIDEvent As LongLong) As LongLong
Private Declare PtrSafe Function PostMessage Lib "user32" Alias _
    "PostMessageA" (ByVal Hwnd As LongLong, ByVal wMsg As LongLong _
                  , ByVal wParam As LongLong _
                  , ByVal lParam As LongLong) As LongLong
Private Declare PtrSafe Function FindWindowEx Lib "user32" Alias _
    "FindWindowExA" (ByVal hWnd1 As LongLong, ByVal hWnd2 As Long _
                   , ByVal lpsz1 As String, ByVal lpsz2 As String) As LongLong
Private Declare PtrSafe Function FindWindow Lib "user32" Alias _
    "FindWindowA" (ByVal lpClassName As String _
                 , ByVal lpWindowName As String) As LongLong
Private Const EM_SETPASSWORDCHAR = &HCC&
Public Const NV_INPUTBOX As LongLong = &H5000&
Public Const MyCaption = "Passwort"
Public Const MyMessage = "Passwort eingeben:"
Public gblInputBox

Public Sub TimerProc(ByVal Hwnd As LongLong, ByVal uMsg As LongLong _
                   , ByVal idEvent As LongLong, ByVal dwTime As LongLong)
    Dim EditHwnd As LongLong
     
    EditHwnd = FindWindowEx(FindWindow("#32770", MyCaption), 0, "Edit", "")
    postMessage EditHwnd, EM_SETPASSWORDCHAR, Asc("******"), 0&
    KillTimer Hwnd, idEvent
End Sub

MfG

Volker
derArb
getting better


Verfasst am:
12. Mai 2013, 21:14
Rufname: derArb
Wohnort: Berlin


AW: Passwortgeschütztes Formular - AW: Passwortgeschütztes Formular

Nach oben
       

Hallo,
das ist ja geradezu "big Shit"
was wird mich denn bei MS und 64 bit Versionen noch erwarten?
Darf ich ganze MS-Pakete einfach löschen und neue kaufen????

_________________
MfG
derArb

Scio me nihil scire...Εν οίδα οτι ουδέν οίδα... Ich weiss, dass ich nichts weiss (Sokrates)
Ich bevorzuge Beiträge mit korrekter deutscher Grammatik.
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Gehe zu Seite Zurück  1, 2, 3, 4
Diese Seite Freunden empfehlen

Seite 4 von 4
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: Problem beim Bericht oeffnen, wenn Parameter von Formular 11 Gast1 994 21. Jul 2005, 15:28
Nindigo Problem beim Bericht oeffnen, wenn Parameter von Formular
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrage über Formular einen Wert übergeben. 4 magnum 1281 29. Mai 2005, 14:55
jens05 Abfrage über Formular einen Wert übergeben.
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrageergebnis als neues Formular anzeigen 2 mila 3035 12. Apr 2005, 12:38
mila Abfrageergebnis als neues Formular anzeigen
Keine neuen Beiträge Access Tabellen & Abfragen: Abfragen im Formular aufrufen, automatisch bestätigen 3 Calvin22 1607 12. Apr 2005, 12:12
Willi Wipp Abfragen im Formular aufrufen, automatisch bestätigen
Keine neuen Beiträge Access Tabellen & Abfragen: kreuzabfrage ausführen nach vorgeschaltetem formular mit kom 4 Gast 888 21. Dez 2004, 15:17
Gast kreuzabfrage ausführen nach vorgeschaltetem formular mit kom
Keine neuen Beiträge Access Tabellen & Abfragen: Abfragekriterium soll von aktuell geöffnetem Formular abhäng 2 Gast 1078 29. Nov 2004, 15:19
lupos Abfragekriterium soll von aktuell geöffnetem Formular abhäng
Keine neuen Beiträge Access Tabellen & Abfragen: Formeln vom Formular, werden in der Abfrage nicht angezeigt 4 maddes 896 23. Nov 2004, 12:38
Skogafoss Formeln vom Formular, werden in der Abfrage nicht angezeigt
Keine neuen Beiträge Access Tabellen & Abfragen: Aktionsabfrage in Formular -immer nur einen Datensatz ändern 6 blauvogel 1093 08. Okt 2004, 11:43
Skogafoss Aktionsabfrage in Formular -immer nur einen Datensatz ändern
Keine neuen Beiträge Access Tabellen & Abfragen: Zeile der Dateneingabe (*) in einem Formular verschieben 2 Albertus 791 08. Okt 2004, 09:17
Albertus Zeile der Dateneingabe (*) in einem Formular verschieben
Keine neuen Beiträge Access Tabellen & Abfragen: Suchfunktion mit mehreren Kriterien aus Formular 5 Danny G. 2219 09. Sep 2004, 11:08
Danny G. Suchfunktion mit mehreren Kriterien aus Formular
Keine neuen Beiträge Access Tabellen & Abfragen: Mit Formular Abfrage machen? 9 Gast 2093 06. Sep 2004, 10:03
Nevyn Mit Formular Abfrage machen?
Keine neuen Beiträge Access Tabellen & Abfragen: Tabelle, Formular, Abfrage...und nun ? 3 Gags 791 29. Aug 2004, 22:05
lothi Tabelle, Formular, Abfrage...und nun ?
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft Word Serienbriefe