Office: (Office 2003) Verzögerung einbauen

MarioGabler · 3. August 2009

Könntest du dir vorstellen das es an SP liegt?

Mußte eben feststellen das auf meiner VM Ware Access SP1 ist *frown.gif* und auf dem Server Access SP3

Schön dabei ist...beim ersten ausführen von der Abfrage Dispo2..löscht er mir die Exceltabelle...füge ich die händich wieder in das entsprechende Verzeichnis..führe es ein 2'tes Mal aus...löscht er mir die Excel Tabelle und löscht gleichzeitig den SQL Code in der Abfrage selbst...

WOW

J_Eilers · 3. August 2009

Wenn ich gemein wäre, würde ich den Fehler ca. 50cm vor dem Monitor suchen *wink.gif*

Perfectdark · 7. Januar 2021

von MarioGabler

Das ist der Lösungcode

Code:
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

SELECT TOP 1 tbl_Auftragsliste.AuftragsNr, tbl_Kundendaten.Firma2, tbl_Kundendaten.Firma, tbl_Kundendaten.Anrede2, tbl_Kundendaten.Ansprechpartner, tbl_Auftragsliste.Reisender, tbl_Kundendaten.Straße, tbl_Kundendaten.[PLZ/Ort], tbl_Kundendaten.Ort, tbl_Kundendaten.[Telefon geschäftlich], tbl_Kundendaten.[Telefon privat], tbl_Kundendaten.mobil, tbl_Kundendaten.Fax, tbl_Kundendaten.[e-mail], tbl_Autodaten.Kennzeichen AS Autodaten_Kennzeichen, tbl_Autodaten.Marke, tbl_Autodaten.Typ, tbl_Autodaten.Farbe, tbl_Autodaten.Diebstahlsicherung, tbl_Autodaten.Code, tbl_Kundendaten.Bemerkung, tbl_Auftragsliste.Datum, tbl_Auftragsliste.Zeit3, tbl_Auftragsliste.[Flug-Nr], tbl_Auftragsliste.Datum2, tbl_Auftragsliste.Zeit2, tbl_Auftragsliste.[Flug-Nr2], tbl_Auftragsliste.Zeit1, tbl_Auftragsliste.Terminal, tbl_Auftragsliste.Parken, tbl_Auftragsliste.Tanken, tbl_Auftragsliste.Reinigung, tbl_Auftragsliste.Reinigung2, tbl_Auftragsliste.Reinigung3, tbl_Auftragsliste.[Technischer Check-up], tbl_Auftragsliste.[Werkstatt-Service], tbl_Auftragsliste.[Chauffeur-Service], tbl_Auftragsliste.Anderes, tbl_Auftragsliste.Besonderheiten, tbl_Auftragsliste.Tagessatz, tbl_Kundendaten.Zahlungsweise, tbl_Auftragsliste.Kennzeichen AS Auftragsliste_Kennzeichen, tbl_Auftragsliste.bezahlt, tbl_Auftragsliste.Storno, tbl_Auftragsliste.Willkommen, tbl_Autodaten.KundenNr AS Autodaten_KundenNr, tbl_Auftragsliste.Rechnung, tbl_Auftragsliste.Sammelnummer
FROM (tbl_Kundendaten INNER JOIN (tbl_Autodaten INNER JOIN tbl_Auftragsliste ON tbl_Autodaten.AutoID = tbl_Auftragsliste.AutoID) ON tbl_Kundendaten.KundenNr = tbl_Auftragsliste.Kundennr) INNER JOIN tbl_Reisende ON (tbl_Kundendaten.KundenNr = tbl_Reisende.KundenNr) AND (tbl_Auftragsliste.ReiseID = tbl_Reisende.ReiseID)
WHERE (((Eval([Formulare]![frm_Auftragsliste]![auftragsnr]))"Eval[Formulare]![frm_Auftragsliste]![auftragsnr]")) ORDER BY auftragsnr DESC;
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Der fette Teil ist wohl noch nicht ganz richtig.

Da sollte doch nur Eval([Formulare]![frm_Auftragsliste]![auftragsnr] stehen.

Mit Eval([Formulare]![frm_Auftragsliste]![auftragsnr]))"Eval[Formulare]![frm_Auftragsliste]![auftragsnr]" sollte dir gesagt werden, dass es einen unterschied macht ob da Gänsefüsschen sind oder nicht ( bedeutet ungleich).

