标签: asp-classic

什么是经典 ASP 中 ASP.NET 的 HttpContext.Current.Items 等价物?

HttpContext.Current.Items 是一个具有 HTTP 请求生命周期的存储。

我想知道与此等效的 Classic ASP。

http request httpwebrequest httpcontext asp-classic

2
推荐指数
1
解决办法
2073
查看次数

在 Classic ASP 中,打开和关闭多个连接是否会对性能产生重大影响?

我有一个类似于下面的代码片段,我想将其重构为两个不同的函数,每个函数都有自己的连接(为了更好的维护):

Dim Conn, Sql, RS

Set Conn = Server.CreateObject("ADODB.Connection")
    Conn.Open ConnString

Sql = SELECT * FROM CLIENTS

Set RS = Conn.Execute(sql)
//'Do something with Clients

Set RS = Nothing

Sql = SELECT * FROM DEALERS

Set RS = Conn.Execute(sql)
//'Do something with Dealers

Set RS = Nothing

Conn.Close
Set Conn = Nothing
Run Code Online (Sandbox Code Playgroud)

是否有两个函数(例如 GetClients 和 GetDealers)分别打开和关闭它们自己的连接会对性能产生重大影响,与仅打开和关闭单个连接相反,如上图所示?如果是这样,您将如何重构代码?

sql ado sqlconnection asp-classic

2
推荐指数
1
解决办法
3347
查看次数

MSXML2.XMLHTTP 请求验证在 ASP Classic 中输入的 URL

在此先感谢您收到的任何帮助。

我想让我们的客户在文本字段中输入一个 URL,然后检查该 URL 是否存在并有效。

我想检查 3 种可能的结果:状态 200 - 正常,状态 500 - 服务器错误,或状态 404 - 找不到页面。

在 ASP 经典中执行以下代码时,我得到 12007 的状态代码,而我应该得到 404。这是因为它找不到返回 404 代码的网络服务器吗?

Function CheckURL(vURL)
    ON ERROR RESUME NEXT
    Set oXML=Server.CreateObject("MSXML2.XMLHTTP") : oXML.Open "POST",vURL,false : oXML.Send()
    CheckURL = oXML.status
    Set oXML = nothing
End Function
Run Code Online (Sandbox Code Playgroud)

或者这里有什么地方不对劲。除了上述标准之外,我还可能看到哪些状态代码。

msxml http xmlhttprequest asp-classic

2
推荐指数
1
解决办法
6645
查看次数

下拉菜单中的 OnClick() 事件

我有一个下拉菜单。当我点击下拉菜单中的“意大利语”时,我希望显示意大利语的内容。基本上,当我从下拉列表中选择意大利语时,我想要的是将操作设置为 IT。我该如何处理?

 <% action = Request.QueryString("action") %>

    <form name="contentchanger" action="/" method="post">
         <select name="flag" name="flag">
              <option value="Choose" selected="selected">Choose</option>
              <option value="italian" onclick="what code i should use here?">Italian</option>
         </select>
    </form>
    <a href="?action=FR">FR</a>
    <a href="?action=IT">IT</a>

    <%
    if action = "IT" Then  
      Response.Write("<p>This is italian</p>") 
    else if  action = "FR" Then  
      Response.Write("<p>This is French</p>") 
    end if
    end if
    %>
Run Code Online (Sandbox Code Playgroud)

html javascript asp-classic

2
推荐指数
1
解决办法
3万
查看次数

VBScript(经典 ASP):尝试将当前目录的绝对路径输出到浏览器,但出现错误

我正在尝试使用经典 ASP 将当前目录的绝对路径打印到浏览器屏幕。(相当于 PHP 的 echo 命令)。

我在下面代码的最后一行收到此错误:“Microsoft VBScript 运行时错误 '800a01a8' 所需对象:'文档'/Research/ro.asp,第 17 行”

我尝试了几种不同的方法来打印到屏幕(如 WScript.StdOut.Write),它们也返回相同的错误。

我怀疑我的错误与它是一个对象的事实有关,并且对象需要不同的打印到屏幕的方法。

任何人对此有何想法?

示例文件.asp=

<%

Dim szCurrentRoot: szCurrentRoot= ""

'Create the File System Ojbect
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")

'Get the Absolute Path of the current directory
szCurrentRoot = objFSO.GetParentFolderName(Server.MapPath(Request.ServerVariables("URL")))

