Salut à tous,
j'essai de recupérer mes données (pdb) sur mon pda vers un fichier texte sur pc.
je crée un conduit. mais le problème est que je ne recupère que la 1ere information de chaque record.
Exemple: Dans le PDA, je crée une base de données avec les records ayant la structure suivante:
typedef struct {
char id[40];
char idc[10];
char TypeNote[3];
char TypeNote_Nom[30];
char DateNote[50];
char HeureNote[50];
char CreatNom[20];
char Text[10000];
} DBRecordNote;
cependant qd je lance mon conduit pour récupérer tous les champs, je ne récupère que le 1er champ (en l'occurence : char id).
voici mon code du conduit en VB. Merci de votre aide
Dim pUtil As New PDUtility
Dim DbQuery As New PDDatabaseQuery
Dim Adapter As PDRecordAdapter
' Open the database
Set Adapter = DbQuery.OpenRecordDatabase("NoteDB", "PDDirect.PDRecordAdapter", eRead Or eWrite)
Dim UniqueId As Variant
Dim Index As Long
Dim Category As Long
Dim Attributes As ERecordAttributes
Dim Data As Variant
Dim s As String
' Reset the iteration index
Adapter.IterationIndex = 0
Read the first record
Data = Adapter.ReadNext(Index, UniqueId, Category, _
Attributes)
Dim t As Long
t = pUtil.ByteArrayToBSTR(Data, 0, 40, s)
MsgBox s
Data = Adapter.ReadNext(Index, UniqueId, Category, _
Attributes)
t = pUtil.ByteArrayToBSTR(Data, 0, 10, s)
MsgBox s
Data = Adapter.ReadNext(Index, UniqueId, Category, _
Attributes)
t = pUtil.ByteArrayToBSTR(Data, 0, 3, s)
MsgBox s
Data = Adapter.ReadNext(Index, UniqueId, Category, _
Attributes)
t = pUtil.ByteArrayToBSTR(Data, 0, 30, s)
MsgBox s