ASP 3.0声明ADO常量w/out包括ADOVBS.inc

ASP*_*Wee 3 asp-classic

我使用ASP3.0/VBScript编写了一个简单的表单处理程序脚本,并希望将输入的数据(通过Web)添加到位于我服务器上的Access数据库中.我正在使用OLEDB方法进行连接:

Cst = "PROVIDER=Microsoft.Jet.OLEDB.4.0;" & _
"DATA SOURCE=" & Server.MapPath("DataBase.mdb")

Dim Conn
Set Conn = CreateObject("ADODB.Connection")
Conn.Mode = 3

Conn.Open Cst

Blah Blah Blah...
Run Code Online (Sandbox Code Playgroud)

我目前在顶部有一个名为ADOVBS.inc的文件,但我想放弃它,因为我觉得它效率低,浪费.我想定义常数,因为我需要它们 - 但我不知道如何.我需要定义哪些ADO常量以及在哪里?我正在使用的这本书基本上说"忘了那本书 - 包括那些400左右的鼻屎,不要问愚蠢的问题!"

任何具体的例子/帮助将不胜感激.

谢谢,

Dee*_*Dee 9

你有几个选择可供选择.您可以在页面中(或在global.asa文件中)引用元数据库

<!--
   METADATA    
   TYPE="TypeLib"    
   NAME="Microsoft ActiveX Data Objects 2.5 Library"    
   UUID="{00000205-0000-0010-8000-00AA006D2EA4}"    
   VERSION="2.5"
-->
Run Code Online (Sandbox Code Playgroud)

要么

您只需将adovbs文件中的一些常量复制到页面中即可满足您的需求.例如

Const adCmdText = 1      'Evaluate as a textual definition    
Const adCmdStoredProc = 4 'Evaluate as a stored procedure
Run Code Online (Sandbox Code Playgroud)