[ASP] Txt eerst leegmaken - Softwareontwikkeling

donderdag 10 augustus 2006 15:24

Acties:

-CTU- SuiZide

Topicstarter

Ik heb momenteel een txt edit allen hij schrijft het nu onder de reeds bestaande tekst in het txt bestand. Hoe kan ik het bestand eerst leegmaken.

Dit is de code nu:

code:

<%
If Request.Form("Button")="Opslaan" Then

Set Bestandobject=Server.CreateObject("Scripting.FileSystemObject")
Set Tekstbestand=Bestandobject.OpenTextFile(Server.MapPath("test.txt"), 8, TRUE)
Tekstbestand.WriteLine(Request.Form("Titel"))
Tekstbestand.WriteLine(Request.Form("Omschrijving"))
Tekstbestand.WriteLine(Request.Form("Prijs"))
Tekstbestand.WriteLine(Request.Form("Link"))
Tekstbestand.Close
End If
%>


<HTML>
<HEAD>
<TITLE>Tekst</TITLE>
</HEAD>
<BODY>
<H1>Inhoud</H1>
<FORM METHOD="POST">
<TABLE>
<TR><TD>Titel:</TD><TD><INPUT TYPE="TEXT" NAME="Titel" SIZE=20></TD></TR>
<TR><TD>Omschrijving:</TD><TD><INPUT TYPE="TEXT" NAME="Omschrijving" SIZE=50></TD></TR>
<TR><TD>Prijs:</TD><TD><INPUT TYPE="TEXT" NAME="Prijs" SIZE=5></TD></TR>
<TR><TD>Bestellink:</TD><TD><INPUT TYPE="TEXT" NAME="Link" SIZE=20></TD></TR>
<TR><TD></TD><TD><INPUT TYPE="SUBMIT" NAME="Button" VALUE="Opslaan"></TD></TR>
</TABLE>
</FORM>

<H2>Dit is wat er nu staat!</H2>
<%
Set fs=Server.CreateObject("Scripting.FileSystemObject")
Set f=fs.OpenTextFile(Server.MapPath("test.txt"), 1)

do while f.AtEndOfStream = false
Response.Write(f.ReadLine)
Response.Write("<br>")
loop

f.Close
Set f=Nothing
Set fs=Nothing
%>
</BODY>
</HTML>

Life is like a box of chocolate, it makes you sick.

donderdag 10 augustus 2006 15:26

Acties:

BtM909

Watch out Guys...

Waarom gebruik je niet de andere mogelijkheden om een file aan te maken?

http://www.brainjar.com/asp/fileops/

Ace of Base vs Charli XCX - All That She Boom Claps (RMT) | Clean Bandit vs Galantis - I'd Rather Be You (RMT)
You've moved up on my notch-list. You have 1 notch
I have a black belt in Kung Flu.

donderdag 10 augustus 2006 15:28

Acties:

trixx

-CTU- SuiZide

Topicstarter

Het bestand hoeft dus niet aangemaakt te worden want die bestaat al. En als die niet bestaat wordt deze automatisch aangemaakt.

Life is like a box of chocolate, it makes you sick.

donderdag 10 augustus 2006 15:31

Acties:

NMe

Quia Ego Sic Dico.

Sorry hoor, maar dit staat perfect uitgelegd in de documentatie. Kijk eens wat de tweede parameter (bij jou dus een 8) van de OpenTextFile functie doet. Dit is verder prima te vinden.

Daarnaast zijn we hier geen persoonlijke debugservice.

Zie Programming Beleid - De "quickstart".

[ Voor 4% gewijzigd door NMe op 10-08-2006 15:32 ]

'E's fighting in there!' he stuttered, grabbing the captain's arm.
'All by himself?' said the captain.
'No, with everyone!' shouted Nobby, hopping from one foot to the other.

donderdag 10 augustus 2006 15:31

Acties:

whoami

Gewoon de file aanmaken, en ervoor zorgen dat er niet ge-appended wordt ?
Dit is zeker een optie die je kan opgeven bij het openen van een file.

En als dat niet lukt, kan je eerst de file verwijdern, en dan opnieuw aanmaken.

Met een beetje zoekwerk en logisch nadenken, was dit ook wel zelf op te lossen

https://fgheysels.github.io/