Give values to List Box using vba

[gstylianou]

Dear friends,


I have the forms “SKey” and “Key”. The first one (Skey) will be open if you run the Autoexec macro and remain open (on Hidden mode) till you close the database.
Attached of “SKey” form there are some unbounds fields which they have default values.

What I need to do:
1. Using the command button [cmdPID] I want to give value to [cboPID] as new RowSource line taking the value of the similar unbound field on “SKey” form.
2. After the above procedures I want: If you close the form (“Key” form) and re-open it again the [cboPID] to have as DefaultValue the first Row of its own list (which is the value taken before using the first procedure)

The Problem:
Using a very simple vba line code, I can give value to [cboPID] but the problem is when you close this form the [cboPID] field still without default value and is null.
What I’m trying to do, is to update a list boxes with new rows using a second form. Then after the update of the list it’s important to have default value the updated fields so to solve my problem.

Thanks in advanced and I will appreciated if anybody can help me. Dear friends,

[June7]

No tables in the db. None of the comboboxes have RowSource. Don't understand what you are trying to accomplish. What is purpose?

[gstylianou]

Trying to create a solution about Security Form with Login features but with embedded code into a form. Yes without tables because if you have tables anybody can take your passwords my friend... Believe me i'm very near to finish the solution and i promise to share it with all forum friend for future purposes...

Just a little bit more help...

[June7]

I still don't understand what you need.

There is no code for 'login', no passwords, no autoexec macro. What are we supposed to analyze?

[gstylianou]

The idea:

In one form (SKey) there are some unbound fields which they have your passwords as Default Values.
There is a code which can check about that each time when you open the db if your codes are Verified OK.!

Moreover, there is another form which can Lock the PC Serial Volume Number ON-Open the db. If the SVN is not same with the default value of the unbound [SVN1] the form ask you "if you want to register the PC" because the user has the option to Register 2 PC's. So, if you can follow the instruction regarding the registration of the new PC, we must 'SAVE" somewhere the new SVN..!! We don't want to save the new SVN in a temporary table because anybody can see and change the SVN by his/her own so.....bad lack..!

So, we must find a solution to save somewhere the new SVN, so each time when the user open the db, automatically the vba code start the "Registration Check Procedures"..! And finally after hundreds of hours searching for solution i found as a good idea the following:

1. We can put two ListBoxes in one form. The cboSVN1 and cboSVN2. Both are "Null" and working as ListBox without taking data from any tables.. (Anyway we don't have tables..)
2. When the db open and after the check - in registration procedures, if the SVN is not in your defaultsValues, the db asking you if you want to register the new PC. If so, using a simple procedures we can give this serial number (as a number) to cboSVN1 as a new RowSource.... Till now, everything under control..!! We have it..!!
3. But, the problem is that, we must find the way this new data given to cboSVN1 to be a DefaultValue so the next time when you close the db and open it again, the data to be there for the registration check-in procedures... THIS IS A PROBLEM... How..!!!!????

Your hand please...

[June7]

Only options:

1. store value in table

2. modify the form design to set combobox DefaultValue property

3. store value in an external text file

[gstylianou]

June7, give me instraction on how can store the data in external file and of caurse how this external file can be Hidden??

What you mean
modify the form design to set combobox DefaultValue property

[June7]

Code to write to text file. I don't know how to hide files in Windows Explorer. Set file permissions.
Bing: VBA read write text file
http://www.tek-tips.com/faqs.cfm?fid=3767
http://www.excel-easy.com/vba/exampl...text-file.html

Code can open an object in DesignView then modify properties and save the object.

[gstylianou]

Ok, lets say i create an external file.... Is it possible to search if the SVN persist into a text file using vba code?

[June7]

Code can open text file and read each line and look for a string match.

[gstylianou]

Looks like a good solution..! Can you please write an example of this code so to try it?

Thanks in advanced

[June7]

No, do not want to build for you. Examples should give you enough info. Search for more on web or in forum. Post your attempted code for analysis.