Search results

  1. A

    Button and rs.FindFirst

    Hi, Where i am making a mistake??? Code: Private Sub btn1_Click() Dim dbCode As DAO.Database Dim rstCode As DAO.Recordset Set dbCode = CurrentDb Set rstCode = dbCode.OpenRecordset("tblCode") Dim strCheck As String strCheck = Me.MainID.Value With rstCode .FindFirst "[MainID]=" & strCheck...
  2. A

    Button Visible

    Hi, I have a form(frmMain) which contain unbound buttons. btn1, btn2, btn3, btn4, btn5, btn6, btn7, btn8, btn9, btn10 The form controls are: CodeID, number Code1, number Code2, number Each Code1 and Code2 contains numbers from 1-10... tblCode CodeId_,_Code1_,_Code2_ __1____,___4___,___8___...
  3. A

    Total's Query

    Hi, I have a table : tblIncome - IncomeID : key, autonumber - DateIncome : date, format dd/mm/yyyy - Income : number I want to create a query that will look like this the result: Month1, Month2, ..., Month12, Year 1200 ***, 1500 ***, ..., 1350 *****, 2009 1400 ***, 1250 ***, ..., 1700 *****...
  4. A

    DoCmd.OpenForm and WhereCondition

    Hi, I have a form(frmMain) with no controls. All empty. Inside the form, i have a sub form(frmSub). I am trying to open from another form(frmCustomers) the frmMain... Easy part... The hard one is to open with a WhereCondition for the frmSub according to the previous form. I want to doubleclik...
  5. A

    Image - details

    i have a couple of images in my form. i want to move mouse over and a ballon to show me a message. something like when you debug code and it show details. thxs
  6. A

    Language

    is it possible to place a code on start up form to check which language (keyboard) is the default? And to change it to the one i want. thxs
  7. A

    Appointment

    hi i want to make an appointment form and to look like this.
  8. A

    Form set focus

    i have a db with many forms. i want to set focus or better always on top the last open form example: the forms are open like this mainform 2form 3form 4form i want to set focus or always on top 4form if 4form close the next form is 3form if 3form...
  9. A

    Disable Keys

    hi i want to make a module which it will run when my db start and it will disable some keys . I want to disble them as long my db is open. i read some post and found code: Select Case KeyCode Case vbKeyF1 KeyCode = "" Case vbKeyF2 KeyCode = ""...
  10. A

    Image Button

    i have an imageframe and 4 buttons. 1)ZoomIn = works fine 2)ZoomOut = works fine 3)Best fit = i tried DoCmd.SizeMode = acOLESizeZoom but nothing 4)Original size of the image = it is the same as above thxs
  11. A

    qtr and open form

    hi i have a continious form with the fields year || Qtr 1 || Qtr 2 || Qtr3 | etc.. || Qtr12 ---------------------------------------------------------- 2000 4 5 2 6 2001 3 3 6 2 2002 6 4 3...
  12. A

    Mid and combo box

    hi i have a continious form with a combobox and the data has the format customer John customer Peter customer Mary customer Nick i want to hide the word "customer " after i make my choice i tried something in the after update me.cmbbox = mid(me.cmbbox, 8) but it delete my choice any help!!!
  13. A

    Web Browser Buttons

    Happy New Year i have a form with a web browser control and 3 buttons. cmdBack = move back code: me.cmdBack.GoBack cmdTop = go at the top of the page code: ??? cmdSearch = search inside the page, if you press ctr+F a search window is pop-up. i want to press the button instead ctr+F. code...
  14. A

    Need help - Print all db

    hi please help . i don't know how to do it. i have db and i want to make a printable version have i look at a sample db below which is the same the one i use. i want to print order by customers(Customers)ID, something, general. the general tab as you will see has 3 subforms. thxs
  15. A

    Load code faster

    hi i have a form with 12 checkbox and 1 combobox i use the following code Option Compare Database Private Sub Form_Current() If Me.Image1 = -1 Then Me.Parent.Image1.Visible = True Me.Image1_text.FontBold = True Else Me.Parent.Image1.Visible = False...
  16. A

    Deleting oldest file

    Problem code: Option Compare Database Option Explicit Function Backup() Dim fso As FileSystemObject Dim sSourcePath As String Dim sSourceFile As String Dim sBackUpPath As String Dim sBackUpFile As String Dim strSQL As String sSourcePath = Application.CurrentProject.Path sSourceFile =...
  17. A

    Image problem

    hi i have a form with the fields PhotoID PhotoName PHotoPath PhotoDate PhotoSize ImageFrame my Imageframe is showing the image image format .jpg and size 200kb each Problem when i click next record , my mouse is flashing and my db is freezing for 2sec. I have place a code by www.mvps.org...
  18. A

    Load my DB from ram

    Load my DB from ram -------------------------------------------------------------------------------- hi i have read that it is possible to upload my db in ram memory and open it from there. When i finished my work to save it at a external drive. How can i do this ? or where to read ? or...
  19. A

    image error '2114'

    hi i have a form with the fields frmPhoto PhotoID PhotoDate PhotoName PhotoPath PhotoSize and a button [AddButton] to add image Download my db and click add button you will get error 2114 what is wrong?? *the image format is .jpeg
  20. A

    Image Form

    I have a form with the fields frmPhoto PhotoID PhotoDate PhotoName PhotoPath PhotoSize and a button [AddButton] to add image i manage to make a code work but bring me the path with the name. how to make it work and fill all my fields??? PhotoID PhotoDate====>Is day added in the form , no...
Back
Top Bottom