Suche | Statistiken | Benutzerliste | Access-FAQ | Datenschutz Foren
donkarl Forum
donkarl Forum ->  Themen -> Access -> Diskussion ansehen

Du bist als Gast eingelogt. ( Anmelden | Registrieren )
  • Access hängt nach VBA Code
  • Coyote21.03.13 15:06
       └ RE: Access hängt nach VBA Code Karl Donaubauer21.03.13 18:49
          └ RE: Access hängt nach VBA Code Coyote22.03.13 10:50
  • listenfeld mit detailfeldern in abhängigkeit von k...
  • Josef16.02.13 19:21
       └ RE: listenfeld mit detailfeldern in abhängigkeit... Karl Donaubauer17.02.13 19:01
          └ RE: listenfeld mit detailfeldern in abhängigke... Josef18.02.13 19:36
             └ RE: listenfeld mit detailfeldern in abhängig... Josef22.02.13 16:50
                └ RE: listenfeld mit detailfeldern in abhäng... Karl Donaubauer22.02.13 18:00
                   └ RE: listenfeld mit detailfeldern in abhä... Josef22.02.13 19:37
                      └ RE: listenfeld mit detailfeldern in ab... PeterDoering24.02.13 08:08
                         └ RE: listenfeld mit detailfeldern in ... Josef25.02.13 14:23
                   └ RE: listenfeld mit detailfeldern in abhä... Josef01.03.13 21:18
                      └ RE: listenfeld mit detailfeldern in ab... Karl Donaubauer01.03.13 23:42
                         └ RE: listenfeld mit detailfeldern in ... Josef03.03.13 13:25
                            └ RE: listenfeld mit detailfeldern i... Karl Donaubauer03.03.13 21:31
                               └ RE: listenfeld mit detailfeldern... Josef15.03.13 18:43
  • Access Änderungen
  • Hansruedir14.03.13 18:43
       └ RE: Access Änderungen StefanWirrer15.03.13 09:40
       └ RE: Access Änderungen PeterDoering15.03.13 11:41
  • Multiple Choice auswertung
  • BetzMartin12.03.13 10:44
       └ RE: Multiple Choice auswertung Karl Donaubauer13.03.13 17:46
          └ RE: Multiple Choice auswertung BetzMartin14.03.13 15:39
  • Spalten ein- bzw ausblenden
  • moellfe11.03.13 16:01
       └ RE: Spalten ein- bzw ausblenden PeterDoering12.03.13 01:38
          └ RE: Spalten ein- bzw ausblenden moellfe14.03.13 10:57
  • Export einer variablen Abfrage via VBA?
  • Lorenz13.03.13 19:39
       └ RE: Export einer variablen Abfrage via VBA? Karl Donaubauer13.03.13 20:59
          └ RE: Export einer variablen Abfrage via VBA? Lorenz13.03.13 21:02
  • ODBC-Anbindung Ingres als Backend
  • snicolaus13.03.13 12:39
  • oldValue
  • moellfe27.02.13 15:41
       └ RE: oldValue Axelander27.02.13 16:25
          └ RE: oldValue moellfe27.02.13 16:43
       └ RE: oldValue PeterDoering28.02.13 08:09
          └ RE: oldValue moellfe02.03.13 17:22
             └ RE: oldValue PeterDoering04.03.13 23:44
                └ RE: oldValue moellfe12.03.13 00:05
                   └ RE: oldValue PeterDoering12.03.13 00:59
       └ RE: oldValue jojogar05.03.13 20:53
  • Access 2010 Statusleiste Ansichtssymbole
  • diwe0111.03.13 08:19
       └ RE: Access 2010 Statusleiste Ansichtssymbole PeterDoering11.03.13 22:05
  • GDIPlus-Problem nach Update?
  • Lorenz11.03.13 18:27
       └ RE: GDIPlus-Problem nach Update? Gunter Avenius11.03.13 18:54
  • Access Stammtisch München am 14.03.2013 (Do)
  • StefanWirrer11.03.13 12:49
  • letzte Version anzeigen
  • udo1toni08.03.13 16:18
       └ RE: letzte Version anzeigen PeterDoering08.03.13 18:55
          └ RE: letzte Version anzeigen udo1toni08.03.13 20:08
  • Fremdschlüssel in Access
  • jojogar19.02.13 19:47
       └ RE: Fremdschlüssel in Access PeterDoering20.02.13 16:04
          └ RE: Fremdschlüssel in Access jojogar21.02.13 00:44
             └ RE: Fremdschlüssel in Access PeterDoering25.02.13 17:17
                └ RE: Fremdschlüssel in Access jojogar05.03.13 18:54
  • access 2007 excel import: leeres datumsfeld
  • bkleine04.03.13 13:35
       └ RE: access 2007 excel import: leeres datumsfeld jojogar05.03.13 18:42
  • Access 2007 Serielle Schnittstelle COMM Control Ha...
  • rock_d01.03.13 09:46
       └ RE: Access 2007 Serielle Schnittstelle COMM Cont... jojogar05.03.13 18:23
    Coyote
    Gesendet: 21.03.13 15:06
    Betreff: Access hängt nach VBA Code


    Hallo Allerseits, hab das Problem das nach ausführen von folgendem Code sich das Access 2010 nicht mehr bedienen lässt.
    Hab ich was übersehen?
    '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    Sub KdNrAendern()

    Dim db As DAO.Database
    Dim rs1 As DAO.Recordset
    Dim rs2 As DAO.Recordset

    Dim SuchKriterium As String
    Dim Zaehler1 As Integer
    Dim alteKdNr As String
    Dim neueKDnr As String

    Set db = CurrentDb

    'Tabelle öffnen die die zu erledigenden Aufgaben enthält
    Set rs1 = db.OpenRecordset("SELECT kdnr_alt, kdnr_neu FROM T_KdNrChange WHERE do = -1 AND ready = 0")

    If rs1.BOF And rs1.EOF Then 'Überprüfung ob Recordset überhaupt Werte enthält
    MsgBox "Keine Kundennummern zu ändern!", vbInformation, "Keine Änderung"
    Else 'OK Datensätze vorhanden. Weiter

    'Tabelle "public_T_Kundenstammdaten" öffnen
    Set rs2 = db.OpenRecordset("public_T_Kundenstammdaten", dbOpenDynaset, dbSeeChanges)

    If rs2.BOF And rs2.EOF Then 'Überprüfung ob Recordset überhaupt Werte enthält
    MsgBox "Keine Kunden vorhanden!", vbInformation, "Keine Kunden"
    Else 'OK Datensätze vorhanden. Weiter

    rs1.MoveFirst
    Zaehler1 = 1
    Do While Not rs1.EOF 'Solange noch zu erledigende Änderungen vorhanden
    rs2.MoveFirst
    'Anzeige welcher Datensatz behandelt wird
    DoCmd.Echo False, "Datensatz: " & Zähler1
    Zaehler1 = Zaehler1 + 1
    'Alte und Neue Kundenummer in Variablen ablegen
    alteKdNr = rs1!kdnr_alt
    neueKDnr = rs1!kdnr_neu
    SuchKriterium = "[Kundennummer]='" & alteKdNr & "'" 'Suchkriterium festlegen
    rs2.FindFirst (SuchKriterium) 'Zu ändernder Datensatz in "public_T_Kundenstammdaten" suchen
    If rs2.NoMatch Then 'Wenn Kundennumemr nicht vorhanden dann
    MsgBox ("Folgende Kundennummer nicht vorhanden: " & alteKdNr)
    Else 'Kundennummer vorhanden. Weiter

    'Bereich um die Kundennummer zu ändern
    MsgBox ("Kundennummer wird geändert")

    End If
    rs1.MoveNext
    Loop
    End If
    End If

    'Alle Objekte schließen
    rs1.Close
    rs2.Close
    db.Close

    End Sub
    '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

    Wäre super wenn mir hierbei jemand weiterhelfen könnte.

    Grüße Markus
    Top of the page Bottom of the page


    Seite: < 55 56 57 58 59 60 ... 61 62 63 64 65 66 67 ... >
    Suche in diesem Forum
    Druckfreundliche Version
    (Alle Cookies von dieser Seite löschen.)