Search results

Can this be done from visual basic incidently?

condition = null if mytxt1 = "Yes" then condition = condition & " AND col1 = 'Yes'" end if if mytxt2 = "Yes" then condition = condition & " AND col2 = 'Yes'" end if etc.... select * from table where isnull(primarykeyfield) = FALSE " & condition We know that every primary key field will not...

99/99/9999;0;" " Thats one I copied of a databse. I also think just 99/99/9999 will do fine

Its a good little example. The problem is, I want to create a database for others to use. ie: Create a database, and give it to them, but I dont want them to gain access to any forms or tables. How is this possible? In other words, to make myself more clearer: I want to give an organisation...

Well I didnt know that, but in my defence: In the Italian langauge, if you have many female children it is Bambine If you have many male children it is Bambini But if you have a mixture, you still use Bambini So "guys" for all males "girls" for all females "Guys" for a mixture... What...

What about SomeField = Left(Replace((CCur([MyField]) - CInt([MyField])) & 0, "0.", ""), 2) 10.123 (CCur([MyField]) - CInt([MyField])) & 0 = 0.1230 Replace((CCur([MyField]) - CInt([MyField])) & 0, "0.", "") = 123 Left(Replace((CCur([MyField] & 0) - CInt([MyField])) & 0, "0.", ""), 2) = 12...

Thanks guys

When you open a form, go to design view, right click on a control, and click properties, you see and edit box thing. With this edit box, you can do all sorts of damage, such as changing VB code, or resizing controls. How can I turn this off using VB? I have disabled right click, but here is a...

My database was approx 12MB (or 12.5MB) After I went through and commented my 20,000 lines of code, it is now 13MB I decided to put the comments on the side of the code, and deleted alot of blank lines, and it is still 13MB. What makes the file size? The content, or the length?

There are many ways you can do this. Have a staff table, and in it have a dob field as a date. Then using the Form's onload code Currentdate = Format(Now, "dd") & " " & Format(Now, "mmmm") & " " & Format(Now, "yyyy") checkbday = dlookup("name", "staff", "dob = #" & currentdate & "#") If...

Thank you... But if it is an unbound textbox?

Thank you very much. I might try the first two. But.... By length I didnt mean character length. I meant as in: If I set the length to be 5cm, when the user types in it, they cant type more than 5cm worth of characters. Normally as you type beyond the length of the text box, you can still...

I dont know what its called so I didnt know what to search for. Basically, I have resized a text box. I dont want the user to type beyond that length. What do I turn on or off to prevent this?

I use a graph in access, and I just change the graph in visual basic. I have 4 or 5 controls such as drop down lists and option boxes, and then I run the graph depending on what is selected. It is a bar chart. And the only problem is Sales might be yellow But if you add an extra label, Sales...

I got some code from this forum. I cant find the post though Sub SendOverdueEmail() Dim db As Database Dim rst As DAO.Recordset Set db = CurrentDb Set rst = db.OpenRecordset("qryOverdue") rst.MoveFirst Do Until rst.EOF DoCmd.SendObject acSendNoObject, , ...

Thanks very much. I actually found an "on apply filter" event. So I just set the code for that as DoCmd.CancelEvent Which seems to work. But thank you very much for the link, and I will no doubt benefit from it

On the menu, under records, there is an option called remove filter/sort. I dont want staff to be able to access this. Infact, I want to be able to toggle on/off all menus with the click of a button. How do I do this? If myOption = True 'Turn menu on Else 'Turn menu off Please help

This is what I do. I have a null string. For every option checked, I add to the string the criteria. Then I open the report which either has criteria, or a null string. The problem is that the first criteria is simply stated where as the rest of the criteria is "AND ....". To overcome this if...

Yes, but how would you like that string to be displayed? And what would you like to do with it? I did heavily edit this from some code I had, so sorry if there are any mistakes DivString = Null 'The string that holds the text Do While 1 = 1 'If the DivString is not empty, we check for...

You need to be alot clearer in what you are trying to ask. If you are talking about fields in the same table. In the afterupdate (of the field), you could just do myField1 = myField2 (rightclick field, go to properties, go to afterupdate, and run the visual basic editor)