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...
Denne side indeholder artikler med forskellige perspektiver på Identity & Access Management i private og offentlige organisationer. Artiklerne behandler aktuelle IAM-emner og leveres af producenter, rådgivere og implementeringspartnere.
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.