Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations gmmastros on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  1. Aivars

    html within combo box?

    Hi! The hyperlink support only controls of type acLabel, acImage, acCommandButton. But it's possible to solve it using label control. Example. Create a combobox named "Combo0", and label named "Label0" Set the folloving Combobox data: RowSourceType: Value List RowSource...
  2. Aivars

    Can I rename the table from the code?

    Hi! Here's code for DAO: dim dbs as database dim tdf as tabledef set dbs=currentdb set tdf=currentdb.tabledefs("MyTableName") tdf.name="NewNameOfMyTable" dbs.close set dbs=nothing Aivars
  3. Aivars

    How do you create a form scoll bar of field names allowing input?

    Hi! Your table contains too many fields for normally work with them. It would be good that you would split your huge table. Seeing that you're beginner you can use wizard: <Menu bar>;<Tools>;<Analyze>;<Table>. Follow wizard's recommendations... Then continue creating of forms. Aivars
  4. Aivars

    Time Function

    Private Sub Form_Timer() Me![CallTime] = DateDiff(&quot;n&quot;, StartTime, Time()) Me!lblClock.Caption = Format(Now, &quot;dddd, mmm d yyyy, hh:mm:ss AMPM&quot;) Me.Repaint End Sub Aivars [pipe]
  5. Aivars

    Loop through al possible strings

    Hi Gerard! Yor solution seems me too difficult for user. I proffer you other way if you want to allow user to change word places on string. Create on form an unbound list box (row source type=Value List); two text boxes - the first one related to table field, but other one - unbound; two...
  6. Aivars

    I am using &quot;microsoft access&quot; to ac

    Check box has value -1 if Yes same True and value 0 if No same False It is easy to relate it to Oracle field (type dec0) Aivars
  7. Aivars

    Cancelling the Save Event Procedure

    One of ways how to solve your problem is Boolean type variable using. You can confirm this variable value on update. Dim blnSave As Boolean Private Sub cmdSave_Click() 'Sub program of <Save button> blnSave = True DoCmd.RunCommand acCmdSaveRecord blnSave = False End Sub Private Sub...
  8. Aivars

    Allowing a user to insert an object - e.g picture

    Create an unbound frame box on form and add picture by using mouse right button. Of course you may create field (type Ole) for picture saving on your table before. Control source of unbound frame box must be this field. Aivars
  9. Aivars

    How do you create a form scoll bar of field names allowing input?

    Change property Tab Stop to No for needless fields or lock, or disable those fields on form. Aivars
  10. Aivars

    Returning a value from an Unbound Subform

    Hi! You do use wrong options on DoCmd. You try to put filter option on wrong place. stLinkCriteria =&quot;PropertyId=&quot; & [Me!QueryPropertySubform!PropertyId.Value] 'If type of field PropertyId is Text use delimiter ' on criteria string: [/color blue]stLinkCriteria...
  11. Aivars

    Calculated control does not allow user to cut (Cntl + V)

    Me.txtTextBox.ControlSource = &quot;&quot; You can put these code into any sub program such comand button click, form load etc. Aivars [pipe]
  12. Aivars

    Linked Table Location

    Hi Gus! There is sub program, which refreshes links: Sub RefreshLinks(strNewConnect As String, _ strOldConnect As String, _ Optional prbProgressBar As Control) 'This procedure refreshes linked table connections ' 'strOldConnect - Current connect string 'strNewConnect - connect string...
  13. Aivars

    Calculated control does not allow user to cut (Cntl + V)

    The calculated controls are not updatable. Aivars
  14. Aivars

    Run-time error 3021 problem

    if not rs.eof then rs.FindFirst &quot;[ID] = &quot; & Str(Me![cboDescription]) if not rs.nomatch then Me.Bookmark = rs.Bookmark else msgbox &quot;There is not found ...&quot; end if else msgbox &quot;There is not any record...&quot; end if Aivars
  15. Aivars

    Recordset MEMO copying mismatch error

    I really never have meet such problem. I always give expected results of recordsets updating (including MEMO fields). Try to print field values: rstTR_History.Edit debug.print rstTR!actTaken debug.print rstTR_History!actTaken rstTR_History!actTaken = rstTR!actTaken debug.print...
  16. Aivars

    Recordset MEMO copying mismatch error

    Some times recordset.RecordCount doesn't count the records. It's good if record set is populated before using RecordCount property rstTR_History.movelast rstTR_History.movefirst If rstTR_History.RecordCount > 0 Then Aivars
  17. Aivars

    set some fields in a table to null

    Those code you may put in sub program YourCommandButton_Click. This command updates text box txtPhoneNo on form. Accordingly current table field phonenumber (current shown phone No) will be updated if your form record source is set as query based on your table SITEDATA, and Control Cource of...
  18. Aivars

    Recordset MEMO copying mismatch error

    Sorry, Don! I mistook before during coying your codes: 'Copy memo field SOURCE to DESTINATION rstTR_History.Edit rstTR_History!actTaken = rstTR!actTaken rstTR_History.Update Aivars
  19. Aivars

    Parameter Arrays

    Split your huge table and create relations between those ones. It will easier to work with data after them. Aivars
  20. Aivars

    Run-Time Error3705

    Private Sub First_NameTxtbox_Afterupdate() SurnameTxtbox=DLookup(&quot;LastName&quot;,&quot;ManagerTable&quot;,&quot;First_Name = '&quot; & me.First_NameTxtbox & &quot;'&quot;) 'DoCmd.Close acTable,&quot;Manager&quot; Wrong command string because your table isn't opened, I think...

Part and Inventory Search

Back
Top