Avatar billede caroc Praktikant
05. februar 2003 - 16:36 Der er 9 kommentarer og
1 løsning

tekst i textfield

Jeg bruger en txt-fil til at opdatere min tekst på mine sider, men når jeg skal opdatere er textfield'et tomt og jeg skal skrive det hele..
Hvis der nu bare skulle ændres et par ord ville det jo være smart hvis den eksisterende tekst stod i textfield'et..
jeg bruger denne kode:

<%
Dim fso, f, filespec
Set fso = CreateObject("Scripting.FileSystemObject")
filespec = Server.Mappath("../../pop/Produkter/balsamico.txt")
Set f = fso.OpenTextFile(filespec,2)

' Skriv tekst i en linie
f.Write Request.Form("tekstblok")

f.Close
%>

hvad skal jeg tilføje??

Niclas
Avatar billede no_doubt Nybegynder
05. februar 2003 - 16:42 #1
<% Dim fso, f, filespec
Set fso = CreateObject("Scripting.FileSystemObject")
filespec = Server.Mappath("/tutorials/asp/ministerier.txt")
Set f = fso.OpenTextFile(filespec,1)
%>
<input type="text" name="tekstblok" size="20" value="<%Response.write f.ReadLine%>"></p>
<%f.Close %>
Avatar billede no_doubt Nybegynder
05. februar 2003 - 16:42 #2
<% Dim fso, f, filespec
Set fso = CreateObject("Scripting.FileSystemObject")
filespec = Server.Mappath("../../pop/Produkter/balsamico.txt")
Set f = fso.OpenTextFile(filespec,1)
%>
<input type="text" name="tekstblok" size="20" value="<%Response.write f.ReadLine%>"></p>
<%f.Close %>
Avatar billede caroc Praktikant
05. februar 2003 - 16:46 #3
takker....
forresten når teksten er opdateret vil jeg gerne have at der står "teksten er nu opdateret" -- ved det er noget med Response.Write .....

men hvad helt præcist.
Avatar billede no_doubt Nybegynder
05. februar 2003 - 16:47 #4
<%
Dim fso, f, filespec
Set fso = CreateObject("Scripting.FileSystemObject")
filespec = Server.Mappath("../../pop/Produkter/balsamico.txt")
Set f = fso.OpenTextFile(filespec,2)

' Skriv tekst i en linie
f.Write Request.Form("tekstblok")
Response.write ("Teksten er nu opdateret")
f.Close
%>
Avatar billede caroc Praktikant
05. februar 2003 - 16:48 #5
tak...
Avatar billede caroc Praktikant
05. februar 2003 - 16:58 #6
nu er jeg helt forvirret --- hvis jeg gerne vil have begge funktioenr med - hva så?
Avatar billede no_doubt Nybegynder
05. februar 2003 - 17:03 #7
Den du skriver det ind i txt'en med.
<%
Dim fso, f, filespec
Set fso = CreateObject("Scripting.FileSystemObject")
filespec = Server.Mappath("../../pop/Produkter/balsamico.txt")
Set f = fso.OpenTextFile(filespec,2)

' Skriv tekst i en linie
f.Write Request.Form("tekstblok")
Response.write ("Teksten er nu opdateret")
f.Close
%>
Den der læser
<% Dim fso, f, filespec
Set fso = CreateObject("Scripting.FileSystemObject")
filespec = Server.Mappath("../../pop/Produkter/balsamico.txt")
Set f = fso.OpenTextFile(filespec,1)
%>
<input type="text" name="tekstblok" size="20" value="<%Response.write f.ReadLine%>"></p>
<%f.Close %>
Avatar billede caroc Praktikant
05. februar 2003 - 17:11 #8
kan jeg altså ikke få til at virke...
Avatar billede caroc Praktikant
11. februar 2003 - 18:28 #9
nogen der kan hjælpe?
Avatar billede caroc Praktikant
11. februar 2003 - 18:47 #10
kan man godt have 2 tekstforbindelser i et dokument??
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