Как получить значения столбца в VBScript

Question

Я хочу получить значения столбцов (логин, пароль) из моей таблицы базы данных mysql в vbscript. Как я могу это сделать? У меня нет опыта работы с VBScript, и я должен сделать это как часть моего проекта. Мне удалось подключиться к таблице базы данных Mysql, но я не знаю, как получить значения этих столбцов (оба в varchar) в vbscript. Я много искал в гугле, но мне не помогли. Может ли кто-нибудь помочь мне?

Answer 1

Ответ на этот вопрос поможет мне добраться туда, где вам нужно быть Подключиться к базе данных mysql 5.0 с использованием чистого vbscript?

Answer 2

Вот пример в ASP, он должен привести вас туда, куда вам нужно. Обратите внимание, что это дает вам отключенный набор записей, который является предпочтительным способом, так как он освобождает соединение db обратно в пул как можно быстрее:

<%@Language="VBScript"%>
<!-- Include file for VBScript ADO Constants -->
<!--#include File="adovbs.inc"-->
<%
    ' Connection string.
    strCon = "Provider=sqloledb;Data Source=myServer;Initial Catalog=Northwind;User Id=myUser;Password=myPassword"

    ' Create the required ADO objects.
    Set conn = Server.CreateObject("ADODB.Connection")
    Set rs = Server.CreateObject("ADODB.recordset")

    ' Open the connection.
    conn.Open strCon

    ' Retrieve some records.
    strSQL = "Select * from Shippers"
    rs.CursorLocation = adUseClient
    rs.Open strSQL, conn, adOpenStatic, adLockOptimistic

    ' Disconnect the recordset.
    Set rs.ActiveConnection = Nothing

    ' Release the connection.
    conn.Close

    ' Check the status of the connection.
    Response.Write("<BR> Connection.State = " & conn.State)

    Set conn = Nothing

    ' Use the diconnected recordset here.
    Response.Write("Column1")
    Response.Write("Column2")

    ' Release the recordset.
    rs.Close
    Set rs = Nothing
%>

Вы можете получить полное содержание adovbs.inc здесь .