Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Formular aktuallisiert nicht immer

Frage Microsoft Microsoft Office

Mitglied: Maik87

Maik87 (Level 2) - Jetzt verbinden

20.12.2006, aktualisiert 09:55 Uhr, 3068 Aufrufe, 1 Kommentar

Hallo Leutz,

ich hab folgendes Problem:

Ich habe eine Datenbank angelegt, um von mehrern Gesellschaften die eingescannte Eingangspost zu dokumentieren. Also eine Tabelle und dort ersten beiden Spalten Gesellschaft und Belegart (Rechnung, Gutschrift etc)

Da ich nur ein Fomular nutzen wollte, habe ich eine Abfrage gebastelt, die filtert und ein Formular, welches sich auf diese Abfrage bezieht.

Der Code zum öffnen des Forms lautet wie folgt


Private Sub btm_tks_lieferscheine_Click()
On Error GoTo Err_btm_tks_lieferscheine_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "Form1"
DoCmd.OpenForm stDocName, , , stLinkCriteria

Belegart = btm_tks_lieferscheine.Caption
Gesellschaft = Form_start.Auswahl_ges.Value
Form_start.auswahl_bel.Value = Belegart
Form_Form1.Gesellschaft.DefaultValue = "'" & Gesellschaft & "'"
Form_Form1.Belegart.DefaultValue = "'" & Belegart & "'"
DoCmd.GoToRecord , , acNewRec

Exit_btm_tks_lieferscheine_Click:
Exit Sub

Err_btm_tks_lieferscheine_Click:
MsgBox Err.Description
Resume Exit_btm_tks_lieferscheine_Click

End Sub


Problem ist nun, dass teilweise nach dem öffnen noch die alten Datensätze angezeigt werden. Hatte ih also eben Rechnungen offen und klicke nun auf Lieferscheine, so stehen die Rechnungen noch drin, aber der neue Datensatz hat die Defaulwerte scho von den Lieferscheinen. Öffne ich das Form nochmal, ist es richtig!!

Dies ist aber nicht immer, sondern beim 3 oder 4 mal nur.

Wer weiss Rat?
Mitglied: Maik87
20.12.2006 um 09:55 Uhr
Hab es zum Laufen bekommen, indem ich die Reihenfolge der Anweisungen auf folgende geändert hab:

Private Sub btm_tks_lieferscheine_Click()
On Error GoTo Err_btm_tks_lieferscheine_Click

Dim stDocName As String
Dim stLinkCriteria As String

Belegart = btm_tks_lieferscheine.Caption
Gesellschaft = Form_start.Auswahl_ges.Value
Form_start.auswahl_bel.Value = Belegart


stDocName = "Form1"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Form_Form1.Gesellschaft.DefaultValue = "'" & Gesellschaft & "'"
Form_Form1.Belegart.DefaultValue = "'" & Belegart & "'"
DoCmd.GoToRecord , , acNewRec

Exit_btm_tks_lieferscheine_Click:
Exit Sub

Err_btm_tks_lieferscheine_Click:
MsgBox Err.Description
Resume Exit_btm_tks_lieferscheine_Click

End Sub
Bitte warten ..
Ähnliche Inhalte
JavaScript
gelöst Jquery Formular absenden (1)

Frage von tobmes zum Thema JavaScript ...

Entwicklung
gelöst Daten aus Formular sicher übertragen (2)

Frage von schneerunzel zum Thema Entwicklung ...

PHP
Formular ausfüllen, speichern und editierbar machen (7)

Frage von wescraven07 zum Thema PHP ...

Microsoft Office
Formular Autofill - Infopath (1)

Frage von TlBERlUS zum Thema Microsoft Office ...

Neue Wissensbeiträge
Windows Server

Umstellung SHA 1 auf SHA 2 - Migration der CA von CSP auf KSP

Tipp von Badger zum Thema Windows Server ...

Windows 10

Quato DTP94 unter Windows 10 x64 installieren und verwenden

Anleitung von anteNope zum Thema Windows 10 ...

Windows 10

Win10 1703 und Nutzerkennwörter bei Ersteinrichtung - erstaunliche Erkenntnis

(15)

Erfahrungsbericht von DerWoWusste zum Thema Windows 10 ...

Heiß diskutierte Inhalte
Festplatten, SSD, Raid
gelöst Raid-Controller (Areca) Datenverlust trotz R5 (16)

Frage von sebastian2608 zum Thema Festplatten, SSD, Raid ...

Server-Hardware
HP ProLiant DL380 G7, POST Error: 1785-Drive Array not Configured (10)

Frage von Paderman zum Thema Server-Hardware ...

Server-Hardware
Starker PC zum Virtualisieren (10)

Frage von canlot zum Thema Server-Hardware ...

Microsoft Office
gelöst Office 365 Pro Domäne einrichten OHNE Webseite (9)

Frage von thklemm zum Thema Microsoft Office ...