'Print to the screen.  The following line is line 17 which causes the error
Document.Write(szCurrentRoot)
%>
Run Code Online (Sandbox Code Playgroud)

经过更多研究,我找到了我的问题的答案:

Response.Write(szCurrentRoot)

这种写入浏览器屏幕的方式是成功的。

vbscript asp-classic

2
推荐指数
1
解决办法
7199
查看次数

如何在经典的asp中使用vbscript下载文件

我正在使用VBScript处理Classic Asp.我正在尝试使用下载选项显示目录中的文件列表.喜欢,在此输入图像描述

当我点击下载链接时,需要下载相应的文件,因为我使用了以下代码,

<html>
<head>
<title> My First ASP Page </title>
</head>
<body>
<%
Dim fso
Dim ObjFolder
Dim ObjOutFile
Dim ObjFiles
Dim ObjFile

'Creating File System Object
Set fso = CreateObject("Scripting.FileSystemObject")

'Getting the Folder Object
Set ObjFolder = fso.GetFolder("F:\karthik")

'Creating an Output File to write the File Names
Set ObjOutFile = fso.CreateTextFile("F:\WindowsFiles.txt")

'Getting the list of Files
Set ObjFiles = ObjFolder.Files

'Writing Name and Path of each File to Output File
Response.Write("<table cellpadding=""4"" cellspacing=""5"" >")
For Each ObjFile In …
Run Code Online (Sandbox Code Playgroud)

vbscript asp-classic

2
推荐指数
1
解决办法
2万
查看次数

jQuery .autocomplete不会过滤

我是jQuery和JSON的新手,花了好几个小时但仍然没有解决问题

来自服务器的JSON有效,通过jsonlit.com检查但它仍然显示所有数据(未过滤).

来自serverURI.asp的JSON

["A. ASRUNADI", "A. MURSYID", "A. RIFANI", "A.Z MAKMUR IS", "ABBAS", "ABDI  IRWANTO"]
Run Code Online (Sandbox Code Playgroud)

我的jquery

$("#keyword").autocomplete({
    source: function(request, response){
       $.getJSON("serverURI.asp", function(data){
           var source = data
           response(source);
       });
    }
});
Run Code Online (Sandbox Code Playgroud)

但....当我把JSON作为var in jquery时它的作品...同时我已经在我的html元标记中使用了utf-8

$(function() {
    var availableTags = ["A. ASRUNADI", "A. MURSYID", "A. RIFANI", "A.Z MAKMUR IS", "ABBAS", "ABDI  IRWANTO"];
    $("#keyword").autocomplete({
        source: availableTags
    });
});
Run Code Online (Sandbox Code Playgroud)

我的ASP(经典)生成JSON如下

    dim strResultEMP
strResultEMP = "["
for strEmpCount = 0  to strTotalCountEmp
    strEmpObj = split(strEmpSplit(strEmpCount), "$$$")
        if strEmpCount < strTotalCountEmp then
            strResultEMP = strResultEMP & …
Run Code Online (Sandbox Code Playgroud)

jquery jquery-ui asp-classic jquery-autocomplete jquery-ui-autocomplete

2
推荐指数
1
解决办法
1043
查看次数

使用REST或Web服务上载/下载文件

是否可以使用REST或任何其他Web服务上传/下载文件并发送HTML代码?

这必须使用:PHP,Java或ASP.

php java rest web-services asp-classic

2
推荐指数
1
解决办法
2万
查看次数

404.17添加通配符'*'Mime类型(IIS 7)后显示错误

我试图使domain.com/urlwithoutextension我的Web服务器可以读取无扩展的url()作为.html或.asp文件,我所得到的只是

  HTTP Error 404.17 - Not Found
    The requested content appears to be script and will not
    be served by the static file handler.
Run Code Online (Sandbox Code Playgroud)

然后低于错误它说我可以试试这个: If you want to serve this content as a static file, add an explicit MIME map.

所以我在IIS 7中添加了一个MIME映射..

  Extension: *
  MIME Type: application/octet-stream
Run Code Online (Sandbox Code Playgroud)

但我仍然遇到这个错误.我想做的就是将其domain.com/thisurl视为.html文件,不带.html扩展名.救命?

iis iis-7 asp-classic mime-types

2
推荐指数
1
解决办法
8223
查看次数

MM_*对ASP Classic意味着什么

我正在查看遗留代码库,许多变量都有MM_*前缀.命名约定的意义是什么?

asp-classic

2
推荐指数
1
解决办法
48
查看次数