05. juni 2004 - 18:34Der er
4 kommentarer og 1 løsning
Læse noget specefikt fra txt fil
Jeg er i gang med et VBScript til Samurize, jeg skal læse noget specefikt fra en .txt fil.
Min txt fil er som følgende: Current Work Unit ----------------- Name: p736_Protein Download time: May 30 00:02:52 Due time: July 5 00:02:52 Progress: 75% [|||||||___]
Da jeg kun skal bruge det der står efter Name og Progress, skal der jo lidt mere advanceret script til. Håber i kan hjælpe med at lave det script...
Er linien med Name altid den første linie og er linien med Progress altid den fjerde linie? Skal du bruge alt efter Progress: altså i dit eksempel 75% [|||||||___]
1. Current Work Unit 2. ----------------- 3. Name: p736_Protein 3. Download time: May 30 00:02:52 4. Due time: July 5 00:02:52 5. Progress: 75% [|||||||___]
Her er et forslag. Dette VBscript forventer, at din tekstfil hedder data.txt og ligger i samme katalog, som scriptet. Det vil først vise en box, hvor der står p736_Protein, og derefter vises en box, hvor der står 75.
Option Explicit dim FilSystem, stream, i, tekst, p1, p2 Set FilSystem=CreateObject("Scripting.FileSystemObject") Set stream=filsystem.openTextFile("data.txt") for i=1 to 4 tekst=stream.readline() next p1=Instr(tekst,": ")+1 MsgBox Mid(tekst,p1) for i=5 to 7 tekst=stream.readline() next p1=Instr(tekst,": ")+1 p2=Instr(tekst,"%") MsgBox Mid(tekst,p1,p2-p1) stream.close set stream=nothing
Jeg har droppet projektet, men nmh du for lige point for ulejliheden :)
Synes godt om
Ny brugerNybegynder
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.