Ver datos de una base de datos .

juanjosealarcon · #1 (**permalink**) 29/04/2003, 08:58

.. parece una tonteria, pero no me sale.

Tengo esto :

<%@ Page Language="VB" Debug="true" %>
<script runat="server">

Sub Page_Load(Sender As Object, E As EventArgs)

Dim oSQLConn As SqlConnection = New SqlConnection()
oSQLConn.ConnectionString = "Data Source=localhost;UID=sa;PWD=;DATABASE=comicvia;"
oSQLConn.Open()

Dim strSelect as string
Dim ver As sqlDataAdapter
Dim a as string

strSelect = "Select * autores"
ver = new sqldataadapter (strSelect, oSQLConn)
'a = ver.fields("nombre")

End Sub

</script>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.SqlClient" %>
<html>
<head>
</head>
<body>
<form runat="server">
<asp:Button id="Button1" runat="server" Text="Button"></asp:Button>
</form>
</body>
</html>

Pero me falla, ahora mismo asi funciona bien, sin ningun problem, pero esto falla :

a = ver.fields("nombre")

Necesito para poder seguir haciendo pruebas poder darle a una variable el valor de un campo de sql ...

¿Que hago mal?. ¿Que esta mal?.

Venga un saludo .

RootK · #2 (**permalink**) 29/04/2003, 16:13

Hola... si estas utilizando un dataAdapter, te falta llenar tu data set para que puedas leer los datos, porque por lo visto.. declaras un dataadapter.. abres tu conexion (aunque si estas trabajando con un dataset puedes accesar a los datos de manera desconectada)... mira.. puedes hacer algo como esto:

Código:

Dim DS As DataSet
        Dim MyConnection As SqlConnection
        Dim MyCommand As SqlDataAdapter

        MyConnection = New SqlConnection("tu cadena de conexio")
        MyCommand = New SqlDataAdapter("select * from Autores", MyConnection)

        DS = new DataSet() 
       MyCommand.Fill(ds, "Autores")
DS.Tables("Autores").Rows(0)("tu_campo"))

y despues de esto a traves de un dataset puedes manipular o accesar a los campos que necesites..

aunque en este caso te convendría mas usar un datareader.. y accesar algo como esto:

Dim myCMD As SqlCommand = New SqlCommand("select * from autores,SqlCon)
Dim dr2 As SqlDataReader = myCMD.ExecuteReader()
dr2.Read()
a = dr2("nombre") dr2.Close()
SqlCon.Close()

Saludos y espero te sirva...