asp上传图片源代码

下是ASP上传图片的基本代码：
<%
\’ 检查是否有文件上传
If Request.Files.Count > 0 Then
\’ 获取上传的文件对象
Set file = Request.Files(1)
\’ 获取文件名称
fileName = file.FileName
\’ 获取文件大小
fileSize = file.Size
\’ 检查文件类型
fileType = Right(fileName, 3)
If fileType = jpg Or fileType = gif Or fileType = png Then
\’ 设置保存路径
sa vePath = Server.MapPath(upload/)
\’ 检查目录是否存在，如果不存在则创建目录
If Not FileSystemObject.FolderExists(sa vePath) Then
FileSystemObject.CreateFolder(sa vePath)
End If
\’ 保存文件
file.Sa veAs sa vePath & fileName
\’ 显示上传成功信息
Response.Write 文件上传成功！
Else
\’ 显示文件类型错误信息
Response.Write 只能上传jpg、gif、png格式的图片！
End If
Else
\’ 显示没有文件上传信息
Response.Write 请选择要上传的文件！
End If
%>
注意：上述代码(mǎ)中(zhōng)的“FileSystemObject”需要通过“CreateObject”方法创建。另外，上传文件的大小和类型可以根据需要进行修改。