Génération d'un fichier Crystal Reports TTX à partir d'un ADODB.Recordset

Question

Existe-t-il un appel API pour Crystal Reports 8.5 qui génère un fichier de schéma TTX à partir d'un ADDB.Recordset VB6 lors de l'exécution, de la même manière que vous pouvez générer un XSD à partir de un DataSet dans .NET? Je pourrais rouler le mien, et je pense que je devrais probablement le faire, mais je ne veux pas réinventer la roue parce que j'ai manqué quelque chose d'évident.

Answer 1

J'ai bien peur que non. Mais un fichier TTX est un format assez simple - juste le nom du champ, le type, la longueur. Vous pouvez parcourir la collection Field du jeu d'enregistrements pour créer une chaîne des informations requises et l'enregistrer dans un fichier TTX. Je crains que je n'ai pas cristal ou VB6 à la main afin que je ne peux pas donner les détails exacts, mais quelque chose comme ça pseudocode:

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 

puis ajouter du code pour enregistrer cette chaîne comme TTX quelque part.