Search results

Grrr Beaten by you again, hmmm do you always leave your error handeling on?

Easy, just use a little function like this. Function ChKControl(ControlName As String, Optional ControlType As String = "") As Boolean Dim ChkTest As Control On Local Error GoTo ErrHdl Set ChkTest = Form_Form2.Controls(ControlName) ChKControl = True If ControlType <> "" Then Select Case...

Not a problem what you are missing is the latest copy of mdac (microsoft data access components) 2.7?, avalicable free from microsoft. download and install on the problem machines and all will be sorted

no probs

Your almost there all you need to do is supply a conditional IF statement after each for next look and only if there is data in your string do you add that field to your final query Dim db As DAO.Database Dim qDef As DAO.QueryDef Dim SQL As String Dim sConsultation1 As String Dim sStakeholder1...

Just a side note What you are realy doing is changing the sql of the query to inclue the Distinct or Distinct Row Syntax IE, SELECT DISTINCT SomeField FROM SomeTable

have a look at the PrtDevMode

I can see a bug in your code, what happens if the chr to be encrypted is chr(255) or decrypted chr(0)

write your own. a simple encription could be chr()=chr() +1

Have a look in the help all the info you could possibley want is there

On the workstation you need to copy all used OCX's to its System32 dir for NT4+ or system for win9x now locate the regsvr32 progie, located somewhere on the workstation. not in a command prompt install the OCX's ie c:\windows\system32\regsvr32 some.OCX Edit Some OCX's require other...

I would use dlookup, since you already have the query Deffinition:- DLookup(expr, domain[, criteria]) The DLookup function has the following arguments. Argument Description expr An expression that identifies the field whose value you want to return. It can be a string expression identifying...

dLookup is a command allowing you to run a query/lookup a value and place that data on a control. For more info look in the help

dlookup ?

Hmm, What its the type of Me.R.Value ie do you need to change it to a int before using Hex eg HexR = Hex(cint(R)) Have you tried Dim 'ing R G B as integer

Right, First i recomend using VBA, ist just far more flexable. There are so many differnet ways of going about this that 10 different people could give you 10 differnt methods to work with, ill try to make this as easy as possible for you. If you let me know which bit your having trouble...

Hmm, this may not be as easy as i make this sound i have on an old 98 machince with a print driver that prints to PDF format. SO first you use this/similar print driver to print the report to a file. Then using a email methond send it. note email method could be :- docmd.sendobjects (can...

an unbound text box is just that. A box(which contains a line of text) whos contents are not bound by a recordset or query. An unbound textbox can be set to anything the user/developer wants it to be. this can be done at design time using Controlscorce property or in runtime in VBA using the...

Yes, Im not cirtain how to do it but I belive u need to use winsock.

OK, now i have all the info You need to create a table with the following fields (this table may already exist just missing some or all of the fields) 1)company initals (your ABC field) 2)a date field, (lets call this TheDate) 3)a ID/ autonumber field, this must be an auto number, Note this is...