Recentemente, as pessoas costumam fazer esse tipo de pergunta, então vou postar aqui, o conteúdo:
1. Estrutura da tabela de banco de dados (acesso):
UserID: texto (ID do usuário que salva o arquivo carregado)
FileContentType: Texto (usado para salvar o tipo de arquivo carregado, por exemplo: "Application/Msword", que é usado principalmente para permitir que os usuários baixem esse arquivo corretamente)
FileContent: OleObject (Salvar dados do arquivo)
2. Arquivos HTML
Muploadfile.htm
<Formname = "upload_file" ENCTYPE = "Multipart/form-data" action = "muploadfile.asp" Método = post>
<inputType = hiddenname = "userID" value = "abc">
<inputType = hiddenname = "fileUploadstart"> 'Isso é usado para indicar o início do upload dos dados do arquivo
FileToSend:
<Inputtype = "file" name = "file_up" size = "30"> <br>
<Inputtype = "file" name = "file_up" size = "30"> <br>
<inputType = hiddenname = "fileUploadend"> 'é usado aqui para indicar o final dos dados do arquivo
<inputType = submitValue = envie>
</morm> </p> <p>
3. Arquivos ASP
muploadfile.asp </p> <p> <%
Response.Expires = 0
Functionbin2str (binstr)
Dimvarlen, Clow, CCC, Skipflag </p> <p> skipflag = 0
ccc = ""
Ifnotisnull (binstr) Então
Varlen = Lenb (Binstr)
Fori = 1tovarlen
Ifskipflag = 0then
Clow = MIDB (BINSTR, I, 1)
IFASCB (Clow)> 127then
CCC = CCC & CHR (ASCW (MIDB (BINSTR, I+1,1) e CLOW))
skipflag = 1
Outro
CCC = CCC & CHR (ASCB (CLOW))
Endif
Outro
skipflag = 0
Endif