MarioGabler · 3. August 2009

Hi Perfectdark,

danke erstmal..

mmm werd ich gleich mal testen so in einer stunde..komme grad nciht dazu..

MarioGabler · 3. August 2009

Wenn ich das so einfüge
Code:

SELECT TOP 1 tbl_Auftragsliste.AuftragsNr, tbl_Kundendaten.Firma2, tbl_Kundendaten.Firma,

tbl_Kundendaten.Anrede2, tbl_Kundendaten.Ansprechpartner, tbl_Auftragsliste.Reisender,

tbl_Kundendaten.Straße, tbl_Kundendaten.[PLZ/Ort], tbl_Kundendaten.Ort, tbl_Kundendaten.[Telefon

geschäftlich], tbl_Kundendaten.[Telefon privat], tbl_Kundendaten.mobil, tbl_Kundendaten.Fax,

tbl_Kundendaten.[e-mail], tbl_Autodaten.Kennzeichen AS Autodaten_Kennzeichen,

tbl_Autodaten.Marke, tbl_Autodaten.Typ, tbl_Autodaten.Farbe, tbl_Autodaten.Diebstahlsicherung,

tbl_Autodaten.Code, tbl_Kundendaten.Bemerkung, tbl_Auftragsliste.Datum, tbl_Auftragsliste.Zeit3,

tbl_Auftragsliste.[Flug-Nr], tbl_Auftragsliste.Datum2, tbl_Auftragsliste.Zeit2,

tbl_Auftragsliste.[Flug-Nr2], tbl_Auftragsliste.Zeit1, tbl_Auftragsliste.Terminal,

tbl_Auftragsliste.Parken, tbl_Auftragsliste.Tanken, tbl_Auftragsliste.Reinigung,

tbl_Auftragsliste.Reinigung2, tbl_Auftragsliste.Reinigung3, tbl_Auftragsliste.[Technischer

Check-up], tbl_Auftragsliste.[Werkstatt-Service], tbl_Auftragsliste.[Chauffeur-Service],

tbl_Auftragsliste.Anderes, tbl_Auftragsliste.Besonderheiten, tbl_Auftragsliste.Tagessatz,

tbl_Kundendaten.Zahlungsweise, tbl_Auftragsliste.Kennzeichen AS Auftragsliste_Kennzeichen,

tbl_Auftragsliste.bezahlt, tbl_Auftragsliste.Storno, tbl_Auftragsliste.Willkommen,

tbl_Autodaten.KundenNr AS Autodaten_KundenNr, tbl_Auftragsliste.Rechnung,

