Recent content by Taruz

Hi again Ken.. ;) Dim stDocName As String Dim strSQL As String Dim trz as string trz= InputBox("country??") stDocName = "company_find_bareboat_operators_spain" strSQL = "SELECT * FROM company INNER JOIN areas ON company.[record#] = areas.[areas#] " _ & "WHERE areas.country= '" & trz & "'"...

Hi.. ;) Try this..: SELECT * FROM company INNER JOIN areas ON company.[record#] = areas.[areas#] WHERE areas.country= 'Spain'

Hi yammers4 ;) Compare these two players to the query..: select MatchDate ,Team ,PlayerFirstName ,PlayerLastName ,OurScore ,OppositionScore from test where PlayerFirstName=[Enter 1 Player Name] or PlayerFirstName=[Enter 2 Player Name] order by PlayerLastName

Hi again.. ;) See the image ..:

Hi.. ;) Put onopen part of the form..: Sendkeys "{pgup}" .

Hi.. ;) Try this..: Dim ctrl As Control For Each ctrl In Me.Controls If ctrl.ControlType = acTextBox and ctrl.name <> "SFSID" Then If IsNull(ctrl) Then MsgBox ctrl.Name & " Cannot Be Left Empty!" Cancel = True ctrl.SetFocus Exit Sub End If End If Next MsgBox "Record...

Hi Calucho.. ;) this way try..: =DLookUp("[VL100]","Value_t", "[E-Date] = #04/06/2012# ") or this way try..: =DLookUp("[VL100]","Value_t", "cdbl([E-Date]) = cdbl(#04/06/2012#)") ...

you're welcome ;) if one boxes or both are empty, empty the box ignores.. greetings.. :)

Hi.. ;) Try this..: SELECT StationName, HighMax, HighMaxDate FROM tblRecords WHERE Month(HighMaxDate)=[forms]![frmqry]![txtMonthNum] and day(HighMaxDate)=[forms]![frmqry]![cboDay] or more advanced..: SELECT StationName, HighMax, HighMaxDate FROM tblRecords WHERE...

Hi.. ;) Delete field in this way.. put below in code ..: Currentdb.tabledefs("tblAppraisal").Fields.Delete "BU" .

Hi..: for OverlappingDates..: select surName , commDate , ceaseDate , ID from tablename where ID<>(select last(ID) from tablename) and ID<>(select first(ID) from tablename) this for nonOverlappigDates: select surName , commDate , ceaseDate , ID from tablename where ID =(select...

Hi..: Use the joker for the domain..: DCount("*", "querySear.....

Hi.. ;) try this way..: userRole = DLookup("[Role]", "LoginTable", _ "username ='" & usernamecombo & "' ")

Hi.. ;) Change the relevant part of this ...: DoCmd.OpenForm "Detallesfrm", acNormal, , stLinkCriteria ..

Simple but effective.. ;) Particularly useful when cancel shortcut menu.. and the multi-column forms..