Search results

And if you want it to look neat... Dim sql as string sql = _ "SELECT ProductGrp.Product AS ProductName, " & _ "(SELECT TOP 1 ProductSale.Values FROM ProductSale WHERE (((ProductSale.Types)=""3"") " & _ " and ...."

Ok - not withstanding that normally you would expect that for a table of people - person_id would a primary key and therefore have no duplicates... you could try concatinating person_id and lastname then checking for > 1

Or even Left([string],5) & Replace([string],",","&",5,1)

Check the mdb file format is 2003 or later...

Have you tried compacting the database before replication..?

FileSystemObject, Folder etc... are defined in the Microsoft Scripting Runtime - therefore if you add a reference to this your code will compile without the need to change these types to Object...

I'm regretting putting that word in... Yes the form is instantiated when it is open - but the code inside doesn't know that... you could have instantiated many instances of the form - the code inside wouldn't know which one you were referring to... Hopefully that goes some way to explaining...

Yes - you can only run code like this from a standard module... the form is effectivly a class module - which requires instantiation before its code becomes active

Midmented - thanks - this appears to be the best workaround for all practical purposes - setting the control width to 0 seem to prevent the user from accidently placing the cursor in the control (I tried hard - but couldn't do it...) Being a bit of a pureist - I don't like having seemingly...

Hi fredalina, thanks also for having a go - I'm aware I'm not going to find Enabled=False for a Label - thats not the focus of what I'm trying to do... the effect is the focus. I want its behaviour & appearance to match that of another Label on the Form that is attached to a control that is...

Thanks for having a go wazz - but obviously not what I was after... appears to be a tricky one that might seem easy on the surface... new ideas - anyone..?

On a Form - if I have a Label attached to a Control (say Textbox) and I set the Control property Enabled=False - the text in the Label appears faint & chisled - all well & good... Q: Anyone know how to create this same effect in a Label that is not attached to a Control..?

Yes the () is required... Declares a byte array instead of a byte... The guid is stored as a byte array...

This produces a result... Public Sub Blue() Dim txt As String Dim a() As Byte a = DLookup("rid_Database", "tblDatabases", "[sDatabaseShortForm]='3CONP'") txt = StringFromGUID(a) End Sub

Does 3CONP have a trailing space in the table..?

Try Me.Undo ...

Have you tried 'Ctl Z' to undo the change..?

If I've understood correctly - it appears what you may want to do is use the import feature to import all the files into one table, and then export the table as one csv file... Main Menu > File > Get External Data > Import... If you only need to this once it is not really necessary to write...

Main reasons for favouring early binding are: The compiler has a better chance of picking up any coding errors The code executes more efficiently

Or for a one liner you could try... If Not chkCSDAB.Visible And (chkTCB Xor chkSMMB) Then _ Forms!SchedView!SchedStatus = IIf(chkSMMB,"Unapproved-TCB","Unapproved-SMMB")