Japskunk72
Programmer
I want to be able to change the number of objects i have in an array based on how many fields i have in a table.
Module TBLInfo
Public PaStructTBLBackup(TBLBackupLocAMT) As structTBLBackLoc
Public Sub LoadDB()
Dim Amt As Integer
Dim X As Integer
DBConnect.Connect("Select * from TBLBackuploc")
Amt = RS.RecordCount
tblbackuplocAMT = AMT
For X = 1 To AMT
With PaStructTBLBackup(X)
.BackupLoc = RS.Fields "BackupToloc").Value
.FileName = RS.Fields("Filename").Value
End With
RS.MoveNext()
Next
RS.Close()
end sub
Public Structure structTBLBacloc
Dim BackLoc As String
Dim FileName As String
End Structure
End Module
is there a way to publicly declair an array and beable to change the array size durring the program?
Thanks
JT
Module TBLInfo
Public PaStructTBLBackup(TBLBackupLocAMT) As structTBLBackLoc
Public Sub LoadDB()
Dim Amt As Integer
Dim X As Integer
DBConnect.Connect("Select * from TBLBackuploc")
Amt = RS.RecordCount
tblbackuplocAMT = AMT
For X = 1 To AMT
With PaStructTBLBackup(X)
.BackupLoc = RS.Fields "BackupToloc").Value
.FileName = RS.Fields("Filename").Value
End With
RS.MoveNext()
Next
RS.Close()
end sub
Public Structure structTBLBacloc
Dim BackLoc As String
Dim FileName As String
End Structure
End Module
is there a way to publicly declair an array and beable to change the array size durring the program?
Thanks
JT