RamBabuze
Messages postés3Date d'inscriptionvendredi 2 novembre 2007StatutMembreDernière intervention17 octobre 2009
-
20 déc. 2007 à 22:58
cs_EBArtSoft
Messages postés4525Date d'inscriptiondimanche 29 septembre 2002StatutModérateurDernière intervention22 avril 2019
-
20 déc. 2007 à 23:23
Bonjour à tous,
Voici le code que j'essaie de faire fonctionner:
Private Type PURCH_Record
Order as String * 6
Supplier as String * 6
Name as String * 30
TotalValue as String * 10
OrderedOn as String * 8
RequiredOn as String * 8
End Type
Dim sLine as String
Dim rPURCH as PURCH_Record
Open "C:\TEXT.txt" For Input As # 1
Line Input #1, sLine
sLine est un String qui contient les informations contenues dans PURCH_Record. Je veux faire l'assignation de sLine dans rPURCH. Un simple
rPURCH = sLine
ne fonctionne pas. J'ai essayé
Call CopyMemory(rPURCH, sLine, len(rPURCH))
mais sans succès. Je sais que je pourrais le faire champ par champ et en utilisant la fonction Mid, mais dans mon application, j'ai plusieurs records différents et plusieurs champs par record. Y a-t-il une meilleure façon de faire ça?