automatisk gemme i xml-fil

Idé : indarbejd eksport-rutinen i forbindelse med afslutning af database

Jeg har også forsøgt at placere en knap med tilknyttet makro, der gemmer og opdaterer, på den formular hvor ændringerne skal foretages, men det virker ikke. jeg er desværre ikke VBA-haj, men man må da kunne tilføje noget kode der kan sørge for at xml-filen bliver opdateret. Jeg ved bare ikke hvordan den laves.

Smid lige den kode som virker ... så skal jeg tilrette den

Mener du koden for formularen? Der er ikke rigtigt noget kode at arbejde med for dig, da der jo bare er en "sub" for hvert db-felt og en knap. Men her kommer lige noget af koden( der er i virkeligheden flere subs)Knappen er tilknyttet en makro ved navn makro1, men det kan du bare ændre.

----------------------
Option Compare Database

Private Sub Detaljesektion_Click()

End Sub

Private Sub doere_BeforeUpdate(Cancel As Integer)

End Sub

Private Sub komfortudstyr_BeforeUpdate(Cancel As Integer)

End Sub

Private Sub telefon_BeforeUpdate(Cancel As Integer)

End Sub
Private Sub Kommandoknap59_Click()
On Error GoTo Err_Kommandoknap59_Click

    Dim stDocName As String

    stDocName = "Makro1"
    DoCmd.RunMacro stDocName

Exit_Kommandoknap59_Click:
    Exit Sub

Err_Kommandoknap59_Click:
    MsgBox Err.Description
    Resume Exit_Kommandoknap59_Click
   
End Sub
-------------------------------

Du opretter en afslutKnap på formularen. Det som du skal have med i denne er :

Private Sub AfslutKnap_Click()
On Error GoTo Err_AfslutKnap_Click

    Dim stDocName As String

    stDocName = "Makro1"
    DoCmd.RunMacro stDocName

    DoCmd.Quit


Exit_AfslutKnap_Click:
    Exit Sub

Err_AfslutKnap_Click:
    MsgBox Err.Description
    Resume Exit_AfslutKnap_Click
   
End Sub

Det ser ok ud, men der er jo ingen funktionalitet der gemmer db'en i xml-filen. Jeg HAR forsøgt at lade makroen gøre det, men det vil ikke funke, så jeg vi helst undgå den makro hvis det er muligt. Jeg inkluderede den kun i koden, for at du skulle have lidt at arbejde med.

Eksportér lige makroen som vb-kode, og lad mig se den ...

Så vidt jeg lige kan se, er det ikke muligt at eksportere makroen som vb-kode, jeg kan i hvert fald ikke finde den funktion. Men det er jo også bare en makro jeg lavede i Makrogeneratoren ved at forsøge at gætte mig frem til hvad den skulle indeholde. Der er også problemer med at få lov at vælge XML som outputformat, og det på trods af at det skulle være muligt i følge hjælpeteksten(F1). Men det må da være muligt at inkludere den funktion direkte i koden uden at skulle bruge en makro.

Du finder "Eksport"-funktionen for Makro-til-VB under
Funktioner-->Makro-->Konverter makroer til Visual Basic

--> hekla: Tak for det

Når jeg foretager konverteringen, kommer VB-editoren frem og viser den samme kode som jeg allerede har indsat længere oppe i denne tråd. Så jeg får altså ikke vist selve koden for makroen.

Jeg har fundet følgende kode hos Microsoft:
-----------
Application.ExportXML _
    ObjectType:=acExportReport, _
    DataSource:="Fall2000", _
    DataTarget:="C:\XML\Fall2000.xml", _
    PresentationTarget:="C:\XML\Fall2000Report.xsl", _
    ImageTarget:="C:\XML\Images", _
    OtherFlags:=4
----------------
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnacc2k2/html/odc_accessxml.asp

Jeg tror den kode kan gøre det jeg har brug for, så hvis der er nogen der kan tilføje den kode til en knap, vil jeg være meget taknemmelig.

lukker