ABCHola ¿Es tu primera visita?
Registro
Mostrando resultados 1 de 8 de un total de 8
  1. #1
    Intermitente
    Fecha de registro:
    26 de enero de 2009
    Mensajes:
    34
    Dispositivo móvil:
    psion teklogix
    Sistema operativo:
    Windows Mobile 2003

    Copiar Datos de .sdf a .mdf

    Que tal, estuy investigando hace dias pero no he dado con la solucion, tengo un codigo, pero solo logro rescatar el primer dato de la tabla, podrian ayudarme, agregandole lo que falta, porfa, debe ser un while, pero no recuerdo como ponerlo y ademas, los ejemplos no son muy claros, este es el codigo que ingresa en la bd mdf, los datos de la sdf:

    Dim conCe AsNew Data.SqlServerCe.SqlCeConnection

    Dim ds1 AsNew System.Data.DataSet
    Dim da1 As SqlServerCe.SqlCeDataAdapter
    Dim cod, aact, area, dact, drea, codusu AsInteger
    Dim fecha AsDate
    Dim cmdsettings AsNew SqlClient.SqlCommand
    conCe.ConnectionString =
    "Data Source = c:\prueba\sicam.sdf"
    conPc.ConnectionString = "Initial Catalog=sicam_local; Data Source=localhost;Integrated Security=SSPI;"
    conCe.Open()
    conPc.Open()
    Dim sqll AsString = "SELECT * FROM medn3"
    da1 = New SqlServerCe.SqlCeDataAdapter(sqll, conCe)
    da1.Fill(ds1,
    "medn3")
    Dim dt1 As DataTable = ds1.Tables(0)
    Dim dr1 As DataRow = dt1.Rows(0)

    cod = dr1(
    "mn3_nv3_cod")
    aact = dr1(
    "mn3_aact")
    area = dr1(
    "mn3_area")
    dact = dr1(
    "mn3_dact")
    drea = dr1(
    "mn3_drea")
    fecha = dr1(
    "mn3_fec")
    codusu = dr1(
    "mn3_usu")
    conectar()
    tabb =
    New SqlClient.SqlCommand("insert into medn3(mn3_nv3_cod,mn3_aact,mn3_area,mn3_dact, mn3_drea, mn3_fec, mn3_usu)" & _
    "values(@Cod,@aact,@area,@dact, @drea, @fecha, @codusu)", conPc)
    dadap.InsertCommand = tabb
    dadap.InsertCommand.Parameters.Add(
    New SqlClient.SqlParameter("@Cod", SqlDbType.Int))
    dadap.InsertCommand.Parameters.Add(
    New SqlClient.SqlParameter("@aact", SqlDbType.Int))
    dadap.InsertCommand.Parameters.Add(
    New SqlClient.SqlParameter("@area", SqlDbType.Int))
    dadap.InsertCommand.Parameters.Add(
    New SqlClient.SqlParameter("@dact", SqlDbType.Int))
    dadap.InsertCommand.Parameters.Add(
    New SqlClient.SqlParameter("@drea", SqlDbType.Int))
    dadap.InsertCommand.Parameters.Add(
    New SqlClient.SqlParameter("@fecha", SqlDbType.DateTime))
    dadap.InsertCommand.Parameters.Add(
    New SqlClient.SqlParameter("@codusu", SqlDbType.Int))
    dadap.InsertCommand.Parameters(
    "@Cod").Value = cod
    dadap.InsertCommand.Parameters(
    "@aact").Value = aact
    dadap.InsertCommand.Parameters(
    "@area").Value = area
    dadap.InsertCommand.Parameters(
    "@dact").Value = dact
    dadap.InsertCommand.Parameters(
    "@drea").Value = drea
    dadap.InsertCommand.Parameters(
    "@fecha").Value = fecha
    dadap.InsertCommand.Parameters(
    "@codusu").Value = codusu

    dadap.InsertCommand.ExecuteNonQuery()
    conPc.Close()
    MsgBox(
    "Archivo sincronizado correctamente")

  2. #2
    Infinito Avatar de jarogo
    Fecha de registro:
    16 de octubre de 2006
    Desde:
    Galicia - España
    Mensajes:
    2.388
    Dispositivo móvil:
    Impresionante emulador
    Sistema operativo:
    No tengo nada

    Por defecto

    Hola!

    pues efectivamente, con un while lo solucionas:

    Código:
    Dim dr1 As DataRow
    
    For Each dr1 in dt1.Rows
        'aqui la sentencia que tienes
    Next
    Saludos!
    -Estas gorda, ehh!!!
    -Si, como una tapia...

  3. #3
    Intermitente
    Fecha de registro:
    26 de enero de 2009
    Mensajes:
    34
    Dispositivo móvil:
    psion teklogix
    Sistema operativo:
    Windows Mobile 2003

    Por defecto

    muchas gracias compadre jarogo, justo lo que necesitaba, ahora estoy pasando los datos de la pocket, ufff, a veces pienso en el momento cuando empece con esto, nunca me imagine que llegaria a esta altura, gracias compadre, haz sido de mucha ayuda, chao compadre.

  4. #4
    Infinito Avatar de jarogo
    Fecha de registro:
    16 de octubre de 2006
    Desde:
    Galicia - España
    Mensajes:
    2.388
    Dispositivo móvil:
    Impresionante emulador
    Sistema operativo:
    No tengo nada

    Por defecto

    De nada, compadre!

    para eso estamos...
    -Estas gorda, ehh!!!
    -Si, como una tapia...

  5. #5
    Iniciante
    Fecha de registro:
    21 de marzo de 2009
    Mensajes:
    1
    Dispositivo móvil:
    Ninguno
    Sistema operativo:
    No tengo ni idea

    Por defecto

    Hola amigos, tengo un problem, no tengo equipo y si bien corro la emulación cuando ejecuto la aplicación y tener mi base sdf en el c: nose como emular que efectivamente esa base está dentro de "la pocket". Bueno espero me ayuden. SALUDOS

  6. #6
    Infinito Avatar de jarogo
    Fecha de registro:
    16 de octubre de 2006
    Desde:
    Galicia - España
    Mensajes:
    2.388
    Dispositivo móvil:
    Impresionante emulador
    Sistema operativo:
    No tengo nada

    Por defecto

    Hola, fernandez_prog!

    si agregas la base de datos al proyecto, tienes una opción en sus propiedades para que te la copie al emulador.

    Un saludo!
    -Estas gorda, ehh!!!
    -Si, como una tapia...

  7. #7
    Iniciante
    Fecha de registro:
    30 de septiembre de 2010
    Mensajes:
    3
    Dispositivo móvil:
    pocket pc
    Sistema operativo:
    Otro

    Por defecto porfavor necesito ayuda....

    Cita textual Publicado originalmente por arathorng Ver mensaje
    Que tal, estuy investigando hace dias pero no he dado con la solucion, tengo un codigo, pero solo logro rescatar el primer dato de la tabla, podrian ayudarme, agregandole lo que falta, porfa, debe ser un while, pero no recuerdo como ponerlo y ademas, los ejemplos no son muy claros, este es el codigo que ingresa en la bd mdf, los datos de la sdf:

    Dim conCe AsNew Data.SqlServerCe.SqlCeConnection

    Dim ds1 AsNew System.Data.DataSet
    Dim da1 As SqlServerCe.SqlCeDataAdapter
    Dim cod, aact, area, dact, drea, codusu AsInteger
    Dim fecha AsDate
    Dim cmdsettings AsNew SqlClient.SqlCommand
    conCe.ConnectionString = "Data Source = c:\prueba\sicam.sdf"
    conPc.ConnectionString = "Initial Catalog=sicam_local; Data Source=localhost;Integrated Security=SSPI;"
    conCe.Open()
    conPc.Open()
    Dim sqll AsString = "SELECT * FROM medn3"
    da1 = New SqlServerCe.SqlCeDataAdapter(sqll, conCe)
    da1.Fill(ds1, "medn3")
    Dim dt1 As DataTable = ds1.Tables(0)
    Dim dr1 As DataRow = dt1.Rows(0)

    cod = dr1("mn3_nv3_cod")
    aact = dr1("mn3_aact")
    area = dr1("mn3_area")
    dact = dr1("mn3_dact")
    drea = dr1("mn3_drea")
    fecha = dr1("mn3_fec")
    codusu = dr1("mn3_usu")
    conectar()
    tabb = New SqlClient.SqlCommand("insert into medn3(mn3_nv3_cod,mn3_aact,mn3_area,mn3_dact, mn3_drea, mn3_fec, mn3_usu)" & _
    "values(@Cod,@aact,@area,@dact, @drea, @fecha, @codusu)", conPc)
    dadap.InsertCommand = tabb
    dadap.InsertCommand.Parameters.Add(New SqlClient.SqlParameter("@Cod", SqlDbType.Int))
    dadap.InsertCommand.Parameters.Add(New SqlClient.SqlParameter("@aact", SqlDbType.Int))
    dadap.InsertCommand.Parameters.Add(New SqlClient.SqlParameter("@area", SqlDbType.Int))
    dadap.InsertCommand.Parameters.Add(New SqlClient.SqlParameter("@dact", SqlDbType.Int))
    dadap.InsertCommand.Parameters.Add(New SqlClient.SqlParameter("@drea", SqlDbType.Int))
    dadap.InsertCommand.Parameters.Add(New SqlClient.SqlParameter("@fecha", SqlDbType.DateTime))
    dadap.InsertCommand.Parameters.Add(New SqlClient.SqlParameter("@codusu", SqlDbType.Int))
    dadap.InsertCommand.Parameters("@Cod").Value = cod
    dadap.InsertCommand.Parameters("@aact").Value = aact
    dadap.InsertCommand.Parameters("@area").Value = area
    dadap.InsertCommand.Parameters("@dact").Value = dact
    dadap.InsertCommand.Parameters("@drea").Value = drea
    dadap.InsertCommand.Parameters("@fecha").Value = fecha
    dadap.InsertCommand.Parameters("@codusu").Value = codusu

    dadap.InsertCommand.ExecuteNonQuery()
    conPc.Close()
    MsgBox("Archivo sincronizado correctamente")
    ******************************************
    **************************************
    ==como le ase para pasar los datos de un .sdf a .mdf ......tu creas la base de datos local...si es posible sera queme puedas mandar algo de codigo.....o explicarmelo...me urge porfavor...

  8. #8
    Iniciante
    Fecha de registro:
    30 de septiembre de 2010
    Mensajes:
    3
    Dispositivo móvil:
    pocket pc
    Sistema operativo:
    Otro

    Por defecto

    arathorng...ayudame porfavor necesito pasar lo datos de una base de datos .sdf a una .mdf...no entiendo bien el codigo que tienes subido por que no esta completo...sy me lo puedes mandar a mi correo victor_a137@hotmail.com. o si lo puedes sibir aca para que lo entienda y pueda acerlo ..


 

