Opened by meier19 at 2016-04-19 17:13
User since
2009-02-03
73 Artikel
BenutzerIn
![[Homepage]](/battie/theme/default/homepage.gif)
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2009-02-03
73 Artikel
BenutzerIn
Vielen Dank, GwenDragon, für die Einwilligung. Zum Vorgang braucht es drei Dateien.
1.
index.php
2.
saveNewText.php
3.
myText.txt
Zuerst sind diese drei Dateien auf den Server hochzuladen. Dann kann das Programm im Browser mit "http://servername.ch/index.php" gestartet werden. Sodann kann nach der damit erscheinenden Zeile "Die nachfolgende Zeile kann Text aufnehmen" ein Text eingegeben und verändert werden. Wenn man schliesslich mit der Maus im Browser auf den Bereich ausserhalb dieser Zeile klickt, wird der Text in myText.txt gespeichert.
Ich muss sagen, dass es auch auf dem Server des Providers manchmal funktioniert und manchmal nicht. Möglicherweise hängt es damit zusammen, ob in der Datei "myText.txt" ein Text vorgegeben wird.
Es wäre schön, wenn ich hier Hilfe für die Umsetzung in Perl erhielte. Dafür danke ich im Voraus herzlich.
Mit den besten Grüssen
meier19
Last edited: 2016-04-20 06:08:23 +0200 (CEST)
1.
index.php
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
<!DOCTYPE html>
<html>
<head>
<script>
function myFunction () {
var xr = new XMLHttpRequest();
var url = "saveNewText.php";
var text = document.getElementById("myDiv").innerHTML;
var vars = "newText="+text;
xr.open("POST", url, true);
xr.setRequestHeader("Content-type","application/x-www-form-urlencoded");
xr.send(vars);
}
</script>
</head>
<body>
<h1>Hello World</h1>
Die nachfolgende Zeile kann Text aufnehmen:
<div id="myDiv" contenteditable="true" onblur="myFunction()">
<?php include("myText.txt"); ?>
</div>
<body>
</html>
2.
saveNewText.php
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
<?php
$myFile = fopen("myText.txt", "w");
$text = $_POST["newText"];
fwrite($myFile, $text);
fclose ($myFile);
?>
3.
myText.txt
Code: (dl
)
Dies ist die Zeile, die verändert werden kann.
Zuerst sind diese drei Dateien auf den Server hochzuladen. Dann kann das Programm im Browser mit "http://servername.ch/index.php" gestartet werden. Sodann kann nach der damit erscheinenden Zeile "Die nachfolgende Zeile kann Text aufnehmen" ein Text eingegeben und verändert werden. Wenn man schliesslich mit der Maus im Browser auf den Bereich ausserhalb dieser Zeile klickt, wird der Text in myText.txt gespeichert.
Ich muss sagen, dass es auch auf dem Server des Providers manchmal funktioniert und manchmal nicht. Möglicherweise hängt es damit zusammen, ob in der Datei "myText.txt" ein Text vorgegeben wird.
Es wäre schön, wenn ich hier Hilfe für die Umsetzung in Perl erhielte. Dafür danke ich im Voraus herzlich.
Mit den besten Grüssen
meier19
Last edited: 2016-04-20 06:08:23 +0200 (CEST)
Der Mensch schöpft seine Gesetze nicht aus der Natur, sondern schreibt sie dieser vor (Immanuel Kant).