Within the following:
where does one establish the role for the DB contact? (Eg, “SET ROLE FS IDENTIFIED BY FS_APPLROL.”)Code:Dim cn As OleDbConnection = _ New OleDbConnection("Provider=MSDAORA.1;" & _ "Password=IaM123;User ID=Able;" & _ "Data Source=DBWorld") Dim da As OleDbDataAdapter Dim ds As New DataSet da = New OleDbDataAdapter("SELECT NUM, REV, ID " & _ "FROM FS " & _ "WHERE NUM = '22'", _ cn) cn.Open() da.Fill(ds, "Sheets")