Información del tema

Users Browsing this Thread

Hay actualmente 1 usuarios viendo este tema. (0 usuarios registrados y 1 usuarios sin registrar)

Temas similares que te pueden interesar

  1. Copiar Datos...!!
    Por Yohan en el foro Programación en Windows Mobile
    Respuestas: 1
    Último mensaje: 03 de marzo de 2008, 18:57
  2. Copiar Datos Del Ordenador Al Pocket Pc
    Por YAMILET en el foro Otros
    Respuestas: 0
    Último mensaje: 18 de octubre de 2007, 11:07
  3. Copiar los datos de mi mio A701
    Por AlexR1 en el foro Otros
    Respuestas: 1
    Último mensaje: 26 de septiembre de 2006, 14:25
  4. copiar datos en memoria sd
    Por plint en el foro Software de navegación en carretera y PNA
    Respuestas: 1
    Último mensaje: 30 de diciembre de 2005, 01:21
  5. Copiar datos en tarjeta memoria
    Por mguerrerop en el foro Software Windows Mobile (Todas las marcas)
    Respuestas: 5
    Último mensaje: 07 de septiembre de 2004, 02:30

Comparte este hilo en:

Comparte este hilo en:

Pautas del foro

  • No puedes publicar nuevos temas
  • No puedes publicar respuestas
  • No puedes publicar ficheros adjuntos
  • No puedes editar tus mensajes
  •  
Twitter Facebook You Tube RSS