<html><\/code><\/p>\n<head>
\n<meta HTTP-EQUIV=”Content-Type” CONTENT=”text\/html;charset=windows-1252″>
\n<title>MSDB CONTACTS<\/title>
\n<\/head><\/p>\n
<body>
\n<%
\nParam = Request.QueryString(“Param”)
\nData = Request.QueryString(“Data”)
\n‘
\n‘ Session (global) variable names used in this sample:
\n‘ MSDB_Conn = Used to store the open connection
\n‘ between successive calls to
\n‘ this page.
\n‘
\n‘ Local variable names used in this sample:
\n‘ Param = string value from the form used to call this
\n‘ page. Used to hold the name of the key to perform
\n‘ an optional lookup.
\n‘ Data = string value from the form used to call this
\n‘ page. Used to hold the value of the key for lookups.
\n‘ conn = object created from ADO.
\n‘ sql = string to hold the SQL Select statement.
\n‘ rs = object used to hold the result set of the
\n‘ SQL Select.
\n‘
\n%>
\n<%
\n‘
\n‘ This section checks to see if a connection has
\n‘ already been established.
\n‘ If it has, conn is assigned the old connection. If
\n‘ not, the connection object is created, assigned to
\n‘ conn, and the session vaiable created.
\n‘
\nIf IsObject(Session(“MSDB_conn”)) Then
\nSet conn = Session(“MSDB_conn”)
\nElse
\nSet conn = Server.CreateObject(“ADODB.Connection”)
\nconn.open “MSDB”
\nSet Session(“MSDB_conn”) = conn
\nEnd If<\/p>\n
%>
\n<%
\n‘
\n‘ Here we create the SELECT statement and optionaly
\n‘ add the criteria.
\n‘
\nsql = “SELECT * FROM CONTACTS”
\nIf cstr(Param) <> “” And cstr(Data) <> “” Then
\nsql = sql & ” WHERE ” & cstr(Param) & ” = ‘” & right(“000000″+trim(cstr(Data)),6) & “‘”
\nEnd If
\nSet rs = Server.CreateObject(“ADODB.Recordset”)
\nrs.Open sql, conn, 3, 3
\n%><\/p>\n
<table>
\n<caption>MSDB CONTACTS<\/caption>
\n<THEAD>
\n<tr>
\n<th><%=Server.HTMLEncode(rs.Fields(0).Name)%>
\n<\/th>
\n<th><%=Server.HTMLEncode(rs.Fields(1).Name)%>
\n<\/th>
\n<th><%=Server.HTMLEncode(rs.Fields(2).Name)%>
\n<\/th>
\n<th><%=Server.HTMLEncode(rs.Fields(3).Name)%>
\n<\/th>
\n<th><%=Server.HTMLEncode(rs.Fields(4).Name)%>
\n<\/th>
\n<th><%=Server.HTMLEncode(rs.Fields(5).Name)%>
\n<\/th>
\n<\/tr>
\n<\/THEAD>
\n<TBODY>
\n<%
\n‘
\n‘ For each record in the result set (rs) a row of
\n‘ the table is added.
\n‘
\nOn Error Resume Next
\nrs.MoveFirst
\ndo while Not rs.eof
\n%>
\n<tr VALIGN=”TOP”>
\n<td><%=Server.HTMLEncode(rs.Fields(0).Value)%>
\n<\/td>
\n<td><%=Server.HTMLEncode(rs.Fields(1).Value)%>
\n<\/td>
\n<td><%=Server.HTMLEncode(rs.Fields(2).Value)%>
\n<\/td>
\n<td><%=Server.HTMLEncode(rs.Fields(3).Value)%>
\n<\/td>
\n<td><%=Server.HTMLEncode(rs.Fields(4).Value)%>
\n<\/td>
\n<td><%=Server.HTMLEncode(rs.Fields(5).Value)%>
\n<\/td>
\n<\/tr>
\n<%
\nrs.MoveNext
\nloop
\n%>
\n<\/TBODY>
\n<TFOOT>
\n<tr>
\n<td colspan=”6″>SQL="<%=sql%>"<\/td>
\n<\/tr>
\n<\/TFOOT>
\n<\/table>
\n<\/body>
\n<\/html><\/p>\n","protected":false},"excerpt":{"rendered":"
The following is one example of using Minisoft’s ODBC driver to access HP e3000 Image files from any web browser. This example uses ADO objects to access the driver. The example consists of two files. The first is a form used to request data. The second is the ASP code used to retrieve data. Download […]<\/p>\n","protected":false},"author":75,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[54,63],"tags":[],"_links":{"self":[{"href":"https:\/\/c002.minisoft.com\/support\/wp-json\/wp\/v2\/posts\/2306"}],"collection":[{"href":"https:\/\/c002.minisoft.com\/support\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/c002.minisoft.com\/support\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/c002.minisoft.com\/support\/wp-json\/wp\/v2\/users\/75"}],"replies":[{"embeddable":true,"href":"https:\/\/c002.minisoft.com\/support\/wp-json\/wp\/v2\/comments?post=2306"}],"version-history":[{"count":4,"href":"https:\/\/c002.minisoft.com\/support\/wp-json\/wp\/v2\/posts\/2306\/revisions"}],"predecessor-version":[{"id":4504,"href":"https:\/\/c002.minisoft.com\/support\/wp-json\/wp\/v2\/posts\/2306\/revisions\/4504"}],"wp:attachment":[{"href":"https:\/\/c002.minisoft.com\/support\/wp-json\/wp\/v2\/media?parent=2306"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/c002.minisoft.com\/support\/wp-json\/wp\/v2\/categories?post=2306"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/c002.minisoft.com\/support\/wp-json\/wp\/v2\/tags?post=2306"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}