Vraag & Antwoord

Programmeren

For Output As #1 Print...

Anoniem
Wout
4 antwoorden
  • [code:1:efa1112760]Private Sub Command7_Click()
    Dim T As String
    Open Text12.Text For Output As #1
    Print #1, "Cookie=" & T & Text7.Text & T & ""
    Print #1, "PassportTicket=" & T & Text8.Text & T & ""
    Print #1, "PassportProfile=" & T & Text9.Text & T & ""
    Close #1
    End Sub[/code:1:efa1112760]

    Ik wil deze info in een bestandje zetten, dat gaat prima, maar de informatie die er al in staat wordt verwijdert uiteraard, ik wil eigenlijk alleen maar die drie dingen veranderen, hoe schrijf of "Print" ik het weg zonder dat de andere info daarin verwijdert wordt? maar alleen hetgene wat ik wil vervangen?
    thx
  • Erachteraanplakken is makkelijk: openen For Append en dan met Print #1, blablabla schrijven.

    Entries vervangen is moeilijker, je zult het bestand eerst moeten inlezen, de entry opzoeken en vervangen en dan het resultaat weer wegschrijven.
  • Hardstikke bedankt, door jou antwoord ben ik gaan zoeken op Google naar "replace entries" (onder Visual Basic) en heb een mooie manier gevonden:
    http://vbtips.future.easyspace.com/code6.txt

    thx :D
  • [quote:e6858f4f84="webagent"][code:1:e6858f4f84]Private Sub Command7_Click()
    Dim T As String
    Open Text12.Text For Output As #1
    Print #1, "Cookie=" & T & Text7.Text & T & ""
    Print #1, "PassportTicket=" & T & Text8.Text & T & ""
    Print #1, "PassportProfile=" & T & Text9.Text & T & ""
    Close #1
    End Sub[/code:1:e6858f4f84]

    Ik wil deze info in een bestandje zetten, dat gaat prima, maar de informatie die er al in staat wordt verwijdert uiteraard, ik wil eigenlijk alleen maar die drie dingen veranderen, hoe schrijf of "Print" ik het weg zonder dat de andere info daarin verwijdert wordt? maar alleen hetgene wat ik wil vervangen?
    [/quote:e6858f4f84]
    Wel eens van INI-bestanden gehoord?

    [b:e6858f4f84]EDIT[/b:e6858f4f84]: met de bijbehorende API's natuurlijk…
    GetPrivateProfileInt
    GetPrivateProfileSection
    GetPrivateProfileSectionNames
    GetPrivateProfileString
    GetPrivateProfileStruct

    Google search

Beantwoord deze vraag

Dit is een gearchiveerde pagina. Antwoorden is niet meer mogelijk.