【急】asp如何文件上传
作者&投稿：斐唐 （若有异议请与网页底部的电邮联系）
在网上随便找一下就有了,要不,下一个文本编辑器,里面不是有图片上传的嘛,那个代码就是了...把图片格式判断改为你自己想要的就OK了...
这些文件是不能在IE中打开的，需要有OFFICE中的word,EXCEL,POWERPOINT才行，所以只能是这样！
IE只能看网页，文本格式的文件和几咱格式的图片
文件上传有个非常重要的地方，就是限制格式，严格规定只有什么格式才可以上传
否则可能会被黑客利用
这些光用DW自动生成是做不出来的 要自己写代码
<%
if Request.QueryString("submit")="swf_Pic" then
uploadpath=""
uploadsize="1024"
uploadtype="jpg/gif/png/bmp"
Set Uprequest=new UpLoadClass
Uprequest.SavePath=uploadpath
Uprequest.MaxSize=uploadsize*1024
Uprequest.FileType=uploadtype
AutoSave=true
Uprequest.open
if Uprequest.form("file_Err")<>0 then
select case Uprequest.form("file_Err")
case 1:str="<div style=""padding-top:5px;padding-bottom:5px;""> <font color=blue>上传不成功!文件超过"&uploadsize&"k [<a href='javascript:history.go(-1)'>重新上传</a>]</font></div>"
case 2:str="<div style=""padding-top:5px;padding-bottom:5px;""> <font color=blue>上传不成功!文件格式不对 [<a href='javascript:history.go(-1)']>重新上传</a>]</font></div>"
case 3:str="<div style=""padding-top:5px;padding-bottom:5px;""> <font color=blue>上传不成功!文件太大且格式不对 [<a href='javascript:history.go(-1)'>重新上传</a>]</font></div>"
end select
response.write str
else
response.write "<script language=""javascript"">parent.form.swf_Pic.value='"&Uprequest.SavePath&Uprequest.Form("file")&"';"
response.write "</script>"
response.write "<div style=""padding-top:5px;padding-bottom:5px;""> <font color=red>文件上传成功</font> [<a href='javascript:history.go(-1)'>重新上传</a>]</div>"
end if
Set Uprequest=nothing
end if
response.write "<form name=form action=?action=swf_Pic&submit=swf_Pic method=post enctype=multipart/form-data>"
response.write "<input type=file name=file class='tx' size='20'> "
response.write "<input type=submit name=submit value=上传 class=""tx1"">"
response.write "</form>"
'============================================================上传函数
Class UpLoadClass
Private p_MaxSize,p_FileType,p_SavePath,p_AutoSave,p_Error
Private objForm,binForm,binItem,strDate,lngTime
Public FormItem,FileItem
Public Property Get Version
Version="Rumor UpLoadClass Version 2.0"
End Property
Public Property Get Error
Error=p_Error
End Property
Public Property Get MaxSize
MaxSize=p_MaxSize
End Property
Public Property Let MaxSize(lngSize)
if isNumeric(lngSize) then
p_MaxSize=clng(lngSize)
end if
End Property
Public Property Get FileType
FileType=p_FileType
End Property
Public Property Let FileType(strType)
p_FileType=strType
End Property
Public Property Get SavePath
SavePath=p_SavePath
End Property
Public Property Let SavePath(strPath)
p_SavePath=replace(strPath,chr(0),"")
End Property
Public Property Get AutoSave
AutoSave=p_AutoSave
End Property
Public Property Let AutoSave(byVal Flag)
select case Flag
case 0:
case 1:
case 2:
case false:Flag=2
case else:Flag=0
end select
p_AutoSave=Flag
End Property
Private Sub Class_Initialize
p_Error = -1
p_MaxSize = 153600
p_FileType = "jpg/gif"
p_SavePath = ""
p_AutoSave = 0
strDate = replace(cstr(Date()),"-","")
lngTime = clng(timer()*1000)
Set binForm = Server.CreateObject("ADODB.Stream")
Set binItem = Server.CreateObject("ADODB.Stream")
Set objForm = Server.CreateObject("Scripting.Dictionary")
objForm.CompareMode = 1
End Sub
Private Sub Class_Terminate
objForm.RemoveAll
Set objForm = nothing
Set binItem = nothing
binForm.Close()
Set binForm = nothing
End Sub
Public Sub Open()
if p_Error=-1 then
p_Error=0
else
Exit Sub
end if
Dim lngRequestSize,binRequestData,strFormItem,strFileItem
Const strSplit="'"">"
lngRequestSize=Request.TotalBytes
if lngRequestSize<1 then
p_Error=4
Exit Sub
end if
binRequestData=Request.BinaryRead(lngRequestSize)
binForm.Type = 1
binForm.Open
binForm.Write binRequestData
Dim bCrLf,strSeparator,intSeparator
bCrLf=ChrB(13)&ChrB(10)
intSeparator=InstrB(1,binRequestData,bCrLf)-1
strSeparator=LeftB(binRequestData,intSeparator)
Dim p_start,p_end,strItem,strInam,intTemp,strTemp
Dim strFtyp,strFnam,strFext,lngFsiz
p_start=intSeparator+2
Do
p_end =InStrB(p_start,binRequestData,bCrLf&bCrLf)+3
binItem.Type=1
binItem.Open
binForm.Position=p_start
binForm.CopyTo binItem,p_end-p_start
binItem.Position=0
binItem.Type=2
binItem.Charset="gb2312"
strItem=binItem.ReadText
binItem.Close()
p_start=p_end
p_end =InStrB(p_start,binRequestData,strSeparator)-1
binItem.Type=1
binItem.Open
binForm.Position=p_start
lngFsiz=p_end-p_start-2
binForm.CopyTo binItem,lngFsiz
intTemp=Instr(39,strItem,"""")
strInam=Mid(strItem,39,intTemp-39)
if Instr(intTemp,strItem,"filename=""")<>0 then
if not objForm.Exists(strInam&"_From") then
strFileItem=strFileItem&strSplit&strInam
if binItem.Size<>0 then
intTemp=intTemp+13
strFtyp=Mid(strItem,Instr(intTemp,strItem,"Content-Type: ")+14)
strTemp=Mid(strItem,intTemp,Instr(intTemp,strItem,"""")-intTemp)
intTemp=InstrRev(strTemp,"\")
strFnam=Mid(strTemp,intTemp+1)
objForm.Add strInam&"_Type",strFtyp
objForm.Add strInam&"_Name",strFnam
objForm.Add strInam&"_Path",Left(strTemp,intTemp)
objForm.Add strInam&"_Size",lngFsiz
if Instr(intTemp,strTemp,".")<>0 then
strFext=Mid(strTemp,InstrRev(strTemp,".")+1)
else
strFext=""
end if
if left(strFtyp,6)="image/" then
binItem.Position=0
binItem.Type=1
strTemp=binItem.read(10)
if strcomp(strTemp,chrb(255) & chrb(216) & chrb(255) & chrb(224) & chrb(0) & chrb(16) & chrb(74) & chrb(70) & chrb(73) & chrb(70),0)=0 then
if Lcase(strFext)<>"jpg" then strFext="jpg"
binItem.Position=3
do while not binItem.EOS
do
intTemp = ascb(binItem.Read(1))
loop while intTemp = 255 and not binItem.EOS
if intTemp < 192 or intTemp > 195 then
binItem.read(Bin2Val(binItem.Read(2))-2)
else
Exit do
end if
do
intTemp = ascb(binItem.Read(1))
loop while intTemp < 255 and not binItem.EOS
loop
binItem.Read(3)
objForm.Add strInam&"_Height",Bin2Val(binItem.Read(2))
objForm.Add strInam&"_Width",Bin2Val(binItem.Read(2))
elseif strcomp(leftB(strTemp,8),chrb(137) & chrb(80) & chrb(78) & chrb(71) & chrb(13) & chrb(10) & chrb(26) & chrb(10),0)=0 then
if Lcase(strFext)<>"png" then strFext="png"
binItem.Position=18
objForm.Add strInam&"_Width",Bin2Val(binItem.Read(2))
binItem.Read(2)
objForm.Add strInam&"_Height",Bin2Val(binItem.Read(2))
elseif strcomp(leftB(strTemp,6),chrb(71) & chrb(73) & chrb(70) & chrb(56) & chrb(57) & chrb(97),0)=0 or strcomp(leftB(strTemp,6),chrb(71) & chrb(73) & chrb(70) & chrb(56) & chrb(55) & chrb(97),0)=0 then
if Lcase(strFext)<>"gif" then strFext="gif"
binItem.Position=6
objForm.Add strInam&"_Width",BinVal2(binItem.Read(2))
objForm.Add strInam&"_Height",BinVal2(binItem.Read(2))
elseif strcomp(leftB(strTemp,2),chrb(66) & chrb(77),0)=0 then
if Lcase(strFext)<>"bmp" then strFext="bmp"
binItem.Position=18
objForm.Add strInam&"_Width",BinVal2(binItem.Read(4))
objForm.Add strInam&"_Height",BinVal2(binItem.Read(4))
end if
end if
objForm.Add strInam&"_Ext",strFext
objForm.Add strInam&"_From",p_start
intTemp=GetFerr(lngFsiz,strFext)
if p_AutoSave<>2 then
objForm.Add strInam&"_Err",intTemp
if intTemp=0 then
if p_AutoSave=0 then
strFnam=GetTimeStr()
if strFext<>"" then strFnam=strFnam&"."&strFext
end if
binItem.SaveToFile Server.MapPath(p_SavePath&strFnam),2
objForm.Add strInam,strFnam
end if
end if
else
objForm.Add strInam&"_Err",-1
end if
end if
else
binItem.Position=0
binItem.Type=2
binItem.Charset="gb2312"
strTemp=binItem.ReadText
if objForm.Exists(strInam) then
objForm(strInam) = objForm(strInam)&","&strTemp
else
strFormItem=strFormItem&strSplit&strInam
objForm.Add strInam,strTemp
end if
end if
binItem.Close()
p_start = p_end+intSeparator+2
loop Until p_start+3>lngRequestSize
FormItem=split(strFormItem,strSplit)
FileItem=split(strFileItem,strSplit)
End Sub
Private Function GetTimeStr()
lngTime=lngTime+1
GetTimeStr=strDate&lngTime
End Function
Private Function GetFerr(lngFsiz,strFext)
dim intFerr
intFerr=0
if lngFsiz>p_MaxSize and p_MaxSize>0 then
if p_Error=0 or p_Error=2 then p_Error=p_Error+1
intFerr=intFerr+1
end if
if Instr(1,LCase("/"&p_FileType&"/"),LCase("/"&strFext&"/"))=0 and p_FileType<>"" then
if p_Error<2 then p_Error=p_Error+2
intFerr=intFerr+2
end if
GetFerr=intFerr
End Function
Public Function Save(Item,strFnam)
Save=false
if objForm.Exists(Item&"_From") then
dim intFerr,strFext
strFext=objForm(Item&"_Ext")
intFerr=GetFerr(objForm(Item&"_Size"),strFext)
if objForm.Exists(Item&"_Err") then
if intFerr=0 then
objForm(Item&"_Err")=0
end if
else
objForm.Add Item&"_Err",intFerr
end if
if intFerr<>0 then Exit Function
if VarType(strFnam)=2 then
select case strFnam
case 0:strFnam=GetTimeStr()
if strFext<>"" then strFnam=strFnam&"."&strFext
case 1:strFnam=objForm(Item&"_Name")
end select
end if
binItem.Type = 1
binItem.Open
binForm.Position = objForm(Item&"_From")
binForm.CopyTo binItem,objForm(Item&"_Size")
binItem.SaveToFile Server.MapPath(p_SavePath&strFnam),2
binItem.Close()
if objForm.Exists(Item) then
objForm(Item)=strFnam
else
objForm.Add Item,strFnam
end if
Save=true
end if
End Function
Public Function GetData(Item)
GetData=""
if objForm.Exists(Item&"_From") then
if GetFerr(objForm(Item&"_Size"),objForm(Item&"_Ext"))<>0 then Exit Function
binForm.Position = objForm(Item&"_From")
GetData=binFormStream.Read(objForm(Item&"_Size"))
end if
End Function
Public Function Form(Item)
if objForm.Exists(Item) then
Form=objForm(Item)
else
Form=""
end if
End Function
Private Function BinVal2(bin)
dim lngValue,i
lngValue = 0
for i = lenb(bin) to 1 step -1
lngValue = lngValue *256 + ascb(midb(bin,i,1))
next
BinVal2=lngValue
End Function
Private Function Bin2Val(bin)
dim lngValue,i
lngValue = 0
for i = 1 to lenb(bin)
lngValue = lngValue *256 + ascb(midb(bin,i,1))
next
Bin2Val=lngValue
End Function
End Class
%>
在ASP中可能用组件和无组件(纯代码) 实现上传功能..
<form method="post" action="upload.asp" enctype="multipart/form-data" name="form2">
<input type="file" name="st_upfile" size="30"><input type="submit" name="Submit" value="上传">
</form>
'----------upload.asp------------------
<!--#include FILE="upload_inc.asp"-->
<%Server.ScriptTimeOut=5000%>
<html>
<head>
<style type="text/css">
<!--
body {
background-color: #E7E7E7;
font-size:12px
}
-->
</style>
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<%
set upload=new upload_5xsoft
set file=upload.file("st_upfile")
if file.fileSize<10 or file.fileSize>1024*100 then
response.write "<script language=""javascript"">parent.frnews.submit()</script><font size=2>错误:上传的图片大小超过了限制! <a href='javascript:history.go(-1)'><b>退回上一步</b></a></font>"
response.end
end if
upfilename = split(file.FileName,".")
upfileext = upfilename(ubound(upfilename))
if lcase(upfileext)<>"jpg" and lcase(upfileext)<>"gif" and lcase(upfileext)<>"bmp" and lcase(upfileext)<>"png" then
response.write "<font size=2>错误:上传的文件格式不对! <a href='javascript:history.go(-1)'><b>退回上一步</b></a></font>"
response.end
end if
ufp=year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)&"."&upfilename(ubound(upfilename))
file.saveas Server.mappath("upfiles/"&ufp)
ufp1="admin/upfiles/"& ufp
response.write "上传成功! "& ufp1
set file=nothing
set upload=nothing
%>
<SCRIPT>
parent.document.getElementById("logo").value="<%=ufp1%>";
</SCRIPT>
</body>
</html>
'----------upload_inc.asp-----------------------
<SCRIPT RUNAT=SERVER LANGUAGE=VBSCRIPT>
dim upfile_5xSoft_Stream
Class upload_5xSoft
dim Form,File,Version
Private Sub Class_Initialize
dim iStart,iFileNameStart,iFileNameEnd,iEnd,vbEnter,iFormStart,iFormEnd,theFile
dim strDiv,mFormName,mFormValue,mFileName,mFileSize,mFilePath,iDivLen,mStr
Version=""
if Request.TotalBytes<1 then Exit Sub
set Form=CreateObject("Scripting.Dictionary")
set File=CreateObject("Scripting.Dictionary")
set upfile_5xSoft_Stream=CreateObject("Adodb.Stream")
upfile_5xSoft_Stream.mode=3
upfile_5xSoft_Stream.type=1
upfile_5xSoft_Stream.open
upfile_5xSoft_Stream.write Request.BinaryRead(Request.TotalBytes)
vbEnter=Chr(13)&Chr(10)
iDivLen=inString(1,vbEnter)+1
strDiv=subString(1,iDivLen)
iFormStart=iDivLen
iFormEnd=inString(iformStart,strDiv)-1
while iFormStart < iFormEnd
iStart=inString(iFormStart,"name=""")
iEnd=inString(iStart+6,"""")
mFormName=subString(iStart+6,iEnd-iStart-6)
iFileNameStart=inString(iEnd+1,"filename=""")
if iFileNameStart>0 and iFileNameStart<iFormEnd then
iFileNameEnd=inString(iFileNameStart+10,"""")
mFileName=subString(iFileNameStart+10,iFileNameEnd-iFileNameStart-10)
iStart=inString(iFileNameEnd+1,vbEnter&vbEnter)
iEnd=inString(iStart+4,vbEnter&strDiv)
if iEnd>iStart then
mFileSize=iEnd-iStart-4
else
mFileSize=0
end if
set theFile=new FileInfo
theFile.FileName=getFileName(mFileName)
theFile.FilePath=getFilePath(mFileName)
theFile.FileSize=mFileSize
theFile.FileStart=iStart+4
theFile.FormName=FormName
file.add mFormName,theFile
else
iStart=inString(iEnd+1,vbEnter&vbEnter)
iEnd=inString(iStart+4,vbEnter&strDiv)
if iEnd>iStart then
mFormValue=subString(iStart+4,iEnd-iStart-4)
else
mFormValue=""
end if
form.Add mFormName,mFormValue
end if
iFormStart=iformEnd+iDivLen
iFormEnd=inString(iformStart,strDiv)-1
wend
End Sub
Private Function subString(theStart,theLen)
dim i,c,stemp
upfile_5xSoft_Stream.Position=theStart-1
stemp=""
for i=1 to theLen
if upfile_5xSoft_Stream.EOS then Exit for
c=ascB(upfile_5xSoft_Stream.Read(1))
If c > 127 Then
if upfile_5xSoft_Stream.EOS then Exit for
stemp=stemp&Chr(AscW(ChrB(AscB(upfile_5xSoft_Stream.Read(1)))&ChrB(c)))
i=i+1
else
stemp=stemp&Chr(c)
End If
Next
subString=stemp
End function
Private Function inString(theStart,varStr)
dim i,j,bt,theLen,str
InString=0
Str=toByte(varStr)
theLen=LenB(Str)
for i=theStart to upfile_5xSoft_Stream.Size-theLen
if i>upfile_5xSoft_Stream.size then exit Function
upfile_5xSoft_Stream.Position=i-1
if AscB(upfile_5xSoft_Stream.Read(1))=AscB(midB(Str,1)) then
InString=i
for j=2 to theLen
if upfile_5xSoft_Stream.EOS then
inString=0
Exit for
end if
if AscB(upfile_5xSoft_Stream.Read(1))<>AscB(MidB(Str,j,1)) then
InString=0
Exit For
end if
next
if InString<>0 then Exit Function
end if
next
End Function
Private Sub Class_Terminate
form.RemoveAll
file.RemoveAll
set form=nothing
set file=nothing
upfile_5xSoft_Stream.close
set upfile_5xSoft_Stream=nothing
End Sub
Private function GetFilePath(FullPath)
If FullPath <> "" Then
GetFilePath = left(FullPath,InStrRev(FullPath, "\"))
Else
GetFilePath = ""
End If
End function
Private function GetFileName(FullPath)
If FullPath <> "" Then
GetFileName = mid(FullPath,InStrRev(FullPath, "\")+1)
Else
GetFileName = ""
End If
End function
Private function toByte(Str)
dim i,iCode,c,iLow,iHigh
toByte=""
For i=1 To Len(Str)
c=mid(Str,i,1)
iCode =Asc(c)
If iCode<0 Then iCode = iCode + 65535
If iCode>255 Then
iLow = Left(Hex(Asc(c)),2)
iHigh =Right(Hex(Asc(c)),2)
toByte = toByte & chrB("&H"&iLow) & chrB("&H"&iHigh)
Else
toByte = toByte & chrB(AscB(c))
End If
Next
End function
End Class
Class FileInfo
dim FormName,FileName,FilePath,FileSize,FileStart
Private Sub Class_Initialize
FileName = ""
FilePath = ""
FileSize = 0
FileStart= 0
FormName = ""
End Sub
Public function SaveAs(FullPath)
dim dr,ErrorChar,i
SaveAs=1
if trim(fullpath)="" or FileSize=0 or FileStart=0 or FileName="" then exit function
if FileStart=0 or right(fullpath,1)="/" then exit function
set dr=CreateObject("Adodb.Stream")
dr.Mode=3
dr.Type=1
dr.Open
upfile_5xSoft_Stream.position=FileStart-1
upfile_5xSoft_Stream.copyto dr,FileSize
dr.SaveToFile FullPath,2
dr.Close
set dr=nothing
SaveAs=0
end function
End Class
</SCRIPT>
提交按钮的单击事件你写了吗？
急asp.net 删掉页面显示图片的同时怎样删除与其对应的文件夹里的...
你的删除写法没有问题，有可能是你删除的图片路径的问题。你最好用单步调试跟踪一下。文件删除第1步要保证文件路径的完全正确。B\/S程序在前面要加上：Server.MapPath()然后用System.IO.File.Delete(路径);即可。希望能帮助你解决问题！
急!!!asp.net做的文件下载,放到IIS下载不了
public class SecureFile { public SecureFile(){ } public bool UploadFile(HtmlInputFile inputfile){ try { string fileName = "";string DirPath = "";if(( inputfile.PostedFile != null ) && ( inputfile.PostedFile.ContentLength > 0 )){ DirPath=HttpContext.Current.Server.MapPath(S...
asp上传文件命名问题!急问!
set upload=new upload_5xsoft set file=upload.file("file")upfilename= split(file.FileName,".")upfileext = upfilename(ubound(upfilename))if lcase(upfileext)<>"jpg" and lcase(upfileext)<>"gif" and lcase(upfileext)<>"bmp" then response.write "错误:上传的文件格式不对! 退回...
win10系统如何用浏览器浏览asp文件啊?哪位大神帮帮忙,急急急!
打开浏览器直接把文件拖动到浏览器中就可以了。
asp问题,如何解决,急!请帮忙!
将所有包含的文件写成金字塔形，第一层的在上面，依次类推 然后再逐个将所有的文件都检查是否有重复的包含。还是那句话，在电脑上永远找不到问题，不如烂笔头来的快。
急!后缀名为.asc是什么文件?要用什么软件才能打开啊???求指导!_百度知...
我用的是PADS Layout的软件，同事发给我一个.asc的文件叫我打开，我想问下后缀为asp asa asc的文件都是ASP文件 Active Server Page（ASP，活动服务器
asp遍历某目录下的所有文件夹和文件,分页显示?
文件管理 当前位置：<%=path%> < if obj_fso.folderexists(s_folderpath) then >
有哪位高手知道ASP.NET中用C#怎样怎样实现文件上传
<asp:FileUpload ID="FileUpload1" runat="server" Width="475px" \/> <asp:Button ID="bt_upload" runat="server" OnClick="bt_upload_Click" Text="上传" \/> <asp:Label ID="lb_info" runat="server" ForeColor="Red" Width="183px"><\/asp:Label> ...
请问ASP怎样本地预览?iis怎样设置能预览??谢谢!!
打开控制面板-管理工具-Internet 信息服务-在默认网站上点右键-属性-主目录-浏览 找到你的站点文件夹就可以了 在默认网站上单击右键，选择“属性”选项，配置根站点文件夹也就是本地路径，然后设置默认首页比如你站点的首页是index.asp，可以这么访问：http:\/\/localhost (与http:\/\/localhost\/index.asp是...
如何使用Delphi编写可用于ASP等程序的DLL文件?在线等.
本文意在通过举例介绍如何运用Delphi编写ASP中的ActiveX 组件。通过以下步骤创建ASP中的ActiveX 服务器组件：1.创建一个ActiveX library工程 打开Delphi编辑器，选择选单中的File\/New，在New Item中选择 the ActiveX 项中的ActiveX Library选项，Delphi将自动生成以下代码：library Project1;uses ComServ;expor...
魏安枸櫞： 那要看你用的是哪个公司提供的空间,如果那个公司提供的空间支持FTP上传,就把该公司给的特定FTP上传地址记下来,用FTP上传工具或者按下面的格式打开空间ftp://账号:密码@FTP服务器IP地址 如: ftp://fzl:123@192.168.0.1 打开空间后把想要的文件往里面拖拽或或复制粘贴就行了 如果不支持FTP上传,那网站上一定有空间后台管理,在后台管理里可以找到上传...,WEB上传方式速度慢而且不方便,不过空间不支持也没法
望花区15550303773： 怎么将文件传到ASP空间？
魏安枸櫞： 【一】、去天空软件站下载一个FTP管理工具 http://www.skycn.com/soft/683.html 【二】、点击工具栏上的“快速链接”按钮 填上你的空间IP,用户名及密码即可进入FTP管理界面,然后将你的文件拖到右则窗口,即可以将文件上传至你的空间.
望花区15550303773： 请问ASP文件上传的方法都有哪些?谢谢 - ？
魏安枸櫞： 1.无组件上传类,只要使用文件流对象实现文件上传服务器,上BAIDU找＂ASP无组件上传＂,下载一般都会有帮助的,只一类是用的人多比较多的 2.COM组件上传,着一类需要在服务器上注册组件,除非自己有服务器,一般用的少
望花区15550303773： 请问ASP空间怎麽才能把东西上传到上面去啊!？
魏安枸櫞： 你首先需要知道服务器的登录帐号密码,然后你可用FTP上传软件进行上传·,在软件里面输入自己服务器的帐号密码连接,连同之后,把相应的文件上传即可!一般上传的软件:
望花区15550303773： 怎样把从网上下下来的ASP代码上传到自己的网站上,又怎么用?说的详细点儿,我是菜鸟. - ？
魏安枸櫞： 把自己下载下来的代码文件放到一个文件夹里.文件夹里目录结构不要改.然后用FTP连接你网站虚拟主机,直接把这个文件夹上传到你空间的目录里.如果你原来网站域名是:www.abcd.com 那你这样就能访问你上传的代码了:www.abcd.com/上传文件夹名 如果说你不想要原来的代码,想用新的这个.那你先把原来空间的文件删除掉.然后把新的这个代码文件全部上传到空间的根目录下.记住,这次不是把所以的代码文件放到一个文件夹再上传.而是把把这个文件夹下面的N多个文件传到空间的根目录里...文件夹不要 不明白再Q我
望花区15550303773： ASP空间怎么上传东西?？
魏安枸櫞： 用FTP上传!不过要看你这个空间支不支持FTP咯!如果可以的话用FTP上传软件连接到你的空间上传就OK了.
望花区15550303773： 如何上传ASP文件到ASP空间?急!!!？
魏安枸櫞： -!!!! 申请完的空间应该有FTP帐户和密码的(不要告诉我没有FTP的!)! 用就软件(如FLASHFXP)填上空间的地址(申请完都会告诉你的!没有就在网站上找吧!一定有的!),帐户和密码~!就可以登录空间,到时就把你的文件上传过去就可以了!
望花区15550303773： 如何上传asp 急？
魏安枸櫞： windows系统请将网页文件上传到根目录下,请参考:我们网站的客服中心——主机问题——ftp使用手册
望花区15550303773： asp怎样实现文件上传 - ？
魏安枸櫞： 这里有一个无刷新多文件上传系统 里面可以判断文件多少 文件类型 里面有教程和源码 参考资料:www.blueidea.com/...=11280
望花区15550303773： 怎样把文件上传到asp空间?？
魏安枸櫞： 使用FTP软件 或者在IE输入Ftp://你的网站域名 然后输入FTP用户名和密码 登陆后将你要传送的文件复制过去
