{"id":27,"date":"2026-09-17T18:44:30","date_gmt":"2026-09-17T18:44:30","guid":{"rendered":"https:\/\/hostaspblog.zs3.com.br\/?p=27"},"modified":"2026-09-17T18:44:34","modified_gmt":"2026-09-17T18:44:34","slug":"upload-de-arquivos-asp-pure-upload","status":"publish","type":"post","link":"https:\/\/hostaspblog.zs3.com.br\/?p=27","title":{"rendered":"Upload de Arquivos – Asp Pure Upload"},"content":{"rendered":"\n

Para fazer upload de arquivos usando Asp 3.0 (Asp Cl\u00e1ssico), use o c\u00f3digo Asp Pure Upload:<\/p>\n\n\n\n

FORMUL\u00c1RIO HTML:<\/strong><\/p>\n\n\n\n

Pure Classic ASP Upload<\/p>\n\n\n\n

<h2>Upload File (Pure Classic ASP)<\/h2>\n\n<!-- Crucial: enctype must be multipart\/form-data -->\n<form action=\"upload_re.asp\" method=\"post\" enctype=\"multipart\/form-data\">\n    <label for=\"file\">Choose File:<\/label>\n    <input type=\"file\" name=\"txtFile\" id=\"file\"><br><br>\n    <input type=\"submit\" value=\"Upload Now\">\n<\/form><\/code><\/pre>\n\n\n\n
C\u00d3DIGO ASP NO SERVIDOR<\/strong><\/p>\n\n\n\n
<%@ Language=VBScript %>
<%
Option Explicit
Response.CharSet = “UTF-8”<\/p>\n\n\n\n
‘ Configuration
Dim UploadDirectory
UploadDirectory = Server.MapPath(“upload\/”) ‘ Make sure this folder exists and has WRITE permissions!<\/p>\n\n\n\n
‘ Process the form submission
If Request.ServerVariables(“REQUEST_METHOD”) = “POST” Then
Call HandlePureASPUpload()
End If
%><\/p>\n\n\n\n
<%
Sub HandlePureASPUpload()
Dim TotalBytes, BinaryData
TotalBytes = Request.TotalBytes<\/p>\n\n\n\n
If TotalBytes = 0 Then
Response.Write “<\/p>\n\n\n\n
Error: No data sent.”
Exit Sub
End If<\/p>\n\n\n\n
‘ Read raw HTTP data stream into a binary variable
BinaryData = Request.BinaryRead(TotalBytes)<\/p>\n\n\n\n
‘ Establish boundaries from the stream
Dim Boundary, BoundaryPos
BoundaryPos = InStrB(1, BinaryData, ChrB(13) & ChrB(10))
If BoundaryPos = 0 Then Exit Sub
Boundary = MidB(BinaryData, 1, BoundaryPos – 1)<\/p>\n\n\n\n
‘ Find Content-Disposition block for the file stream
Dim PosFileStart, PosFileEnd, FileData, FileName
Dim PosNameStart, PosNameEnd<\/p>\n\n\n\n
‘ Parse out the original filename
PosNameStart = InStrB(1, BinaryData, BytesToBstr(“filename=”””))
If PosNameStart > 0 Then
PosNameStart = PosNameStart + 10
PosNameEnd = InStrB(PosNameStart, BinaryData, BytesToBstr(“”””))
FileName = BstrToAnsi(MidB(BinaryData, PosNameStart, PosNameEnd – PosNameStart))<\/p>\n\n\n\n
' Strip out potential directory paths passed by older IE browsers\nIf InStr(FileName, \"\\\") > 0 Then\n    FileName = Mid(FileName, InStrRev(FileName, \"\\\") + 1)\nEnd If\n<\/code><\/pre>\n\n\n\n
End If<\/p>\n\n\n\n
‘ Locate where the real binary file stream content begins and ends
PosFileStart = InStrB(PosNameEnd, BinaryData, ChrB(13) & ChrB(10) & ChrB(13) & ChrB(10))
If PosFileStart > 0 Then
PosFileStart = PosFileStart + 4
PosFileEnd = InStrB(PosFileStart, BinaryData, Boundary) – 4<\/p>\n\n\n\n
' Slice out the clean file contents\nFileData = MidB(BinaryData, PosFileStart, PosFileEnd - PosFileStart)\n\n' Ensure a filename exists and the data payload isn't empty\nIf Len(FileName) > 0 And LenB(FileData) > 0 Then\n    Dim TargetPath\n    TargetPath = UploadDirectory & \"\\\" & FileName\n    \n    ' Save the binary array cleanly to the server disk\n    If SaveBinaryFile(TargetPath, FileData) Then\n        Response.Write \"<p style='color:green;'>Success! File uploaded as: \" & Server.HTMLEncode(FileName) & \"<\/p>\"\n    Else\n        Response.Write \"<p style='color:red;'>Error saving file. Check folder permissions.<\/p>\"\n    End If\nElse\n    Response.Write \"<p style='color:red;'>Error: Empty file field or no file selected.<\/p>\"\nEnd If\n<\/code><\/pre>\n\n\n\n
End If<\/p>\n\n\n\n
End Sub<\/p>\n\n\n\n
‘ Function to write raw bytes using ADODB Streams (safe from string-truncation errors)
Function SaveBinaryFile(FilePath, BinaryContents)
On Error Resume Next
Dim BinaryStream
Set BinaryStream = Server.CreateObject(“ADODB.Stream”)
BinaryStream.Type = 1 ‘ adTypeBinary
BinaryStream.Open
BinaryStream.Write BinaryContents
BinaryStream.SaveToFile FilePath, 2 ‘ adSaveCreateOverWrite
BinaryStream.Close
Set BinaryStream = Nothing<\/p>\n\n\n\n
If Err.Number <> 0 Then
SaveBinaryFile = False
Else
SaveBinaryFile = True
End If
On Error GoTo 0<\/p>\n\n\n\n
End Function<\/p>\n\n\n\n
‘ Helper: Convert regular VBScript strings to Binary Stream Lookups
Function BytesToBstr(Str)
Dim i, out
out = “”
For i = 1 To Len(Str)
out = out & ChrB(Asc(Mid(Str, i, 1)))
Next
BytesToBstr = out
End Function<\/p>\n\n\n\n
‘ Helper: Convert Binary Bytes from stream back to readable ANSI strings
Function BstrToAnsi(Bstr)
Dim i, out
out = “”
For i = 1 To LenB(Bstr)
out = out & Chr(AscB(MidB(Bstr, i, 1)))
Next
BstrToAnsi = out
End Function
%><\/p>\n\n\n\n
<\/p>\n\n\n
Upload de Arquivos – Asp Pure Upload<\/p>\n\n\n
<\/p>\n","protected":false},"excerpt":{"rendered":"
Para fazer upload de arquivos usando Asp 3.0 (Asp Cl\u00e1ssico), use o c\u00f3digo Asp Pure Upload: FORMUL\u00c1RIO HTML: Pure Classic […]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"site-sidebar-layout":"default","site-content-layout":"","ast-site-content-layout":"default","site-content-style":"default","site-sidebar-style":"default","ast-global-header-display":"","ast-banner-title-visibility":"","ast-main-header-display":"","ast-hfb-above-header-display":"","ast-hfb-below-header-display":"","ast-hfb-mobile-header-display":"","site-post-title":"","ast-breadcrumbs-content":"","ast-featured-img":"","footer-sml-layout":"","ast-disable-related-posts":"","theme-transparent-header-meta":"","adv-header-id-meta":"","stick-header-meta":"","header-above-stick-meta":"","header-main-stick-meta":"","header-below-stick-meta":"","astra-migrate-meta-layouts":"default","ast-page-background-enabled":"default","ast-page-background-meta":{"desktop":{"background-color":"var(--ast-global-color-5)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"tablet":{"background-color":"","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"mobile":{"background-color":"","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""}},"ast-content-background-meta":{"desktop":{"background-color":"var(--ast-global-color-4)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"tablet":{"background-color":"var(--ast-global-color-4)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"mobile":{"background-color":"var(--ast-global-color-4)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""}},"footnotes":""},"categories":[2],"tags":[],"class_list":["post-27","post","type-post","status-publish","format-standard","hentry","category-asp-classico"],"yoast_head":"\r\nUpload de Arquivos - Asp Pure Upload - Host Asp Premium - Blog de Suporte<\/title>\r\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\r\n<link rel=\"canonical\" href=\"https:\/\/hostaspblog.zs3.com.br\/?p=27\" \/>\r\n<meta property=\"og:locale\" content=\"pt_BR\" \/>\r\n<meta property=\"og:type\" content=\"article\" \/>\r\n<meta property=\"og:title\" content=\"Upload de Arquivos - Asp Pure Upload - Host Asp Premium - Blog de Suporte\" \/>\r\n<meta property=\"og:description\" content=\"Para fazer upload de arquivos usando Asp 3.0 (Asp Cl\u00e1ssico), use o c\u00f3digo Asp Pure Upload: FORMUL\u00c1RIO HTML: Pure Classic […]\" \/>\r\n<meta property=\"og:url\" content=\"https:\/\/hostaspblog.zs3.com.br\/?p=27\" \/>\r\n<meta property=\"og:site_name\" content=\"Host Asp Premium - Blog de Suporte\" \/>\r\n<meta property=\"article:published_time\" content=\"2026-09-17T18:44:30+00:00\" \/>\r\n<meta property=\"article:modified_time\" content=\"2026-09-17T18:44:34+00:00\" \/>\r\n<meta name=\"author\" content=\"admin\" \/>\r\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\r\n<meta name=\"twitter:label1\" content=\"Escrito por\" \/>\n\t<meta name=\"twitter:data1\" content=\"admin\" \/>\n\t<meta name=\"twitter:label2\" content=\"Est. tempo de leitura\" \/>\n\t<meta name=\"twitter:data2\" content=\"2 minutos\" \/>\r\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\\\/\\\/schema.org\",\"@graph\":[{\"@type\":\"Article\",\"@id\":\"https:\\\/\\\/hostaspblog.zs3.com.br\\\/?p=27#article\",\"isPartOf\":{\"@id\":\"https:\\\/\\\/hostaspblog.zs3.com.br\\\/?p=27\"},\"author\":{\"name\":\"admin\",\"@id\":\"https:\\\/\\\/hostaspblog.zs3.com.br\\\/#\\\/schema\\\/person\\\/5a606e973bf57bccf255f7191b1a6cdd\"},\"headline\":\"Upload de Arquivos – Asp Pure Upload\",\"datePublished\":\"2026-09-17T18:44:30+00:00\",\"dateModified\":\"2026-09-17T18:44:34+00:00\",\"mainEntityOfPage\":{\"@id\":\"https:\\\/\\\/hostaspblog.zs3.com.br\\\/?p=27\"},\"wordCount\":324,\"commentCount\":0,\"articleSection\":[\"Asp Cl\u00e1ssico\"],\"inLanguage\":\"pt-BR\",\"potentialAction\":[{\"@type\":\"CommentAction\",\"name\":\"Comment\",\"target\":[\"https:\\\/\\\/hostaspblog.zs3.com.br\\\/?p=27#respond\"]}]},{\"@type\":\"WebPage\",\"@id\":\"https:\\\/\\\/hostaspblog.zs3.com.br\\\/?p=27\",\"url\":\"https:\\\/\\\/hostaspblog.zs3.com.br\\\/?p=27\",\"name\":\"Upload de Arquivos - Asp Pure Upload - Host Asp Premium - Blog de Suporte\",\"isPartOf\":{\"@id\":\"https:\\\/\\\/hostaspblog.zs3.com.br\\\/#website\"},\"datePublished\":\"2026-09-17T18:44:30+00:00\",\"dateModified\":\"2026-09-17T18:44:34+00:00\",\"author\":{\"@id\":\"https:\\\/\\\/hostaspblog.zs3.com.br\\\/#\\\/schema\\\/person\\\/5a606e973bf57bccf255f7191b1a6cdd\"},\"breadcrumb\":{\"@id\":\"https:\\\/\\\/hostaspblog.zs3.com.br\\\/?p=27#breadcrumb\"},\"inLanguage\":\"pt-BR\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\\\/\\\/hostaspblog.zs3.com.br\\\/?p=27\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\\\/\\\/hostaspblog.zs3.com.br\\\/?p=27#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"In\u00edcio\",\"item\":\"https:\\\/\\\/hostaspblog.zs3.com.br\\\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Upload de Arquivos – Asp Pure Upload\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\\\/\\\/hostaspblog.zs3.com.br\\\/#website\",\"url\":\"https:\\\/\\\/hostaspblog.zs3.com.br\\\/\",\"name\":\"Host Asp Premium - Blog de Suporte\",\"description\":\"\",\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\\\/\\\/hostaspblog.zs3.com.br\\\/?s={search_term_string}\"},\"query-input\":{\"@type\":\"PropertyValueSpecification\",\"valueRequired\":true,\"valueName\":\"search_term_string\"}}],\"inLanguage\":\"pt-BR\"},{\"@type\":\"Person\",\"@id\":\"https:\\\/\\\/hostaspblog.zs3.com.br\\\/#\\\/schema\\\/person\\\/5a606e973bf57bccf255f7191b1a6cdd\",\"name\":\"admin\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"pt-BR\",\"@id\":\"https:\\\/\\\/secure.gravatar.com\\\/avatar\\\/067d7c444a65a7e073977d64c47838f638bc32bdf61547266d7259a6588493af?s=96&d=mm&r=g\",\"url\":\"https:\\\/\\\/secure.gravatar.com\\\/avatar\\\/067d7c444a65a7e073977d64c47838f638bc32bdf61547266d7259a6588493af?s=96&d=mm&r=g\",\"contentUrl\":\"https:\\\/\\\/secure.gravatar.com\\\/avatar\\\/067d7c444a65a7e073977d64c47838f638bc32bdf61547266d7259a6588493af?s=96&d=mm&r=g\",\"caption\":\"admin\"},\"sameAs\":[\"https:\\\/\\\/hostaspblog.zs3.com.br\"],\"url\":\"https:\\\/\\\/hostaspblog.zs3.com.br\\\/?author=1\"}]}<\/script>\r\n<!-- \/ Yoast SEO plugin. -->","yoast_head_json":{"title":"Upload de Arquivos - Asp Pure Upload - Host Asp Premium - Blog de Suporte","robots":{"index":"index","follow":"follow","max-snippet":"max-snippet:-1","max-image-preview":"max-image-preview:large","max-video-preview":"max-video-preview:-1"},"canonical":"https:\/\/hostaspblog.zs3.com.br\/?p=27","og_locale":"pt_BR","og_type":"article","og_title":"Upload de Arquivos - Asp Pure Upload - Host Asp Premium - Blog de Suporte","og_description":"Para fazer upload de arquivos usando Asp 3.0 (Asp Cl\u00e1ssico), use o c\u00f3digo Asp Pure Upload: FORMUL\u00c1RIO HTML: Pure Classic […]","og_url":"https:\/\/hostaspblog.zs3.com.br\/?p=27","og_site_name":"Host Asp Premium - Blog de Suporte","article_published_time":"2026-09-17T18:44:30+00:00","article_modified_time":"2026-09-17T18:44:34+00:00","author":"admin","twitter_card":"summary_large_image","twitter_misc":{"Escrito por":"admin","Est. tempo de leitura":"2 minutos"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"Article","@id":"https:\/\/hostaspblog.zs3.com.br\/?p=27#article","isPartOf":{"@id":"https:\/\/hostaspblog.zs3.com.br\/?p=27"},"author":{"name":"admin","@id":"https:\/\/hostaspblog.zs3.com.br\/#\/schema\/person\/5a606e973bf57bccf255f7191b1a6cdd"},"headline":"Upload de Arquivos – Asp Pure Upload","datePublished":"2026-09-17T18:44:30+00:00","dateModified":"2026-09-17T18:44:34+00:00","mainEntityOfPage":{"@id":"https:\/\/hostaspblog.zs3.com.br\/?p=27"},"wordCount":324,"commentCount":0,"articleSection":["Asp Cl\u00e1ssico"],"inLanguage":"pt-BR","potentialAction":[{"@type":"CommentAction","name":"Comment","target":["https:\/\/hostaspblog.zs3.com.br\/?p=27#respond"]}]},{"@type":"WebPage","@id":"https:\/\/hostaspblog.zs3.com.br\/?p=27","url":"https:\/\/hostaspblog.zs3.com.br\/?p=27","name":"Upload de Arquivos - Asp Pure Upload - Host Asp Premium - Blog de Suporte","isPartOf":{"@id":"https:\/\/hostaspblog.zs3.com.br\/#website"},"datePublished":"2026-09-17T18:44:30+00:00","dateModified":"2026-09-17T18:44:34+00:00","author":{"@id":"https:\/\/hostaspblog.zs3.com.br\/#\/schema\/person\/5a606e973bf57bccf255f7191b1a6cdd"},"breadcrumb":{"@id":"https:\/\/hostaspblog.zs3.com.br\/?p=27#breadcrumb"},"inLanguage":"pt-BR","potentialAction":[{"@type":"ReadAction","target":["https:\/\/hostaspblog.zs3.com.br\/?p=27"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/hostaspblog.zs3.com.br\/?p=27#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"In\u00edcio","item":"https:\/\/hostaspblog.zs3.com.br\/"},{"@type":"ListItem","position":2,"name":"Upload de Arquivos – Asp Pure Upload"}]},{"@type":"WebSite","@id":"https:\/\/hostaspblog.zs3.com.br\/#website","url":"https:\/\/hostaspblog.zs3.com.br\/","name":"Host Asp Premium - Blog de Suporte","description":"","potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/hostaspblog.zs3.com.br\/?s={search_term_string}"},"query-input":{"@type":"PropertyValueSpecification","valueRequired":true,"valueName":"search_term_string"}}],"inLanguage":"pt-BR"},{"@type":"Person","@id":"https:\/\/hostaspblog.zs3.com.br\/#\/schema\/person\/5a606e973bf57bccf255f7191b1a6cdd","name":"admin","image":{"@type":"ImageObject","inLanguage":"pt-BR","@id":"https:\/\/secure.gravatar.com\/avatar\/067d7c444a65a7e073977d64c47838f638bc32bdf61547266d7259a6588493af?s=96&d=mm&r=g","url":"https:\/\/secure.gravatar.com\/avatar\/067d7c444a65a7e073977d64c47838f638bc32bdf61547266d7259a6588493af?s=96&d=mm&r=g","contentUrl":"https:\/\/secure.gravatar.com\/avatar\/067d7c444a65a7e073977d64c47838f638bc32bdf61547266d7259a6588493af?s=96&d=mm&r=g","caption":"admin"},"sameAs":["https:\/\/hostaspblog.zs3.com.br"],"url":"https:\/\/hostaspblog.zs3.com.br\/?author=1"}]}},"_links":{"self":[{"href":"https:\/\/hostaspblog.zs3.com.br\/index.php?rest_route=\/wp\/v2\/posts\/27","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/hostaspblog.zs3.com.br\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/hostaspblog.zs3.com.br\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/hostaspblog.zs3.com.br\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/hostaspblog.zs3.com.br\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=27"}],"version-history":[{"count":1,"href":"https:\/\/hostaspblog.zs3.com.br\/index.php?rest_route=\/wp\/v2\/posts\/27\/revisions"}],"predecessor-version":[{"id":28,"href":"https:\/\/hostaspblog.zs3.com.br\/index.php?rest_route=\/wp\/v2\/posts\/27\/revisions\/28"}],"wp:attachment":[{"href":"https:\/\/hostaspblog.zs3.com.br\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=27"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/hostaspblog.zs3.com.br\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=27"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/hostaspblog.zs3.com.br\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=27"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}