Avatar billede hougaard Nybegynder
30. august 2000 - 10:32 Der er 15 kommentarer og
1 løsning

VB <> Word2000

Jeg har et vb program, som bruger VBA til at hente / oprette dokumenter.
Og det går fint med det første dokument.
Men når jeg åbner nummer 2 dokument, og altså har et åben i forvejen, er word låst i den 2. dok.
Hopper jeg så over i det første dokument og til bage igen virker det fint.

Hvordan løser jeg problemet?
Avatar billede hjensen Nybegynder
30. august 2000 - 13:57 #1
Det kunne lyde som om dine file-handles bliver brugt igen, uden at de er frigivet.

Må jeg se koden ??
Avatar billede hjensen Nybegynder
30. august 2000 - 13:57 #2
Det kunne lyde som om dine file-handles bliver brugt igen, uden at de er frigivet.

Må jeg se koden ??
Avatar billede hjensen Nybegynder
30. august 2000 - 13:57 #3
Det kunne lyde som om dine file-handles bliver brugt igen, uden at de er frigivet.

Må jeg se koden ??
Avatar billede hjensen Nybegynder
30. august 2000 - 13:57 #4
Det kunne lyde som om dine file-handles bliver brugt igen, uden at de er frigivet.

Må jeg se koden ??
Avatar billede hjensen Nybegynder
30. august 2000 - 13:58 #5
Sorry, ved ikke lige helt hvad der gik galt....
Avatar billede hougaard Nybegynder
30. august 2000 - 15:07 #6
Koden er flot spredt, ud i en masse andet kode, så det er lidt svært.

Er der noget specielt du gerne vil se?
Avatar billede hjensen Nybegynder
30. august 2000 - 15:09 #7
Kan du evt. sende koden til mig ??
Avatar billede hougaard Nybegynder
30. august 2000 - 15:48 #8
Nej desværre, hvis der er små bidder du gerne vil se, kan jeg sende dem.
Avatar billede hjensen Nybegynder
30. august 2000 - 15:53 #9
Jeg vil gerne se de steder hvor de åbner og lukker filer (både første og anden gang)
Avatar billede hougaard Nybegynder
30. august 2000 - 16:24 #10
Det første dokument åbner jeg bare ved at start word
Anden dokuments åbning følger...
Avatar billede hougaard Nybegynder
30. august 2000 - 16:45 #11
Set WordDokument = WordApp.Documents.Open(FileName:=Dokument, ReadOnly:=False, addtorecentfiles:=False)

WordApp.ActiveDocument.Unprotect Password:=strPSW
\'På denne er der errhand, som gør at programmet fortsætter selv om der ikke er protection på dokumentet.

WordApp.Application.ScreenUpdating True

WordApp.Visible = True

WordApp.Application.WindowState = wdWindowStateMaximize
          WordApp.ActiveDocument.ActiveWindow.WindowState = wdWindowStateMaximize

WordApp.ActiveDocument.Saved = Not Ja

If WordApp.Tasks.Exists(ProgramNavn) Then
  WordApp.Tasks(ProgramNavn).Activate
end if

Avatar billede hjensen Nybegynder
31. august 2000 - 08:46 #12
Sorry, jeg kan nok ikke hjælpe dig uden at se koden.
Avatar billede powell Nybegynder
16. september 2000 - 10:02 #13
Dim wb as Object

Set wb = CreateObject(\"Word.Basic\")
wb.FileNewDefault

\'For at kopiere text dertil
wb.Insert txtTest.Text

\'Kør stavekontrol
wb.Toolspelling

\'Indramme alt texten i doc.
wb.EditSelectAll

\'Overfør til variabelt doc.
wb.SetDocumentVar \"MyVar\", wb.Selection

\'Overfør variabel doc. til textbox
txtTest.Text = wb.GetDocumentVar(\"MyVar\")

\'Luk Word
wb.FileClose 2

\'Fjern Wordbasic fra hukommelse
Set wb = Nothing
Avatar billede hougaard Nybegynder
19. september 2000 - 09:39 #14
Jeg har selv fundet en løsning.
Avatar billede powell Nybegynder
19. september 2000 - 09:45 #15
Gider du ikke at skrive hvilken løsning du fandt... Så vi andre også kan blive klogere ?!?
Avatar billede hougaard Nybegynder
19. september 2000 - 10:33 #16
Jo det vil jeg da godt.

Men Word er altså en underlig en.

Jeg fjernede en linie i koden som satte Visible = true på wordobjectet. Og Word blev så først senere i kode sat synlig.

Jeg har ingen ide om hvorfor det virker, men det gør det altså bare.
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
Kurser inden for grundlæggende programmering

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