标签: asp-classic

我有两对纬度/经度，想找到它们之间的距离。我一直坚持在这个特定网站上使用经典 ASP。

我发现了大量使用半正矢方程的代码示例，但在 ASP 中却没有（ASP 缺乏该功能ACos，并且没有pi内置功能！我最终得到了一些代码，但经过仔细测试，它被证明是有缺陷的。我对球面的理解几何还不够好，所以请谁能告诉一下他们以前是否在 ASP 中做过这个？！谢谢。

我在 3 台不同的服务器上注册了一个 DLL，一台是开发服务器，两台是生产服务器。这篇文章帮助在服务器上注册它。

不，我们正在尝试将该站点放在第二个生产服务器上，以便我们可以对其进行负载平衡。在开发和生产服务器之一上，我可以创建我的对象并很好地利用它。在第二个生产服务器上，它给了我：

Microsoft JScript 运行时错误“800a01ad”
自动化服务器无法创建对象
/code/FileSystem.asp，第 459 行

本例中的第 459 行是：

var oFSO = Server.CreateObject("Hydro.Comm.FileSystem");

两台生产服务器都是 Windows Server 2008，并安装了最新补丁。我很困惑为什么第二个服务器没有正确注册这个 DLL。

我们按照以下步骤在每台服务器上注册 DLL：

• 我们需要安装 .net Framework 4 的 Windows sdk http://www.microsoft.com/download/en/confirmation.aspx?id=8279

• 然后我们需要将程序集添加到 GAC 中：

  C:\Program Files\Microsoft SDKs\Windows\v7.1\Bin\NETFX 4.0 Tools>gacutil /i 
  C:\Windows\Microsoft.NET\Framework\v4.0.30319\HydroComFileSystem.dll
  

  Run Code Online (Sandbox Code Playgroud)

• 然后我们需要使用 regasm 注册程序集：

  regasm /tlb HydroComFileSystem.dll
  

  Run Code Online (Sandbox Code Playgroud)

感谢您的关注。

构建 Excel 电子表格是一个经典的 asp 应用程序。现在的问题是，其中一列被 Excel 自动格式化为数字，而实际上它应该是文本，因此它删除了老板想要保留的前导零。我已经完成了一些网络搜索，您应该能够在字符串中预先附加一个撇号，强制 excel 将其显示为文本：

If isNumeric(val) Then
response.write "'" & val
Else
response.write val
End If

太棒了，但是 Excel 现在显示这些列时带有前导撇号！从我读到的内容来看，前导撇号应该被隐藏，并且只能被 Excel 用作格式，我做错了什么？

谢谢。

我有一个经典的 ASP 页面，它调用外部 Web 服务。实际过程是这样的：

'[Part0 : Call the external webservice]
wsResponse = setConfirmation(...)


' [PART1: external webservice is responding]    
if not wsResponse is Nothing then
 '....Process the response from the webservice according to wsResponse
  code =wsResponse.getCode
  if code = 'C' then
     'We confirm the transaction and call a storedprocedure in SqlServer
  else
    'if code is different from C, we assume, the transaction status is 'not confirmed' or 'cancelled'

 '[PART2: no answer from external webservice] 
Else 
  'so wsReponse is nothing..We …

我需要知道ASP或ASP.Net对注册表单进行SQL注入攻击的过程吗？

有没有办法像Ajax一样实时更新ASP页面？

在我的ASP页面中，我编写了如下代码来检查日期验证

<%
'Session 1
session.lcid=2057
Session("CheckIn")= "26/12/2009"
d=0
response.write session("CheckIn")&"----"&DateAdd("d",d,Session("CheckIn")) &"<br/>"

if session("CheckIn")= DateAdd("d",d,Session("CheckIn")) then
response.write "Session 1 is workings"
end if

'Session 2
a ="26/12/2009"
b ="26/12/2009"
if a=b then
response.write "Session 2 is workings"
end if
%>

在会话1中， “如果”条件不起作用。但是，如果我在会话2中以字符串格式写日期，则“ IF”条件有效。

如何在我的经典ASP页面的会话1中检查“ IF”条件

希望您的回应，

SQL:

dim sql
sSql = "SELECT * FROM [dbo].[table] WHERE [sent] = 1 and datesent between '" & dStartDate & "' and '"  & dFinishDate & "'"
response.write(sSql)
set oRs = oConn.execute(sSql)       

当我在sql server 2008中执行此sql时,它工作正常.但是,当我在我的应用程序中执行它时,我得到错误:

Microsoft OLE DB Provider for SQL Server error '80040e07'

The conversion of a char data type to a datetime data type resulted
in an out-of-range datetime value.

我在应用程序中有什么不同的东西吗？谢谢

我使用以下代码尝试从我的代码文件中查找包含在另一个目录中的文件.

Set fi=fs.OpenTextFile(Server.MapPath("~/counter/counter.txt"), 1)

我也试过了.

Set fi=fs.OpenTextFile(Server.MapPath("./root/folder1/counter/counter.txt"), 1)

在任何一种情况下,这应该让我回到counter.txt文件.从我的理解〜/向上移动1个目录和./移动到根目录.

但是两次都收到错误,说明使用了无效字符.删除这些时,我得到一个不同的错误,说找不到路径(我希望这是因为它不是一个有效的路径而没有移动1个目录).

在VBscript中执行以下操作的有效字符是什么:向上移动一个目录？移动到根目录？

谢谢您的帮助

我试图为传统的经典ASP应用程序带来一些理智,作为其中的一部分,我正在尝试为我创建的一些JScript类编写Fluent API.

例如 myClass().doSomething().doSomethingElse()

这里概述了这个概念(在VBScript中)

这是我的示例JScript类:

var myClass = function () {
    this.value = '';
}

myClass.prototype = function () {

    var doSomething = function (a) {
        this.value += a;
        return this;
    },

    doSomethingElse = function (a, b) {
        this.value += (a + b);
        return this;
    },

    print = function () {
        Response.Write('Result is: ' + this.value + "<br/>");
    }

    return {
        doSomething: doSomething,
        doSomethingElse: doSomethingElse,
        print: print
    }; …