Avatar billede chrisrj Forsker
23. november 2006 - 09:19 Der er 2 kommentarer og
1 løsning

Gem indhold af listbox i fil uden gåseøjne

Jeg har et underligt problem...

Når jeg vil gemme indholdet af en listbox, vil det første og sidste tegn i filen ALTID være et gåseøje(") - også selv om listebox'en er tom!?

Hvordan fjerne jeg det??

replace(HeleTeksten, """", "") virker ikke...

Min kode:
Private Sub cmdGemDebugLog_Click()
    Dim HeleTeksten As String, FilNavn As String
   
    HeleTeksten = DebugListe.Text
    HeleTeksten =  replace(HeleTeksten, """", "")
    FilNavn = "Data\outstanding_DebugLog_" & Now() & ".txt"
    FilNavn = Replace(FilNavn, ":", "")
   
    Open FilNavn For Output As #3
        Write #3, HeleTeksten
    Close #3
End Sub
Avatar billede helmet Nybegynder
23. november 2006 - 09:35 #1
Hvis du bruger write indsætter den gåseøjne omkring, brug print i stedet for.
Noget helt andet er brugen af listbox.text, den returnerer kun det valgte element og ikke alle linier i din listbox, her har du brug for et loop af en eller anden art.
Avatar billede chrisrj Forsker
23. november 2006 - 09:47 #2
Stort, det spiller 110 %. Takker  :)

Smid et svar.

Jeg er godt klar over det med box'en - det er bare rester af gammel testkode. ;)
Avatar billede helmet Nybegynder
23. november 2006 - 09:56 #3
Et svar
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