Avatar billede bumle90 Nybegynder
03. november 2001 - 19:54 Der er 13 kommentarer og
1 løsning

springe linier over

Hej. Jeg har et asp program, som skal kunne opdatere en bestemt linie i en txt fil.
Dvs. at jeg fx. skal springe de 3 første linier i filen over, og derefter overskrive den fjerde. Kan dette lade sig gøre, og hvis ja, hvordan?
Ved læsning af filen bruger jeg når jeg skal springe linier over .skipLine(); og det virker fint. Men den kan mand ikke bruge ved skrivning i en fil
Avatar billede egede Nybegynder
03. november 2001 - 19:57 #1
Så vidt jeg ved ja
Avatar billede bumle90 Nybegynder
03. november 2001 - 19:58 #2
jamen hvordan gør mand???
Avatar billede egede Nybegynder
03. november 2001 - 20:01 #3
For intLine = 1 to 4
  f.SkipLine
Next
Avatar billede egede Nybegynder
03. november 2001 - 20:01 #4
Uups, tror kun det er
For intLine = 1 to 3
  f.SkipLine
Next 
Avatar billede bumle90 Nybegynder
03. november 2001 - 20:11 #5
hvad er f?
Avatar billede egede Nybegynder
03. november 2001 - 20:12 #6
Det er lidt svært at forklare, må jeg se hvordan du åbner tekstfilen?
Avatar billede bumle90 Nybegynder
03. november 2001 - 20:13 #7
Kan du evt. skrive det i javascript istedet? Jeg kan ikke den syntax der
Avatar billede bumle90 Nybegynder
03. november 2001 - 20:13 #8
function opdater_fil(linier)
{
out=filsystem.OpenTextFile(\"E:\\\\system\\\\skoleopg\\\\mit_asp\\\\folketingsvalg\\\\tal.txt\",8,true);
        for (i=0;i<=linier;i++)
        {
        out.SkipLine();
        }
out.WriteLine(count);
out.close();
}
Avatar billede egede Nybegynder
03. november 2001 - 20:15 #9
så er f = out i dit tilfælde
Avatar billede bumle90 Nybegynder
03. november 2001 - 20:16 #10
Jamen det jeg har skrevet der...det virker ikke.
Avatar billede egede Nybegynder
03. november 2001 - 20:17 #11
Kommer der en fejlmeddelse?
Avatar billede bumle90 Nybegynder
03. november 2001 - 20:20 #12
yep den er som følger

Fejltype:
Der opstod en Microsoft JScript-kørselsfejl (0x800A0036)
Forkert filtilstand
/folketingsvalg/afstemning.asp, line 35

Linie 35 er der hvor der står out.Skipline

Avatar billede bumle90 Nybegynder
03. november 2001 - 20:20 #13
oppe i den kode jeg skrev før altså
Avatar billede cht Nybegynder
03. november 2001 - 20:26 #14
Du kan bruge følgende kode, som læser de tre første linier af filen og derefter opdaterer den teksten med den nye tekst, som du vælger:

<%

    Set fso = CreateObject(\"Scripting.FileSystemObject\")
    Set MyFile = fso.OpenTextFile(Server.Mappath(\"file.txt\"),1,0)
   
    Do While MyFile.AtEndOfStream <> True and linie < 3
          linie = linie+1
          MyString = MyString & MyFile.ReadLine & VbCrLf
    Loop


    NyTekst = \"Den tekst der skal opdateres!\"

    Set a = fso.OpenTextFile(server.mappath(\"file.txt\"), 2, False,False)
    a.write(MyString & NyTekst)
    a.close

    Set a = Nothing
    Set fso = Nothing

%>


(husk lige at ændre filen file.txt til det din fil hedder)
Avatar billede Ny bruger Nybegynder

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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester