Ver Mensaje Individual
  #9 (permalink)  
Antiguo 28/03/2009, 18:57
fiorella3247
 
Fecha de Ingreso: febrero-2009
Mensajes: 101
Antigüedad: 15 años, 3 meses
Puntos: 0
Respuesta: Instruccion substring de mysql

Pssss... no me habia fijado que delante del proximo_codigo estaba el "AS" ... Sorry... pero aun asi me sigue mostrando el error cuando hago la asignacion al Txt1

Código:
Sub IncrementarIdDepartamento(Rs As ADODB.Recordset, Txt1 As Object)
Set Rs = Conexion.Execute("SELECT CONCAT('DPTO-',(MAX(CAST(SUBSTRING(`tabla_departamento`.`id_departamento`,6) AS UNSIGNED))+1)) FROM `tabla_departamento` WHERE `tabla_departamento`.`id_departamento` LIKE 'DPTO-%'")
Txt1.Text = Rs!id_departamento 'aca se detiene 
End Sub