Authentication 经典ASP-ServerXMLHTTP NT身份验证
所以我有下面的代码,我想用它来下载图片并保存它们Authentication 经典ASP-ServerXMLHTTP NT身份验证,authentication,asp-classic,serverxmlhttp,Authentication,Asp Classic,Serverxmlhttp,所以我有下面的代码,我想用它来下载图片并保存它们 <% function SaveFileFromUrl(Url, FileName) dim objXMLHTTP, objADOStream, objFSO Set objXMLHTTP = CreateObject("MSXML2.ServerXMLHTTP.3.0") objXMLHTTP.open "GET", Url, false objXMLHTTP.send() If objXML
<%
function SaveFileFromUrl(Url, FileName)
dim objXMLHTTP, objADOStream, objFSO
Set objXMLHTTP = CreateObject("MSXML2.ServerXMLHTTP.3.0")
objXMLHTTP.open "GET", Url, false
objXMLHTTP.send()
If objXMLHTTP.Status = 200 OR objXMLHTTP.Status = 304 Then
Set objADOStream = CreateObject("ADODB.Stream")
objADOStream.Open
objADOStream.Type = 1 'adTypeBinary
objADOStream.Write objXMLHTTP.ResponseBody
objADOStream.Position = 0 'Set the stream position to the start
Set objFSO = Createobject("Scripting.FileSystemObject")
If objFSO.Fileexists(FileName) Then objFSO.DeleteFile FileName
Set objFSO = Nothing
objADOStream.SaveToFile FileName
objADOStream.Close
Set objADOStream = Nothing
SaveFileFromUrl = objXMLHTTP.getResponseHeader("Content-Type")
else
SaveFileFromUrl = ""
End if
response.write objXMLHTTP.Status
Set objXMLHTTP = Nothing
end function
%>
当我在网上的图片上运行这个程序时,效果很好。但是,当尝试在需要NT身份验证的intranet映像上使用它时,我使用response.write objXMLHTTP.Status
因此,我有点明显的问题是-如何在脚本中进行此操作而不取消NT身份验证
但是
这也可能是因为图像没有扩展名。它们的形式为http://domain/thumbs/image1
而不是http://domain/thumbs/image1.png
不管怎样,我都不能让它工作
谢谢
objXMLHTTP.open(bstrMethod, bstrUrl, bAsync, bstrUser, bstrPassword);