Search results

I am exporting all my tables with the folloiwng function: Public Function ExportAllTablesP(DBName As String, strPassword As String) As Boolean ' call it so : ExportAllTablesP "C:\be\be.mdb", "secret" Dim FrontDB As Database, BackDB As Database, Tbl As DAO.TableDef Set FrontDB = CurrentDb Set...

I am again having problems with these damned commas, they seem never to conform to my knowledge.I tried to convert the otherwise good and working update query into an sql but i got red colours showing that Access does not accept my commas.I tried with single commas ' or with double commas """"...

Will you help me built a union query ? I have 2 queries, qryinput and qryoutput.Out of these query i have a third query called qryDiff substracting these queries. However qryDiff does not show all the goods sold, only those goods that are substracted.Therefore i want to build an union query...

I want to include the the value lngMaxOrderID which isn't used in the second SQL string, so I am finding my Order DetailsTemp with records for many other OrderIDs. Therefore I tried to attach this value to the string, but then I get red letters which means that my sql is not right. Would yo...

I have to send a query in cvs format to my ;ogistics centre.With the help of the forum i succeeded to do it : DoCmd.TransferText acExportDelim, "qryDocExportSpecification", "QryDocs", "QryDocs.csv" My question is, can i email this directly ? The same as the sendobject command like ...

I have a code for converting into a cvs format: DoCmd.TransferText acExportDelim, "qryDocExportSpecification", "QryDocs", "QryDocs.csv" However, the file i get at the end in MyDocuments is an excel file and not a word norepad file. Why is i so and how could i correct this situaion ?

I am at a loss why i cant save the todays date.On my form i have a control called LastUpdated.It is set to day/time and to a short date.I want to save the present date by the following: Me!LastUpdated = Now RunCommand acCmdSaveRecord DoCmd.Close acForm, Me.Name However the field lastUpdated...

In my form i have to declare seceral times the following expression: Dim OfficeBranch As Control Set OfficeBranch = Me.Controls("Branch" & (Me.Parent.office - 1)) Can i make the above expression to be valid for all the functions in the form, and thus avoid declaring it in each case?

Subsequently i have found out the following. it is the If IsNull that does not work , However if i write If Me!Brancho = 0 then it works. Whys is it so ? If Me!branch0 = 0 Then 'If IsNull(Me!branch0) Then Me!cartons.Enabled = False End If

I want to lock a control in the subform but i cannot do it.Even though the control brancho is Null, the control cartons is not locked.Can you help me ? Private Sub Form_BeforeUpdate(Cancel As Integer) If IsNull(Me!branch0) Then Me!cartons.Locked = True End If End Sub

But why do i then get the mesage invalid object ? Public Function DeleteTables() Dim dbs As DAO.Database Dim i As Integer Set dbs = CurrentDb ' Loop backwards through relations For i = dbs.Relations.Count - 1 To 0 Step -1 dbs.Relations.Delete dbs.Relations(i).Name Next i ' Loop backwards...

Thank you for the reply.I get the message "unqualified or invalid reference" : Dim dbs As DAO.Database Dim i As Integer Set dbs = CurrentDb ' Loop backwards through relations For i = dbs.Relations.Count - 1 To 0 Step -1 dbs.Relations.Delete dbs.Relations(i).Name Next i ' Loop backwards through...

I have a function that deletes all the tables in the database.However i do not want to delete the tables TblSpecial1 and TblSpecial2.How can i rewrite the code ? Public Function DeleteTables() Dim dbs As DAO.Database Dim i As Integer Set dbs = CurrentDb ' Loop backwards through relations For i...

Thank you to you all ! Now my code works awsome and i am very grateful to you indeed !!!!!!!!!!!!!

Please do not be angry with me I am confused and do not know how to handle it.On the basis of the first query I need to delete from table1 all the rows which do not correspond to the figure received with the query.In my case this is the figure 2 since it occurs three times, and I must delete the...

Thank you for your reply.I am afraid i cannot write down very clear what i want.Please do apologize me. I will try again.So my table consists of : ID PLATES 1 2 2 4 3 6 4 2 5 2 With the help of the query suggested by Brianrock i have found out that the greatest occurence has the number 2.I want...

I want to build a query with which to find the greatest number of figures in the field.I have a field called Plates where single numbers are entered.For example Visits Plates John 3 Jim 3 Deuce 3 Liza 3 Lenny 1 Lorry 6 Obvisouly in the above...

Indexed.Yes (Duplicates OK). In my code for remote control i wanted to remove the property Indexed of a field, but i receive the date type conversion error.How can i change these properties by code ? At the end of the list of the properties of the field,just below Required, it is written...

Can somebody help me build an option button in a toolbar ? I mean a button with dropped down 2 possibilities needed to build a code.I can build a single button with the code shown below.i will be grateful if someone could help me built an option button with the same code. Sub ToolbarCustomers()...

With my command DoCmd.ShowToolbar "Toolbar1", acToolbarYes i make my toolbar Toolbar1 visible.I want at the same time make all other toolbars on the screen invisible,regardless how they are called.Sometimes i have different toolbars shown and i...