6、LytUpload程式範例

<%@Language=VBScript %>
<html>
<body>
<%
filepath=Server.MapPath("/upload_test")
Set obj = Server.CreateObject("LyfUpload.UploadFile")
txt = obj.request("text1")
Response.Write( "文本框1的輸入值是: " & txt)
Response.Write "<br>"
ss=obj.SaveFile("file1", filepath,true)
'ss=obj.SaveFile("file1", "c:\temp",true)
aa=obj.filetype("file1")
if ss<> "" then
Response.Write "選擇的文件已經上載到服務器!<br>"
Response.Write("文件名:" & ss)
Response.Write("<br>Content- Type:" & aa)
end if
obj.about
%>
</body>
</html>

 
 
捕夢網數位科技有限公司 版權所有 Copyright© 2003-2014 Pumo All Rights Reserved
24小時客服專線:02-8226-9123 / 傳真電話:02-8226-9122  客服信箱:service@pumo.com.tw