Juntar dos campos en uno
Publicado por Gabriel (2 intervenciones) el 16/04/2007 14:38:11
Hola amigos: Me pueden ayudar con esto, estoy queriendo juntar dos campos en la columna de una grilla con sql pero me aparece un error cuando lo ejecuto. Cuando la hago solo de normalmente la consulta funciona, pero cuando intento juntar dos campos en uno aparece el problema. No sé si realmente + ' ' + sirva para concatenar campos. Este es el código...
Private rsDatos As ADODB.Recordset
Private txtSQL As String
Private Sub Form_Load()
If Entorno.Conexion.State <> adStateOpen Then
Entorno.Conexion.Open
End If
txtSQL = "select Nombre + ' ' + descripcion as DEFINICION from diccionario"
Set rsDatos = Entorno.Conexion.Execute(txtSQL)
If rsDatos.RecordCount = 0 Then (aquí es donde aparece el error <conversion error from string "">)
Set Me.DataGrid1.DataSource = rsDatos
With Me.DataGrid1.Columns
.Item(0).Caption = "DESCRIPCIÓN"
.Item(0).Alignment = dbgCenter
.Item(0).Width = 4500
End With
End If
End Sub
Agradezco de antemano su colaboración...
Private rsDatos As ADODB.Recordset
Private txtSQL As String
Private Sub Form_Load()
If Entorno.Conexion.State <> adStateOpen Then
Entorno.Conexion.Open
End If
txtSQL = "select Nombre + ' ' + descripcion as DEFINICION from diccionario"
Set rsDatos = Entorno.Conexion.Execute(txtSQL)
If rsDatos.RecordCount = 0 Then (aquí es donde aparece el error <conversion error from string "">)
Set Me.DataGrid1.DataSource = rsDatos
With Me.DataGrid1.Columns
.Item(0).Caption = "DESCRIPCIÓN"
.Item(0).Alignment = dbgCenter
.Item(0).Width = 4500
End With
End If
End Sub
Agradezco de antemano su colaboración...
Valora esta pregunta


0