Obtener el valor de la propiedad DEFAULT desde ADOX

Carlos,

SQL Server ????

???? - 6.5, 7.0, 2000, 2005, 2008

Recuerda que se pueden usar expressiones para una restriccion default, por
lo que en esos casos tendras que evaluar la expresion para obtener el valor.

Si usas SS 2005 / 2008, chequea sys.default_constraints.

Ejemplo tomado de los BOL.

USE AdventureWorks
GO

SELECT d.definition FROM sys.default_constraints d
INNER JOIN sys.columns c
ON d.parent_column_id = c.column_id
WHERE d.parent_object_id = OBJECT_ID(N'HumanResources.Employee', N'U')
AND c.name = 'VacationHours';
GO


AMB

"CHAR72" wrote:

Hola! estoy intentando leer el valor de la propiedad DEFAULT de un campo de
una tabla desde mi aplicación vb6, pero cuando intento leerlo me da error,
busque sobre la cuestion en google y sugieren leer info desde SQL SERVER
pero quisiera poder hacerlo desde adox para hacerlo general en mi app.

Saludos y gracias

Carlos

Hola,

Este codigo te muestra las propiedades de los campos para una tabla en
particular, el codigo presupone una conexion previamente abierta contra la
base de datos, objeto CN.
Si queres las propiedades de una campo en particular reemplaza:

Set objRecordset = CN.OpenSchema(adSchemaColumns, Array(Empty, Empty,
MiTabla))

Por:

Set objRecordset = CN.OpenSchema(adSchemaColumns, Array(Empty, Empty,
MiTabla, MiCampo))



Dim sMsg As String
Dim objField As ADODB.Field
Dim objRecordset As ADODB.Recordset
Set objRecordset = CN.OpenSchema(adSchemaColumns, Array(Empty, Empty,
MiTabla))
Do While Not objRecordset.EOF
sMsg = ""
For Each objField In objRecordset.Fields
sMsg = sMsg & objField.Name & " = " & CStr("" & objField.Value) &
vbCrLf
Next
MsgBox sMsg
objRecordset.MoveNext
Loop
objRecordset.Close






Un Saludo, Víctor Koch



"CHAR72" <char72[nos pa m]@gmail.com> escribió en el mensaje
news:eE9X$

Hola! estoy intentando leer el valor de la propiedad DEFAULT de un campo
de una tabla desde mi aplicación vb6, pero cuando intento leerlo me da
error, busque sobre la cuestion en google y sugieren leer info desde SQL
SERVER pero quisiera poder hacerlo desde adox para hacerlo general en mi
app.

Saludos y gracias

Carlos