Genere un archivo TTX de Crystal Reports a partir de un ADODB.
-
06-07-2019 - |
Pregunta
¿Hay una llamada API para Crystal Reports 8.5 que generará un archivo de esquema TTX desde un ADODB VB6. Registro en tiempo de ejecución, de la misma manera que puede generar un XSD desde un DataSet en .NET? Podría rodar el mío, y creo que probablemente tenga que hacerlo, pero no quiero reinventar la rueda porque me perdí algo obvio.
Solución
Me temo que no. Pero un archivo TTX es un formato bastante simple: solo nombre de campo, tipo, longitud. Puede recorrer la colección Field del Recordset para crear una cadena de la información requerida y guardarla en un archivo TTX. Me temo que no tengo Crystal o VB6 a mano, así que no puedo dar detalles exactos, pero algo como este pseudocódigo:
Dim strTTX as String
Dim intI as Integer
With rst
For intI = 0 to .Fields.Count - 1
With .Fields(intI)
strTTX = .Name & vbTab & FieldTypeDesc(.Type)
If .Type = adChar Then
strTTX = strTTX & vbtab & .Length
End
strTTX = strTTX & vbCrLf
End With
Next
End With
strTTX = Left$(strTTX, Len(strTTX) - 1) 'remove trailing vbCrLf
luego agregue código para guardar esa cadena como TTX en algún lugar.