Acc97: Form-opdatering inden modul koeres

prøv med doevents()

ok lidt lost - doevents - er den tilladt i Access97?

Ja.

Prøv bare at indsætte sætningen i koden

ok den klager ikke naar man bruger DoEvents - uden parantes - men det goere heller ikke rigtigt noget - formen vises stadig ikke

Ok - doevent afgiver kontrollen til operativsystemet - til andre processer.
J.f. nedenstående skal du nok prøve Form_Activate()

When you first open a form, the following events occur in this order:
Open -> Load -> Resize -> Activate -> Current

ok nu vises formen ok naar der strtes op, men koden bliver ikke eksekveret under Activeate - hvad skal jeg smide i laod-eventen for at faa det sparket igang?

Alternativt kan du jo prøve med hændelsen Timerudløb. Dvs. du sætter f.eks. Timer til 1000 og på hændelsen Timerudløb lægger du din kode.

har proevet med me.setfocus - men det hjaelper ikke

sjap - ideen med timer virker. Den naeste smaa-irriterende ting der sker er at jeg gennem modulet eksekverer en stak SQL kald. Det lader til at SQL-kaldene ikke bliver faerdige inden popuppen lukket og viser den naeste skaerm.

Mit kald er:

.....
For i = 1 To 3
If LocalD(i) < ServerD(i) Then
        TBName = "TblZoo" & i
        Me.LblStatus.Caption = "Updating Zooplankton part " & i
        Me.Refresh
        DoEvents
        PreParsing.RunUpdates (TBName)
End If
Next i
   
DoCmd.OpenForm "STA_splash"
   
DoCmd.Close acForm, "Loadscreen", acSaveNo
End Sub

Det lader ikke til at den venter paa at preparsing.Runupdates() er faerdig inden den maser videre i koden hvilket resulterer i at STA_splash vises mens den stadig er igang med at opdatere tabellerne. Er der en nem maade at faa den til at vente paa at runupdates er faerdig?

PreParsing.RunUpdates (TBName)    Den er ny for mig, den har jeg ikke hørt om, så den kender jeg ikke.
Hvis det f.eks. var kald af almindelige forespørgsler, så ville den vente indtil forespørgslen var kørt inden den fortsætter afviklingen af koden.

ok PreParsing.RunUpdates er en sub i modulet Preparsing, som gennemkoeres for tre tabeller.
I denne sub gennemkoeres en tabel, og resultaterne overfoeres til to andre tabeller efter der er udfoert en raekke beregninger paa dem. Saa hvis jeg kalder RunUpdates(TBName) vil jeg koerer en lang raekke INSERT INTO kald baseret paa tabellen TBName til to andre tabeller (Dette goeres for at gore plotting hurtigere paa de beregnede felter naar brugeren har loadet).
Problemet er at det lader til at alle INSERT-kaldene i RunUpdates ikke er afsluttet for koden vist ovenover fortsaetter.

Jeg plejer ikke selv bruge DoEvents. Er du sikker på den ikke "roder" rundt i tingene?

Hmm det ved jeg ikke - som dig plejer jeg ikke rigtigt at bruge DoEvents, men siden Me.Lblstatus.Caption ikke blev opdateret  uden proevede jeg at inkludere den hvilket virkede fint for at faa det sk*de label opdateret :-)
Men jeg ved ikke om det er den der laver ged i kaldene til min sub nu...

Sæt en ' foran og se hvad der sker.

Hvis jeg fjerner DoEvents vises der ikke nogen aendringer i label - Men til gengaled korer den koden faerdig inden den henter den naeste form!!!
Saa nu er jeg rundt regnet lige vidt :-D

Det burde ikke være den. Tvært i mod faktisk.

Byt rundt på doEvents og PreParsing.

Jeps hvis jeg bytter rundt paa DoEvents og Preparsing faar jeg vist 2 ud af loopets 3 label-opdateringer :-)

Hvis i begge forresten lige husker at smide et svar paa et tidspunkt kan jeg faa givet jer nogle point for alt det mas :-)

Pænt tak :0)

Jeps - takker ;O)

Jeg tror jeg er naaet til et stadie hvor jeg kan bytte lidt rundt paa tingene og faa en ok - loesning, men konklusionen er nu sjovt nok stadig at det lader til at introduktionen af DoEvents resulterer i at koden i PreParsing ikke bliver koert helt faerdigt inden der retuneres til Formens kode. Koden eksekveres dog stadigt korrekt.

Jeg har noget kode der sikrer synkrone shell kald - hvis det kunne anvendes? Men det tvivler jeg nu på kan anvendes i denne løsning.

Ja jeg tror ikke lige det bliver brugbart i denne sammenhaeng idet jeg jo egentligt ikke bruger Shell her - eller andre steder i opstarten - men tak for tilbuddet