Avatar billede tni Juniormester
30. juni 2003 - 15:34 Der er 5 kommentarer og
1 løsning

Formular Timer lukker databasen

Jeg har et tekstfeldt som fjernes ved timerudløb
Private Sub Form_Timer()

        Me.txtVelkommen.Visible = False
       
End Sub

problemet er at den lukker hele databasen når den bliver startet af et vb program

mvh TNI
Avatar billede terry Ekspert
30. juni 2003 - 15:50 #1
what do you mean "når den bliver startet af et vb program", are you using automation to open the dB?
Avatar billede tni Juniormester
01. juli 2003 - 11:21 #2
hej ...

Mit lille VB program som gør at brugeren kun skal trykke for at opdatere. den lokale file.

Det virker igen hves jeg fjerner 
Me.txtVelkommen.Visible = False
       
mvh TNI

FileCopy "n:\workgrp\businessintg\dl_databasen\dl-ver014.mdb", _
  "C:\userdata\access\dl-ver014.mdb"
   
  accessApp.Visible = True
  accessApp.OpenCurrentDatabase "C:\userdata\access\dl-ver014.mdb"
Avatar billede terry Ekspert
01. juli 2003 - 17:17 #3
can you send me your dB so I can see ALL of what your trying to do?
eksperten@santhell.dk
Avatar billede molberg Nybegynder
02. juli 2003 - 10:38 #4
Dit problem er sansynligvis at Access lukkes ned når din objektvariabel mister "scope" (tror jeg nok det hedder) når din procedure slutter. Jeg mener du skal prøver at sætte usercontrol-egenskaben for applications-objekten til true.

Se evt. eksempel fra noget test jeg har lavet engang hvor jeg starter Access og viser en form fra et andet program. I det tilfælde forbliver Access åben efter procedure er kørt. Det er godt nok VBscript men det er the same...

Set App = Getobject("C:\Documents and Settings\Steen\Dokumenter\PROJEKTER\TEST\TestLinkingSQL.mdb")

if Err<>0 then
    msgbox "program ikke startet - starter program"
    Set App = CreateObject("C:\Documents and Settings\Steen\Dokumenter\PROJEKTER\TEST\TestLinkingSQL.mdb")
end if

app.docmd.openform "frmReadSales",,,,,,cuid

app.usercontrol = true
app.docmd.runcommand 10
app.visible = true

mvh
Steen Molberg
Avatar billede tni Juniormester
04. juli 2003 - 13:16 #5
Så får jeg at jeg ikke kan sætte "app.visible = true"
Hvis jeg fjerner "app.visible = true" starter programmet godt nok op.

Hvad laver den "usercontrol" jeg kan ikke finde den i min hjælp.

mvh TNI
Avatar billede tni Juniormester
06. juli 2003 - 10:31 #6
lukket
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester