% Dim Conn, dbPath dbPath = "D:\inetpub\wwwroot\bongologic\fpdb\afic_up.mdb" Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & dbPath Set Session("_conn") = conn %> <% sqlArtDetails = "SELECT * FROM t_Articles Where Article_ID = "& Request.QueryString("ArtID")&"" Set rsArtDetails = Server.CreateObject("ADODB.Recordset") rsArtDetails.Open sqlArtDetails, conn, 3, 3 %>
![]() |
|
|
|
|
Copyright © 2004 Asian Food Information Centre (AFIC) |