tbl_Auftragsliste.Sammelnummer
FROM (tbl_Kundendaten INNER JOIN (tbl_Autodaten INNER JOIN tbl_Auftragsliste ON

tbl_Autodaten.AutoID = tbl_Auftragsliste.AutoID) ON tbl_Kundendaten.KundenNr =

tbl_Auftragsliste.Kundennr) INNER JOIN tbl_Reisende ON (tbl_Kundendaten.KundenNr =

tbl_Reisende.KundenNr) AND (tbl_Auftragsliste.ReiseID = tbl_Reisende.ReiseID)
WHERE Eval([Formulare]![frm_Auftragsliste]![auftragsnr] ORDER BY auftragsnr DESC;
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

sagt er mir beim abspeichern. Es fehle ein Operator.

MarioGabler · 3. August 2009

In diesem bereich Code:

WHERE Eval([Formulare]![frm_Auftragsliste]![auftragsnr] ORDER BY auftragsnr DESC;
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

würde das fehlen

MarioGabler · 3. August 2009

Habs gefunden..es fehlte ein )...test jetzt mal

J_Eilers · 3. August 2009

Wo trägst du das ein?

ebs17 · 3. August 2009

Code:

' aus
WHERE (((Eval([Formulare]![frm_Auftragsliste]![auftragsnr]))"Eval[Formulare]![frm_Auftragsliste]![auftragsnr]"))

' wurde
WHERE Eval([Formulare]![frm_Auftragsliste]![auftragsnr] ___
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Das ist anders, aber nicht richtig. Wie man doch einen richtigen Ansatz (#63) so variieren kann, dass man immer an einer Lösung vorbeigeht ...

MarioGabler · 3. August 2009

Sezt nochmal den completten Code ein der funzt:

Code:

SELECT TOP 1 tbl_Auftragsliste.AuftragsNr, tbl_Kundendaten.Firma2, tbl_Kundendaten.Firma, tbl_Kundendaten.Anrede2, tbl_Kundendaten.Ansprechpartner, tbl_Auftragsliste.Reisender, tbl_Kundendaten.Straße, tbl_Kundendaten.[PLZ/Ort], tbl_Kundendaten.Ort, tbl_Kundendaten.[Telefon geschäftlich], tbl_Kundendaten.[Telefon privat], tbl_Kundendaten.mobil, tbl_Kundendaten.Fax, tbl_Kundendaten.[e-mail], tbl_Autodaten.Kennzeichen AS Autodaten_Kennzeichen, tbl_Autodaten.Marke, tbl_Autodaten.Typ, tbl_Autodaten.Farbe, tbl_Autodaten.Diebstahlsicherung, tbl_Autodaten.Code, tbl_Kundendaten.Bemerkung, tbl_Auftragsliste.Datum, tbl_Auftragsliste.Zeit3, tbl_Auftragsliste.[Flug-Nr], tbl_Auftragsliste.Datum2, tbl_Auftragsliste.Zeit2, tbl_Auftragsliste.[Flug-Nr2], tbl_Auftragsliste.Zeit1, tbl_Auftragsliste.Terminal, tbl_Auftragsliste.Parken, tbl_Auftragsliste.Tanken, tbl_Auftragsliste.Reinigung, tbl_Auftragsliste.Reinigung2, tbl_Auftragsliste.Reinigung3, tbl_Auftragsliste.[Technischer Check-up], tbl_Auftragsliste.[Werkstatt-Service], tbl_Auftragsliste.[Chauffeur-Service], tbl_Auftragsliste.Anderes, tbl_Auftragsliste.Besonderheiten, tbl_Auftragsliste.Tagessatz, tbl_Kundendaten.Zahlungsweise, tbl_Auftragsliste.Kennzeichen AS Auftragsliste_Kennzeichen, tbl_Auftragsliste.bezahlt, tbl_Auftragsliste.Storno, tbl_Auftragsliste.Willkommen, tbl_Autodaten.KundenNr AS Autodaten_KundenNr, tbl_Auftragsliste.Rechnung, tbl_Auftragsliste.Sammelnummer
FROM (tbl_Kundendaten INNER JOIN (tbl_Autodaten INNER JOIN tbl_Auftragsliste ON tbl_Autodaten.AutoID = tbl_Auftragsliste.AutoID) ON tbl_Kundendaten.KundenNr = tbl_Auftragsliste.Kundennr) INNER JOIN tbl_Reisende ON (tbl_Kundendaten.KundenNr = tbl_Reisende.KundenNr) AND (tbl_Auftragsliste.ReiseID = tbl_Reisende.ReiseID)
WHERE Eval([Formulare]![frm_Auftragsliste]![auftragsnr]) ORDER BY auftragsnr DESC;
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Aber ich denk das liegt nicht am Code. Weil im netzwerk beim Kunden hab ich 2 Rechner gefunden einer mit SP1 Office und einer mit SP2 Office. Dort als User mit normalen Rechen angemeldet, Datenbank ausgeführt. Beim Rechner mit SP1 Office funzt alles ohne Probs. Beim Rechner mit SP2 Office läuft Dispo2 gegen die Wand bzw löscht meine Exceltabelle

Office: (Office 2003) Verzögerung einbauen

Verzögerung einbauen

Verzögerung einbauen

Verzögerung einbauen

Verzögerung einbauen

Verzögerung einbauen - Similar Threads - Verzögerung einbauen

"=Wenn" in VBA in eine hochzählende .range einbauen

"Automatische Übermittlung alle n Minuten" wird nicht gespeichert

Wechsel in Aufgaben startet nur mit sehr langer Verzögerung

Word 2003 "Speichern Unter" Verzögerung

Office Verzögerung

Office Verzögerung

verzögerung beim öffnen-Virenscanning