Atualmente, existem muitos componentes de fazer o upload de classes.
Código do arquivo upload.asp
<%
strfilename = request.QueryString (FN)
Set objStream = server.createObject (adodb.stream)
objstream.type = 1 'Método binário addypeBinário
objstream.open
objstream.loadFromFile strfilename
objstream.savetofile server.mappath (zslogo.gif), 2
%>
Usar
Entre no navegador:
http: //xxx/upload.asp?
Entre eles, xxx é o endereço de nome de domínio do seu site, como: www.jzxue.com
Após a execução, você verá um zlogo.gif no seu diretório, que é o arquivo que você acabou de enviar!
De acordo com o princípio do ASP No Component Upload, expandimos o código acima para o seguinte código:
Código do arquivo upload.asp
<%
Função getFilename (byval fn)
Se fn <> thetfilename = MID (fn, Instrrev (fn,/)+1) else getFileName =
Função final
strfilename = request.form (file1)
Set objStream = server.createObject (adodb.stream)
objstream.type = 1 'adtypebinary
objstream.open
objstream.loadFromFile strfilename
objstream.savetofile server.mappath (getFileName (strfileName)), 2
objstream.close
%>
Código do arquivo upload.htm
<Nome de forma = upform Action = upload.asp Método = post Enctype = Multipart/Form-Data>
<Tipo de entrada = Nome do arquivo = File1 Style = Largura: 400px;
<Tipo de entrada = Nome de envio = Valor de envio = File de upload/>
</morm>