Storing a value from an input box for further use

[StevieB01]

I have created an inputbox for users to enter a string. How can I add this value to a query

 

[chrissie1]

What do you have so far.

Christiaan Baes
Belgium

"My old site" - Me

 

[StevieB01]

Chrisstiaan,

I have created a module that prompts the user to enter a date in a text format of "yyyymmdd" into an inputbox. the variable is declared as DIM as String.

This variable is then used as part of a file name and destination and is used to import a csv into access and create a table.

I also want that variable to be used to update a field in my table.

 

[chrissie1]

Sorry, I was asking for code.

Christiaan Baes
Belgium

"My old site" - Me

 

[onpnt]

wouldn't this be best served with a public property

>>the variable is declared as DIM as String

Global variables are bad form. You'll run into problems from the get go using them. Just a thought ;-)

_{____________ signature below ______________
The worst mistake you'll ever make is to do something simply the way you know how while ignoring the way it should be done}

 

[StevieB01]

Function Positions_History_Download()

On Error GoTo Error_Handler

Dim StaticFileName As String
Dim StrInput As String

DoCmd.SetWarnings False

DoCmd.OpenQuery "Trading_Positions_Delete_Qry", acViewNormal

DoCmd.SetWarnings True


StrInput = InputBox("Enter Required Business Date YYYYMMDD")

StaticFileName = "\\My_Server\FTP\history\Trading_Positions-" + StrInput + ".csv"

DoCmd.TransferText acImportDelim, "Trading_Positions_Import_Spec", "Trading_Positions_Tbl", StaticFileName


MsgBox "Download Complete"

Exit Function

Error_Handler: MsgBox "File Does Not Exist", vbCritical, "WARNING"

Exit Function


End Function

 

[chrissie1]

That is access code this is the vb.net forum. Please ask your question in one of the access forums.

Christiaan Baes
Belgium

"My old site" - Me