Ver Mensaje Individual
  #2 (permalink)  
Antiguo 21/07/2010, 11:02
Avatar de Darkavender
Darkavender
 
Fecha de Ingreso: septiembre-2008
Ubicación: SLV
Mensajes: 125
Antigüedad: 15 años, 8 meses
Puntos: 4
Respuesta: Pasar datos de Excel a SQL Server 2008

Para la version de excel 2007 es
Código vb:
Ver original
  1. Excel 12.0


No se tu estructura completa pero en mi caso lo hago asi...

1- Setear la conexion que se usara, dependiendo de la version de office instalada en el equipo

Código vb:
Ver original
  1. strconn = "Provider=Microsoft.ACE.OLEDB.12.0; data source= " & VariableConPath & ";Extended properties=""Excel 12.0;hdr=yes;imex=1"""

2- Hago el select respectivo y lo adiciono a un DataGrid de ahi hago el insert el la base de datos, claro que en tu caso debes acoplar el codigo para tus fines.

Código vb:
Ver original
  1. Try
  2.             Dim MConnExcel As New OleDbConnection(strconn)
  3.             Dim ad As New OleDbDataAdapter("Select * from [" & HojaExcel & "$]", MConnExcel)
  4.             MConnExcel.Open()
  5.             ad.Fill(dt)
  6.             MConnExcel.Close()
  7.            
  8.             Me.DataGridView1.DataSource = dt
  9.  
  10. Catch ex As OleDbException
  11.             MessageBox.Show(ex.Message)
  12. End Try

Saludos Ojala te sirva