<html>
<head>
<hta:application id="DeineID" applicationname="DeinAppName" windowState="normal" >
<title></title>
<script type="text/javascript">
function Blabla()
{
document.getElementById("dasDiv").innerHTML = "mal zum Testen: neuer Text";
}
//--------------------------
//Eine Text Datei laden:
//--------------------------
function loadfile(FileName)
{
var fso;
var FileStr = "";
fso = new ActiveXObject("Scripting.Filesystemobject");
if(fso.FileExists(FileName))
{
f1 = fso.OpenTextFile(FileName, 1);
if(f1.AtEndOfStream)
msg("ERROR: Die Datei ist leer");
else
FileStr = f1.ReadAll();
f1.close();
}
else
{
msg("Datei nicht gefunden!\r\n" + FileName);
}
return FileStr;
}
//--------------------------
//Eine Text Datei schreiben:
//--------------------------
function savefile(FileName,str)
{
var fso, folder, file, foldername;
//------
function getfoldername(s) { var i, m; for (i=0;i<s.length;i++) { if(s.substr(i,1)=="/"||s.substr(i,1)=="\\") m = i; } return s.substr(0,m); }
//------
// attributes:
// 0 Normal Normal file. No attributes are set.
// 1 ReadOnly Read-only file. Attribute is read/write.
// 2 Hidden Hidden file. Attribute is read/write.
// 4 System System file. Attribute is read/write.
// 8 Volume Disk drive volume label. Attribute is read-only.
// 16 Directory Folder or directory. Attribute is read-only.
// 32 Archive File has changed since last backup. Attribute is read/write.
// 1024 Alias Link or shortcut. Attribute is read-only.
// 2048 Compressed Compressed file. Attribute is read-only.
//------
fso = new ActiveXObject("Scripting.Filesystemobject");
foldername = getfoldername(FileName);
if(fso.FolderExists(foldername))
{
folder = fso.Getfolder(foldername);
if(folder.attributes!=16&&folder.attributes!=48)
{
msg("[savefile] kann auf Verzeichnis nicht zugreifen ---><b>" + foldername + "</b> (att:" + folder.attributes + ")");
return false;
}
if(fso.FileExists(FileName))
{
file = fso.GetFile(FileName);
if(file.attributes!=0&&file.attributes!=32)
{
msg("[savefile] kann auf Datei nicht zugreifen ---><b>" + FileName + "</b> (att:" + file.attributes + ")");
return false;
}
}
file = fso.OpenTextFile(FileName, 2, true);
file.write(str);
file.close();
}
else
{
msg("Verzeichnis nicht gefunden! ---><b>" + foldername + "</b>");
}
}
</script>
</head>
<body>
<div id="dasDiv" onclick="Blabla()">[ Hier klicken ]</div>
</body>
</html>
function msg(s) { alert(s); }
Fehlermeldung Formular: selbe Seite
sebi2006 17.01.2007 - 84 Hits - 2 Antworten
Formular ( pdf Datei ) ausfüllen ??
losvascos 27.01.2007 - 489 Hits - 5 Antworten
Dateneingabe in Formular funktioniert nicht
ingo1 25.10.2007 - 228 Hits - 18 Antworten
Wie öffne ich.ATT
leoschmitz 14.03.2008 - 170 Hits - 1 Antwort
Skript für Dateispeicherung in PHP
Computerfreaki 10.05.2008 - 55 Hits - 4 Antworten