1 Κάντε κλικ στο κουμπί " Έναρξη", " Όλα τα προγράμματα " και " Visual FoxPro " για να ανοίξετε το FoxPro . Κάντε κλικ στο κουμπί " Νέα " και "Project " για να δημιουργήσετε ένα νέο έργο ΠΕΕ ονομάζεται " conversion.pjx " . Καθορίστε μια τοποθεσία για τα αρχεία του έργου 2
Ορίστε την ακόλουθη τάξη μέσω του κωδικού : .
DEFINE Υπάλληλος CLASS AS Session OLEPUBLICcStartPath = " "
Η
3
Issue " SET" εντολές κατάλληλες για " COM " servers και να σώσει τη διαδρομή εκκίνησης του διακομιστή :
ΔΙΑΔΙΚΑΣΙΑ INITSET ΠΟΡΩΝ OFFSET EXCLUSIVE OFFThis.cStartPath = ADDBS ( JUSTPATH ( Application.ServerName ) ) SET Ο ΔΡΟΜΟΣ ΓΙΑ ΤΗΝ ( This.cStartPath ) ENDPROC
Η
4 Ορίστε μια κατηγορία που ονομάζεται " Υπάλληλοι " από την κατηγορία συνεδρίας Visual FoxPro μέσω κωδικός :
ΔΙΑΔΙΚΑΣΙΑ GetAllEmployees ( Ν) String ? HELPSTRING " επιστρέφει μια συμβολοσειρά XML που περιέχει όλους τους εργαζόμενους "LOCAL lcXMLSELECT * FROM Υπάλληλοι σΕ ΔΡΟΜΕΑ EmployeeCURSORTOXML ( " Υπάλληλος " , " lcXML " , 0 , 0 , 0 , " 1 " ) ΧΡΗΣΙΜΟΠΟΙΕΙΤΕ ΣΕ EmployeeRETURN lcXMLENDPROC
5
Κάντε κλικ στο " Υπεύθυνος Έργου " και "Build " για να ξεκινήσει τις επιλογές μεταγλώττισης . Επιλέξτε : "Multi -threaded " Ο διακομιστής COM ( dll ) . Κάντε κλικ στο " OK" για την κατασκευή του διακομιστή COM . Το αρχείο " convesion.dll " θα δημιουργηθεί από αυτή τη διαδικασία δημιουργίας .
Η
6 Κάντε κλικ στο κουμπί " Έναρξη", " Όλα τα προγράμματα " και " Visual Basic " για να δημιουργήσετε μια νέα εφαρμογή Visual Basic.NET . Κάντε κλικ στο " Form1.vb " στην Εξερεύνηση λύση .
Η 7
Κάντε κλικ στο " Αναφορές" για την Εξερεύνηση λύση . Επιλέξτε " Προσθήκη αναφορές . " Επιλέξτε την καρτέλα " COM " και βρείτε τον κατάλογο που περιέχει νεοσυσταθείσα διακομιστή COM σας . Επιλέξτε το " conversion.dll " . Κάντε κλικ στο " OK" για να προσθέσετε το διακομιστή COM . Μπορείτε να δείτε το " conversion.dll " προστίθεται στις αναφορές . Μπορείτε τώρα να χρησιμοποιήσετε το COM στο Visual Basic σας έργου .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα