Tarvitsisin sellaisen ohjelmanpätkän, jolla voisi käsitellä tekstitiedostoa seuraavsti:
tämä on tekstitiedostoa (sulkujen välissä oleva merkkijono pitiäisi suodatuksessa jättää tiedostoon) ja sulkujen ulkopuolella oleva merkkijono, joka sisältää myös kappaleenvaihtoja pitäisi poistaa.
Millähän kannattais tehdä ja miten? Mulla ei taida olla koneessa kun joku visual basic.
tämä on tekstitiedostoa (sulkujen välissä oleva merkkijono pitiäisi suodatuksessa jättää tiedostoon) ja sulkujen ulkopuolella oleva merkkijono, joka sisältää myös kappaleenvaihtoja pitäisi poistaa.
Millähän kannattais tehdä ja miten? Mulla ei taida olla koneessa kun joku visual basic.
Vastaukset 3
Vanhimmat
Private Sub Command1_Click()
Tiedosto1$ = String(FileLen("C:Temp1.txt"), Chr(0))
Open "C:Temp1.txt" For Binary As #1
Get #1, , Tiedosto1$
Close #1
For n% = 1 To Len(Tiedosto1$)
Merkki$ = Mid(Tiedosto1$, n%, 1)
If Merkki$ = "(" Then Tiedostoon2% = 1
If Tiedostoon2% Then Tiedosto2$ = Tiedosto2$ & Merkki$
If Merkki$ = ")" Then Tiedostoon2% = 0
Next n%
Open "C:Temp2.txt" For Binary As #2
Put #2, , Tiedosto2$
Close #2
End Sub
Kiitos hienosta ohjelmakoodistasi. Mulla on vielä kuitenkin jokin hämäräperäinen ongelma. Se Visual Basic, joka mulla on, on vaan jokin Wordin makroeditori. Yritin ladata www.tucows.com :ista Visual Basicin 5 ja 6 versioita siinä kuitenkaan onnistumatta. Koneelle tulee zip-paketti ja sen purkaminen onnistuu ja sitten ruudulle tulee asennus pikakuvake. Siinä on jotain ongelmia. Se toteaa, että koneellani on uudempia versioita jostain tiedostoista (noin 5 kpl). Sitten se päästää siihen asti, että voit nyt sammuttaa koneen. Käynnistämisen jälkeen ei kuitenkaan mitään ole tapahtunut. Mitään ohjelmaa ei koneelta löydy mistään. Toistin homman ainakin viisi kertaa. Aikaisemmin ohjelmnien latauksissa ja asennuksissa ei ole ollut samanlaisia ongelmia. Mahtaisiko joku vanhempi versio riittää Visual Basicista vai pitäisikö onnistua lataamaan 5 tai 6 versiot?
Kokeilin ja tuo koodi toimii suoraan Word97:ssa, et siis tarvi mitään Visual Basic ympäristöa.
Riippuu varmaan vähän sun Word versiosta miten saat ton koodin sinne.