Código
Imports System.Data.SqlClient Imports System.Data Imports System.Configuration Partial Class _Default Inherits System.Web.UI.Page Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click Dim conexion As SqlConnection conexion = New SqlConnection(ConfigurationManager.AppSettings("conexionBD")) 'notese no le mando el string de conexión ya que está configirado en el web.config Try conexion.Open() 'está claro, abro la conexión Dim ds As DataSet = New DataSet() Dim da As SqlDataAdapter = New SqlDataAdapter("select * from Tabla1", conexion)'leo los datos de una tabla, ubicada en la base de datos definida en el web.comfig da.Fill(ds) ds.WriteXml(Server.MapPath("xml1.xml"))'escribo el xml conexion.Close() ' cierro la conexión conexion = Nothing ' por seguridad dejo con nada la variable conexion Catch ex As Exception Response.Write("malo") End Try End Sub End Class
y aqui dejo el web.config como es por default
Código
<configuration> <appSettings/> <connectionStrings/> <system.web> <compilation debug="true" strict="false" explicit="true"/> <pages> <namespaces> <clear/> <add namespace="System"/> <add namespace="System.Collections"/> <add namespace="System.Collections.Specialized"/> <add namespace="System.Configuration"/> <add namespace="System.Text"/> <add namespace="System.Text.RegularExpressions"/> <add namespace="System.Web"/> <add namespace="System.Web.Caching"/> <add namespace="System.Web.SessionState"/> <add namespace="System.Web.Security"/> <add namespace="System.Web.Profile"/> <add namespace="System.Web.UI"/> <add namespace="System.Web.UI.WebControls"/> <add namespace="System.Web.UI.WebControls.WebParts"/> <add namespace="System.Web.UI.HtmlControls"/> </namespaces> </pages> <authentication mode="Windows"/> </system.web> </configuration>
y aquí lo que se agrega al web config y donde
Código
<configuration> <appSettings> <add key="conexionBD" value="data source=HOGAR-520044AE2; initial catalog=Prueba; integrated security=true"/> </appSettings> <connectionStrings/> <system.web> <compilation debug="true" strict="false" explicit="true"/> <pages> <namespaces> <clear/> <add namespace="System"/> <add namespace="System.Collections"/> <add namespace="System.Collections.Specialized"/> <add namespace="System.Configuration"/> <add namespace="System.Text"/> <add namespace="System.Text.RegularExpressions"/> <add namespace="System.Web"/> <add namespace="System.Web.Caching"/> <add namespace="System.Web.SessionState"/> <add namespace="System.Web.Security"/> <add namespace="System.Web.Profile"/> <add namespace="System.Web.UI"/> <add namespace="System.Web.UI.WebControls"/> <add namespace="System.Web.UI.WebControls.WebParts"/> <add namespace="System.Web.UI.HtmlControls"/> </namespaces> </pages> <authentication mode="Windows"/> </system.web> </configuration>
esto es lo que se agrega
Código
<appSettings> <add key="conexionBD" value="data source=InstanciaSQLServer; initial catalog=Prueba; integrated security=true"/> </appSettings>
donde conexionBD es el nombre de la variable, data source la instancia de sql server donde se encuentra nuestra base de datos e initialcatalog es el nombre de la base de datos.
espero este claro