I apologize in advance for the bad translation
HELLO BOYS ARE NEW IN THE FORUM
I AM TRYING TO MAKE A PLAN FOR THE MANAGEMENT OF PERSONAL DATA AND SINCE THE FIRST ARE WEAPONS STO FILE.TXT INSTEAD OF USING THE DATABASE SQL
MY PROBLEM IS WHEN ORDERING AN FILE.TXT WHERE THERE ARE CARICATTI The Structured DATA OF A PERSON IN THIS WAY:
Public Structure Cliente
<VBFixedString(4)> Dim ID As Integer
<VBFixedString(6)> Dim Importo As String
<VBFixedString(30)> Dim Nome As String
<VBFixedString(30)> Dim Cognome As String
Dim Born As Date
<VBFixedString(30)> Dim Location As String
<VBFixedString(30)> Dim Province As String
<VBFixedString(16)> Dim CodFisc As String
<VBFixedString(30)> Dim Indirizzo As String
<VBFixedString(30)> Dim Provincia As String
<VBFixedString(5)> Dim CAP As String
<VBFixedString(30)> Dim Citta As String
<VBFixedString(2)> Dim Maggiorenne As String
<VBFixedString(30)> Dim Genitore As String
<VBFixedString(7)> Dim Abbonamento As String
<VBFixedString(19)> Dim Attivita As String
Dim Inizio As Date
Dim Termine As Date
<VBFixedString(30)> Dim Email As String
<VBFixedString(15)> Dim Cell As String
<VBFixedString(1000)> Dim Note As String
End Structure
Public Persona as Cliente
NOW I WANT TO ORDER IN ALPHABETICAL ORDER YOUR DETAILS IN THIS FILE CREATED IN THIS WAY
Sub Aprifile()
numFile = FreeFile()
FileOpen(Numfile, "Clienti.txt", OpenMode.Random, OpenAccess.ReadWrite, , Len(Persona))
End Sub
CAN YOU PLEASE HELP ME WITH A CODE THAT ARE TOO HEAVY AS THE METHOD "quicksort" I CAN NOT UNDERSTAND HOW TO USE :confused:.
PS = Please explain in the code you can use variable names that I put in here thanks :)
HELLO BOYS ARE NEW IN THE FORUM
I AM TRYING TO MAKE A PLAN FOR THE MANAGEMENT OF PERSONAL DATA AND SINCE THE FIRST ARE WEAPONS STO FILE.TXT INSTEAD OF USING THE DATABASE SQL
MY PROBLEM IS WHEN ORDERING AN FILE.TXT WHERE THERE ARE CARICATTI The Structured DATA OF A PERSON IN THIS WAY:
Public Structure Cliente
<VBFixedString(4)> Dim ID As Integer
<VBFixedString(6)> Dim Importo As String
<VBFixedString(30)> Dim Nome As String
<VBFixedString(30)> Dim Cognome As String
Dim Born As Date
<VBFixedString(30)> Dim Location As String
<VBFixedString(30)> Dim Province As String
<VBFixedString(16)> Dim CodFisc As String
<VBFixedString(30)> Dim Indirizzo As String
<VBFixedString(30)> Dim Provincia As String
<VBFixedString(5)> Dim CAP As String
<VBFixedString(30)> Dim Citta As String
<VBFixedString(2)> Dim Maggiorenne As String
<VBFixedString(30)> Dim Genitore As String
<VBFixedString(7)> Dim Abbonamento As String
<VBFixedString(19)> Dim Attivita As String
Dim Inizio As Date
Dim Termine As Date
<VBFixedString(30)> Dim Email As String
<VBFixedString(15)> Dim Cell As String
<VBFixedString(1000)> Dim Note As String
End Structure
Public Persona as Cliente
NOW I WANT TO ORDER IN ALPHABETICAL ORDER YOUR DETAILS IN THIS FILE CREATED IN THIS WAY
Sub Aprifile()
numFile = FreeFile()
FileOpen(Numfile, "Clienti.txt", OpenMode.Random, OpenAccess.ReadWrite, , Len(Persona))
End Sub
CAN YOU PLEASE HELP ME WITH A CODE THAT ARE TOO HEAVY AS THE METHOD "quicksort" I CAN NOT UNDERSTAND HOW TO USE :confused:.
PS = Please explain in the code you can use variable names that I put in here thanks :)