les comento mi problema
decidi meterme con el asunto de los web services en flash y para mi gusto logre crear 2 flash que interactuan con web services, despues realize un web service y lo probe con flash, cosa que resulto, solo que ahora diseñe un web service que consulta una base de datos de sql y obtiene un dataset el cual regresa despues, pero lo malo es que no encuentro forma, de que flash pueda entender el dataset y lo convierta en items para un datagrid, les agradeceria mucho me ayudaran con el problema les dejo el codigo de web service o archivo.asmx
<%@ WebService Language="VB" Class="Conexion" %>
'importamos las bibliotecas
Imports System
Imports System.Data
Imports System.Data.SqlClient
Imports System.Web.Services
'creamos una nueva clase
Public Class Conexion :Inherits WebService
'creamos una nueva funcion
<WebMethod()> Public Function Conectar() As DataSet
'nos conectamos a la base de datos
Dim ConexionSql As SqlConnection= New SqlConnection("server=192.168.0.22;uid=sa;pwd=sa;database=northwind;")
'abrimos la conexion de la base de datso
ConexionSql.Open()
'creamos la cadena con la consulta
Dim consulta As String
consulta="SELECT * FROM Categories "
'creamos un nuevo objeto data adapter
Dim adaptador As SqlDataAdapter= new SqlDataAdapter(consulta,ConexionSql)
'creamos un nuevo data set o forma de ver los datos
Dim ds As DataSet = new DataSet
'agreagmos al dataset el nombre de nuestra tabla
ds.tables.add("Categories")
'agregamos al adaptador los datos de la tabla
adaptador.Fill(ds,"Categories")
'creamos una nuieva cadena que sera a su vez un array y que tendra como limite el nuemro de arreglos de nuestra tabla
Dim resultados(ds.tables("Categories").rows.count-1) As String
'creamos un limite
Dim limite as Integer
'lo inicializamos en 0
limite=0
'hacemos un for each para agregar cada nuevo valor que encontremos a nuestro nuevo arreglo
For each dr As dataRow in ds.tables("Categories").rows
'agregamos el valor a resultados con su correspondiente indice, tomando en cuenta que "cstr" convierte de numero a cadena el valor
resultados(limite)=" id de la categoria: "&cstr(dr("CategoryID"))&" categoria: "&dr("CategoryName")&" descripcion: "&dr("Description")
'incrementamos el indice
limite+=1
Next
'regresamos los resultados
'cerramos la conexion
ConexionSql.Close()
Return (ds)
End Function
End Class
y por ultimo les digo que lo unico que pongo en el fla es un webconnector enlazado con el webservice desde localhost ,un datagrid y un dataset
gracias de antemano por sus respuestas, mientras seguire investigando
Atentamente
Miguel Angel Sánchez López
