26/04/2009, 07:06
|
| | | Fecha de Ingreso: abril-2009
Mensajes: 136
Antigüedad: 15 años Puntos: 1 | |
| Respuesta: Ayuda con una programacion
Ok excelente me funciono bien gracias.. Ahora bien si me voy mas alla osea quiero colocar que eso me ejecute gustamente algo como esto hay manera...
Private Sub Command1_Click()
Dim vDatos() As String
Dim vSQL As String
Dim i As Integer
vDatos = Split(Text1.Text, vbNewLine)
For i = 0 To UBound(vDatos)
vSQL = vSQL & " " & vDatos(i)
Next i
rs.Open vSQL
End Sub
Gracias |