Search results

You're welcome If someone has helped you, please add to their reputation by clicking on the icon above that looks like the scales. Thanks :)

You must have more than 1 column in your combo box. Try using: Forms!YourForm!ComboBox.Column(1) (Whatever column the data is in 0, 1, 2, etc.)

This is something I put in my database to help a little more with securing my backend data. My front end I made into an mde. I placed a password on the backend mdb file and run a splash screen on startup to "on the fly" link up to the tables. I delete all linked tables when the database frontend...

Yes, DSum does run slow! You didn't say, is your database split with a backend (Data tables) and front end (GUI)? I've been running a table holding time information that normally holds 200,000 records. Needless to say I've ran into performance issues with it. Frontend/Backend (For reports?)...

I know you can bind a dynamic recordset on a form but I don't think you can in a report. I ran across this somewhere else on the internet. (udf) They said you had to bind the recordset by its "Name" property. Hope this helps. Private qdf As DAO.QueryDef Private rs As DAO.Recordset Private...

set recordset If the string is already being passed, then you should be able to use the same string to retrieve the data. Like, if the query string were call strSQl. Example: Hope you understand! Private Sub Report_Open(Cancel As Integer) Dim strSQl As String, rst As Recordset strSQl =...

You should be able to type in 10, hit enter, and it will enter the .00

module Here are the basics. Make a new module and paste the code into it. When you want to convert the number to text simply call the module from your form like $5.50. I'll use a msgbox to get the string.. msgbox(English(5.50)) For a report textbox, the control source would be like...

That runtime error usually means "There are too few parameters" which I think is because of the SQL strings. Simply having tbl_IndexedWord_Not_Used isn't telling it what field to look in for the data. You need to add the .FIELDNAME (change the bold part of the SQL statement below to whatever...

Name of Field? You noticed that FIELDNAME is supposed to be whatever field the word is located in you are looking for? What is the field name?

DLookup Looking through your code, I would actually use a dlookup. Alot less code. I hate opening recordsets if there is no need to do it. Like: 'Split text into array from description problem textbox strArray = Split(DescProblem) For x = 0 To UBound(strArray) 'Change strArray to UPPERCASE...

The query string is wrong Aren't you missing a semicolon there on the end? ( strSQL = "SELECT * FROM tbl_IndexedWord_Not_Used WHERE tbl_IndexedWord_Not_Used = '" & UCaseWord & "'") k, let me edit my comment.... Define the field your looking for as well. strSQl = "SELECT * from...

I don't know of a way without associated controls BUT: I've done this by: Making an unbound Textbox Textbox width to 0 Special Effect to flat Border and Background to transparent Tab Stop to 'no' Disable The Textbox. This hides the textbox and lets the label open for whatever.

Previous install? The only hunch I have at this point, is Office was previously on this machine while it was not installed on the others. Let me know your findings.

Sounds like Office was previously installed on the computer. Look in Add/Remove programs to see if it is there. (If Office is installed, you might be able to do a "repair" to fix the issue.) Do a google on removing previous installations of Office. Just a hunch!

May need just a little more info. Maybe: Dim strSQl as String strSQl = "UPDATE tblMyTable.Cost ='" & strCostValue & "' WHERE tblMyTable.PrimaryKey ='" & strPrimary & "';" docmd.runsql strSQl Is field cost currency? Is the Primary key a string? If so, use Ccur(strCostValue) might be required.

The only problem with using round instead of defining it in the table is you will always have to use round in code statements. I've always used: Field Size: Single Format: Number Decimal Places: 2 This has always worked for me.

Did you try Round()? Like dsum(Round(the DSum Statement),1)

Also DoCmd.RunSQL ("update callinfo set status = 'Closed' where callinfo.id = Combo1.column(0);") You have to change that query: DoCmd.RunSQL("Update callinfo set status = 'Closed' WHERE callinfo.id = " & Me.Combo1.column(0) & ";") (As long as ID is a number and not a string) If it is a...

References It sounds like you're not getting the value. Do a msgbox stop until you see the value appear. Like: What is the name of your combobox? msgbox(Me!ComboNameHere) stop DoCmd.RunSQL ("update callinfo set status = 'Closed' where callinfo.id = Combo1.column(0);")