Dies ist ein Beispiel für das direkte Herunterladen von Daten aus der Serverdatenbank in die Clientdatei. Der Dateiname und die Erweiterung können nach Bedarf geschrieben werden. new/temp.htm erfordert tatsächlich eine Wirkung. Andernfalls können Stram-Daten nicht geschrieben werden.
Es kursieren viele Dinge in diesem Bereich im Internet, aber die meisten davon werden kopiert. Sehr einfache Dinge werden so kompliziert gemacht. Es gibt nur sehr wenige Dinge, die tatsächlich in die Praxis umgesetzt wurden. Deshalb habe ich selbst eines geschrieben. Obwohl es einfach ist und einige Probleme aufweist, kann es nach dem Kopieren verwendet werden. Freunde, die Fragen haben, können mich kontaktieren, damit wir gemeinsam lernen können.
filemystream=server.mappath("new") & "temp.htm"
Setzen Sie MyStream=Server.CreateObject("Adodb.Stream")
MyStream.Type = 1
MyStream.Mode=3
MyStream.Open
MyStream.LoadFromFile(filemystream)
Response.ContentType="application/octet-stream"
Response.AddHeader „Content-Disposition:“, „attachment; filename=" & „bk.txt“
Range=Mid(Request.ServerVariables("HTTP_RANGE"),7)
Response.write "Name"
Response.write „Konto“
Response.write „Adresse“
Response.write „Beschreibung“
cr=chr(13)&chr(10)
Response.write(cr)
während nicht rs.eof
Response.write rs("name")
Response.write rs("accno")
Response.write rs("Adresse")
Response.write rs("note")
Antwort.write(cr)
RS.MoveNext
wend
rs.close
setze rs=nichts
Verbind.Schließen
Setzen Sie Conn=Nothing
Mystream.close
setze Mystream=nichts