ASP.NET SQL Connection to UniData

   Dim objU2Conn as Object
   Dim objRst1 as Object

   Dim ss as String
   Dim vID as String
   Dim vFirstName as String
   Dim vLastName as String

   objU2Conn = Server.CreateObject("ADODB.Connection")
   objU2Conn.Open ("DSN=DSN_Name;Uid=User_ID;Pwd=password")
   objRst1   = Server.CreateObject("ADODB.Recordset")

   ss = "select * from The_File "
   objRst1.Open (ss, objU2Conn)

   while Not objRst1.EOF

      vID        = objRst1.Fields("ID").Value
      vFirstName = objRst1.Fields("CCC_FIRSTNAME").Value
      vLastName  = objRst1.Fields("CCC_LASTNAME").Value

      objRst1.MoveNext

   end while

1
Hosted by www.Geocities.ws