esto es lo que hago en todas mis paginas web para establecer la cadena de copnexion.
Public Class WebForm1
Inherits System.Web.UI.Page
Dim cn As New OdbcConnection("UID=hsac;PWD=hsac;DRIVER={Microsof t Odbc for Oracle};SERVER=INTRANET_192.168.201.14;")
lo que quiero hacer es leerla desde un archivo de texto llamado cnn.txt trate de hacerlo asi pero no funciona.
Public Class WebForm1
Inherits System.Web.UI.Page
Dim FileItem As New FileInfo(Server.MapPath("cnn.txt"))
Dim r As StreamReader = FileItem.OpenText()
Dim cadena = r.ReadToEnd
Dim cn As New OdbcConnection(cadena)
espero puedan ayudarme.