DoCmd.RunSQL using data from InputBox

[brianrr23]

I am having an issue with running DoCmd.RunSQL using the data entered in an InputBox. Here is my code.

Dim strSqlPrevWeek As String

strSqlPrevWeek = "DELETE FROM PrevWeek " _
& "WHERE [PrevWeek].[Admit Term] = '" & strInputTerm & "' ;"

strInputTerm = InputBox("Enter the Term:")

DoCmd.RunSQL strSqlPrevWeek

This runs with no errors, but does not delete the records specified.

Thanks.

 

[pbaldy]

You have to have the InputBox first. The variable has no value when you use it.

 

[brianrr23]

Ahhh. That worked perfectly. Thanks for your help!

 

[namliam]

Please see: http://www.access-programmers.co.uk/forums/showthread.php?t=225837&highlight=Name+convention

Is admit term a text field? or a number or date?
If a text field, are there any spaces that may be problems?
if a date, try ...Admit Term] = #" & strInputTerm & "# ;" also make sure your strinputterm is in US format MM/DD/YYYY
If a number, try ...Admit Term] = " & strInputTerm & ";"

 

[namliam]

You have to have the InputBox first. The variable has no value when you use it.

Completely overlooked that 10 times too :banghead:

 

[pbaldy]

Happy to help!