|
| Problem ang. gem indhold af TekxtBox Fra : Tim Sørensen |
Dato : 14-07-01 00:04 |
|
Jeg har et problem når jeg gemmer indholdet af en TekxtBox.
Jeg kan se at det allersidste tegn i den gemte fil er et linjeskift.
Hvor kommer det sidste linjeskift fra?
Strengen jeg gemte indeholdet ingen linjeskift, men når jeg gemmer kommer
den.
Nogle der har en kode, der undgår dette?
--
Mvh.... Tim Sørensen
http://dondata.adsl.dk/
| |
Tim Sørensen (14-07-2001)
| Kommentar Fra : Tim Sørensen |
Dato : 14-07-01 02:05 |
|
Jeg fandt ud af dette som løsning.
Denne funktion gemme Text1.Text NØJAGTIGT som der er skrevet i den.
Ingen tilføjelse i form af linjeskift eller andet.
dim strFilNavn As String
strFilNavn = "C:\Test.txt"
Open strFilNavn For Binary As #1
Put #1, 1, Text1.Text
Close #1
| |
Bjarke Walling Peter~ (14-07-2001)
| Kommentar Fra : Bjarke Walling Peter~ |
Dato : 14-07-01 12:58 |
|
Det du nok havde gjort før, var følgende:
Open strFilNavn For Output As #1
Print#1, Text1.Text
Close#1
Problemet er her at Print automatisk tilføjer et linieskift, hvis man ikke
skriver et semikolon efter.
Man skal altså skrive:
Print#1, Text1.Text;
.... det vil virke.
- Bjarke Walling Petersen
Tim Sørensen skrev:
> Jeg fandt ud af dette som løsning.
> Denne funktion gemme Text1.Text NØJAGTIGT som der er skrevet i den.
> Ingen tilføjelse i form af linjeskift eller andet.
>
> dim strFilNavn As String
> strFilNavn = "C:\Test.txt"
>
> Open strFilNavn For Binary As #1
> Put #1, 1, Text1.Text
> Close #1
>
>
| |
|
|