>><configuration> >> <connectionStrings> >> <add name="MyConnStr" connectionString="Provider=vfpoledb.1;Data Source=c:\MyDataBaseDir\;Collating Sequence=general" /> >> </connectionStrings> >></configuration> >>>>
>>// you need a using also: >>using System.Configuration >> >>string cConnection = ConfigurationManager.ConnectionStrings["MyConnStr"].ConnectionString; >>>>
>>> Public Sub ReadUsers() >>> Dim sql As String = "select * from users" >>> Dim connString As ConnectionStringSettings >>> >>> ' Create connection >>> Dim conn As Data.SqlClient.SqlConnection = New Data.SqlClient.SqlConnection(connString) >>> >>> >>> Try >>> ' Open connection >>> conn.Open() >>> >>> ' Create command >>> Dim cmd As Data.SqlClient.SqlCommand = New Data.SqlClient.SqlCommand(sql, conn) >>> >>> ' Create data reader >>> Dim rdr As Data.SqlClient.SqlDataReader = cmd.ExecuteReader() >>> >>> ' Loop through result set >>> While rdr.Read >>> Console.WriteLine("" & rdr(0)) >>> End While >>> ' Close data reader >>> rdr.Close() >>> Catch >>> MsgBox("Fail") >>> End Try >>> >>> End Sub >>>>>>Can you tell me how to define connString assuming the string is stored in webconfig as "MyConnStr" and is using VFPOLEDB?
>>>>Dim sql As String = "select contactname from customers >>>> >>>>' Create connection >>>>Dim conn As SqlConnection = New SqlConnection(connString) >>>> >>>>Try >>>> ' Open connection >>>> conn.Open() >>>> >>>> ' Create command >>>> Dim cmd As SqlCommand = New SqlCommand(sql, conn) >>>> >>>> ' Create data reader >>>> Dim rdr As SqlDataReader = cmd.ExecuteReader() >>>> >>>> ' Loop through result set >>>> While rdr.Read >>>> Console.WriteLine("" & rdr(0)) >>>> End While >>>> ' Close data reader >>>> rdr.Close() >>>> >>>>>>>>
>>>>><<pseudo code>> >>>>>dim oReader as Data.SQLClient.SQLDataReader = SqlDataSource1.DataReader >>>>> >>>>> While oReader.Read() >>>>> Console.WriteLine(String.Format("{0}, {1}", oReader(0), oReader(1))) >>>>> End While >>>>>>>>>>