easMedlem sedan sep. 2001269 inlägg Finns det nåt sätt att göra det som händer när man högerklickar på en länk och trycker på "Spara mål som.."!
Kunde vara bar att ha!
T.ex. om ett word-document skall laddas ner öppnas iställer för en nerladdningsruta dokumentet i fönstret i IE!!
nåt i stil med detta kanske:
save-target-as:location
:q :q :q :q :q :q :q
------------------
Schöndells webbsajt
[Redigerat av eas den 09 nov 2001]
beikerMedlem sedan juli 200194 inlägg hmm... njaa... hmm... du kan ju kolla om det här är nåt du kan använda... öppnar först en popup med filen och när filen är laddad så kommer spara rutan fram... gjorde den som ett test och det går ju att vidareutveckla så att det blir smuttare.
<script language="javascript">
<!--
// © Beiker for x, Italy
function download(file){
var popWin = open (file, 'popWin', 'width=100,height=100,toolbar=0,location=0,status=0,menubar=0,scrollbars=0,resizable=0');
popWin.focus();
popWin.onload = save()
function save(){
popWin.document.execCommand("SaveAs")
}
}
//-->
</script>
<a href="javascript:download('textfile.txt');">download</a>
easMedlem sedan sep. 2001269 inlägg OK, det funkar för html- och textdocument!
Om man försöker spara en fil av annat format på det sättet sparas en tom fil med samma namn :)
Är det nån som vet hur man kan fixxa så att alla filer kan sparas???
PS. Jag får ett felmeddelande efter spararuten:
Rad: 54
Fel: Har inte implementerats
DS.
------------------
Schöndells webbsajt
JojoxxMedlem sedan juni 20004 308 inlägg Se denna tidigare tråd från html-forumet.
------------------
/ J
easMedlem sedan sep. 2001269 inlägg Den koden laddar bara ner själva aspsidan den ligger på, oavsett vad man skriver i strFilePath = Server.MapPath() :OO
går det att ändra???
<%
Response.ContentType = "application/x-whatever"
Const adTypeBinary = 1
Dim strFilePath
strFilePath = Server.MapPath("foo.pdf") 'This is the path to the file on disk.
Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Open
objStream.Type = adTypeBinary
objStream.LoadFromFile strFilePath
Response.BinaryWrite objStream.Read
objStream.Close
Set objStream = Nothing
%>
Please help me...
------------------
Schöndells webbsajt