Top-Themen

Aktuelle Themen (A bis Z)

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

Mitglied: Maik87

Maik87 (Level 2) - Jetzt verbinden

20.12.2006, aktualisiert 09:55 Uhr, 3085 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
Webentwicklung

Wie wird in Microsoft Expression Blend 4 die Site aktuallisiert

Frage von helmuthelmut2000Webentwicklung

Hallo, Ich möchte das Programm Microsoft Expression Blend 4 etwas besser kennenlernen. Dazu habe ich mir die Testversion installiert. ...

Windows Server

DC mit Windows Server 2012 R2 - Namensauflösung aktuallisiert sich nicht

Frage von TeWutzWindows Server5 Kommentare

Hallo zusammen, in unserer Umgebung haben wir momentan nur einen DC mit 2012R2 im Einsatz. Dieser spielt auch DNS. ...

Microsoft Office

Formulare, Listboxen und durchsuchen von Tabellen

Frage von 94451Microsoft Office5 Kommentare

Hallo Ihr, dieses Script hat mir schon sehr weitergeholfen hab ich 'fast' so in den Tiefen des Internets gefunden: ...

Sonstige Systeme

PDF-Formulare mit handschriftlicher Unterschrift

Frage von FenjaWSonstige Systeme19 Kommentare

Hallo Zusammen, ich hoffe ihr könnt mir helfen. Ist es möglich ein PDF Dokument zu erstellen und mit einer ...

Neue Wissensbeiträge
Peripheriegeräte
Unterschrank für HP Drucker
Tipp von NixVerstehen vor 2 StundenPeripheriegeräte1 Kommentar

Als kurzen Freitags-Tipp möchte ich gerne meinen neuen Drucker-Unterschrank Modell Amica KS 15423W vorstellen. Das Gerät eignet sich hervorragend ...

Windows 10
Windows 10 - Probleme mit Point-And-Print
Tipp von emeriks vor 1 TagWindows 103 Kommentare

Hi, wir kämpfen z.Z. mit einigen Druckertreibern, welche unter Win10 beim Verbinden eines Druckers von Printserver mit dem Dialog ...

Windows 10

Windows 10 1803 - Ihr Roamingbenutzerprofil wurde nicht vollständig synchronisiert

Anleitung von Deepsys vor 1 TagWindows 101 Kommentar

Bei allen Windows 10 1803 PCs traten Probleme mit den Servergespeicherten Profilen auf. Das Abmelden dauerte sehr lange und ...

Exchange Server
Exchange - Fehler mit 2018-07 Sicherheitsupdate
Tipp von ArnoNymous vor 3 TagenExchange Server7 Kommentare

Hallo, es gibt mal wieder Freude mit den MS-Updates. KB4338814 führt dazu, dass der Exchange keine Mails mehr zustellt. ...

Heiß diskutierte Inhalte
Humor (lol)
Freitagsfrage: Was tun, wenn der Admin der DAU ist?
Frage von VoiperHumor (lol)26 Kommentare

Moin Zusammen, Eine nicht ganz ernst gemeinte Frage an die Außendienstler unter uns. Zusammenfassung: Ein Inhouse Admin ruft bei ...

Exchange Server
Exchange Backup 10 Jahre Aufbewahrung
Frage von arccosExchange Server20 Kommentare

Hallo zusammen. Aktuell beschäftigen mich ein paar Fragen zum Thema Office365/ Exchange. 1.10 Jahre Aufbewahrungspflicht sicherstellen 2.Kann man als ...

Humor (lol)
Windows 10 - immer für Überraschungen gut
gelöst Frage von HenereHumor (lol)18 Kommentare

Eben nach (beim) installieren der neuesten Updates für 1803 :-) Und sorry fürs Handyfoto, aber der musste sein. Nach ...

Windows Server
W2K16 Essentials: keine Namensauflösung nach der Einrichtung DNS + AD DS
Frage von Ben-WittWindows Server18 Kommentare

Ich versuche bereits seit ca. 4 Wochen einen Server 2016 "Essentials" richtig zu installieren. An diesem Server möchte ich ...