Applets
Hola como estas fijate que necesito ayuda con un applet en el cual con un click en un boton cree un archivo de texto... Tengo algo de problemas por que puedo crear un archivo a partir de un codigo fuente separado pero al incluirlo en el applet me saca errores... Bueno espero tu hayas hecho algo asi... Gracias y adios
1 Respuesta
Respuesta de tabitah
1
Te envío este script, a ver si te sirve...
-------------------------
<script>
function make_file() {
make = new ActiveXObject("Scripting.FileSystemObject")
make.CreateTextFile("testfile.txt")
}
function read_from_file() {
axo = new ActiveXObject("Scripting.FileSystemObject")
openfile = axo.OpenTextFile("testfile.txt", 1)
var value = openfile.ReadLine()
openfile.Close()
alert(value)
}
function write_to_file(some_text) {
axo = new ActiveXObject("Scripting.FileSystemObject")
openfile = axo.OpenTextFile("testfile.txt", 2)
openfile.Write(some_text)
openfile.Close()
}
make_file()
write_to_file('hello world')
read_from_file()
</script>
using a button (type text into text area)
<script>
function make_file(fName) {
make = new ActiveXObject("Scripting.FileSystemObject")
make.CreateTextFile("testfile.txt")
}
function read_from_file(fName) {
axo = new ActiveXObject("Scripting.FileSystemObject")
openfile = axo.OpenTextFile(fName, 1)
var value = openfile.ReadLine()
openfile.Close()
alert(value)
}
function write_to_file(some_text,fName) {
axo = new ActiveXObject("Scripting.FileSystemObject")
openfile = axo.OpenTextFile(fName, 2)
openfile.Write(some_text)
openfile.Close()
}
</script>
<form>
<p><input type="button" value="write"
onclick="make_file('testfile.txt');write_to_file(t1.value,'testfile.txt');"> </p>
<p><input type="button" value="read" onclick="read_from_file('testfile.txt')"> </p>
<p><textarea cols="40" rows="20" name="t1"></textarea></testarea></p>
</form>
-------------------------
<script>
function make_file() {
make = new ActiveXObject("Scripting.FileSystemObject")
make.CreateTextFile("testfile.txt")
}
function read_from_file() {
axo = new ActiveXObject("Scripting.FileSystemObject")
openfile = axo.OpenTextFile("testfile.txt", 1)
var value = openfile.ReadLine()
openfile.Close()
alert(value)
}
function write_to_file(some_text) {
axo = new ActiveXObject("Scripting.FileSystemObject")
openfile = axo.OpenTextFile("testfile.txt", 2)
openfile.Write(some_text)
openfile.Close()
}
make_file()
write_to_file('hello world')
read_from_file()
</script>
using a button (type text into text area)
<script>
function make_file(fName) {
make = new ActiveXObject("Scripting.FileSystemObject")
make.CreateTextFile("testfile.txt")
}
function read_from_file(fName) {
axo = new ActiveXObject("Scripting.FileSystemObject")
openfile = axo.OpenTextFile(fName, 1)
var value = openfile.ReadLine()
openfile.Close()
alert(value)
}
function write_to_file(some_text,fName) {
axo = new ActiveXObject("Scripting.FileSystemObject")
openfile = axo.OpenTextFile(fName, 2)
openfile.Write(some_text)
openfile.Close()
}
</script>
<form>
<p><input type="button" value="write"
onclick="make_file('testfile.txt');write_to_file(t1.value,'testfile.txt');"> </p>
<p><input type="button" value="read" onclick="read_from_file('testfile.txt')"> </p>
<p><textarea cols="40" rows="20" name="t1"></textarea></testarea></p>
</form>
Gracias muy amable... estuvo muy buena tu respuesta y me va a servir mucho...
Tal vez pueda ayudarte a eliminar tus errores. Envíamelos a: [email protected]
