Jag har en liten applikation som genererar kod för tabeller i HTML. Jag har ett litet problem med att spara filen efteråt eftersom det kommer med citationstecken i HTML-koden vilket inte är speciellt bra. Ta bort alla citattecken med Replacefunktionen, kanske Nej, det hjälpte tyvärr inte. :(Spara i en fil utan citationstecken?
Hur gör jag för att slippa det?
Koden ser ut som följande:
<code>
Private Sub mnuItemSpara_Click()
If blnKodLageHtml = True Then
With cdcTblGen
.Filter = "htm (*.htm)|*.htm"
.ShowSave
End With
ElseIf blnKodLageHtml = False Then
With cdcTblGen
.Filter = "txt (*.txt)|*.txt"
.ShowSave
End With
End If
Open cdcTblGen.FileName For Output As #1
strSparaText = frmTblGen.txtKod.Text
Write #1, strSparaText
Close #1
End Sub
</code>
Där mnuItemSpara är ett menyval, blnKodLageHtml är e variabel som bestämmer typ av kod (html/text), cdcTblGen är en Common Dialog Control och txtKod är en textruta som innehåller koden.
/ Niclas AnkarSv: Spara i en fil utan citationstecken?
txtKod.text = replace(txtKod.text,chr(34),"")
strSparaText = txtKod.TextSv: Spara i en fil utan citationstecken?
Kan det vara så att det finns olika sätt att skriva mot disk kanske?
/ Niclas Ankar