|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
对用户来说可预见费用、节约费用,可以做到花少钱办大事。由于省去了购买软件和硬件等的前期费用,用户可以租用较高级的应用软件。ASP的收费是根据软件的类型、客制化程度、用户数量、服务期限来定的,对客户来说这笔费用是可以预见的。方便于客户应用软件的升级。二进制|数据|数据库<%
driver_name1="DRIVER={MicrosoftAccessDriver(*.mdb)};DBQ=D:数据库TREE.MDB"根目次下数据库翻开语句
dimsearch,rs,j
search="select*fromFileswhereID="&request.querystring("ID")
setmy_conn=server.CreateObject("adodb.connection")
my_conn.opendriver_name1
setrs=Server.CreateObject("ADODB.Recordset")
rs.Opensearch,my_conn,1,3
ifrs.boforrs.eofthen
response.write"毛病:找不到该文件"
response.end
endif
设置文件的巨细及MIME范例
FunctionSetForDisplay(field,contentType)
contentType=LCase(trim(contentType))
nFieldSize=field.ActualSize
bytes=field.GetChunk(nFieldSize)
Session("Bytes")=bytes
Session("Type")=contentType
EndFunction
SetForDisplayRS("File"),rs("FileType")
Response.AddHeader"Content-Disposition","attachment;filename="&rs("FileName")
response.contentType=Session("Type")
response.BinaryWriteSession("Bytes")
Session("Type")=""
Session("Bytes")=""
setrs=nothing
my_conn.close
setmy_conn=nothing
%>
</p>ASP脚本是采用明文(plaintext)方式来编写的。 |
|