Search results

Im trying to get my code to open a second DB instance, copy a form and paste it into the currentdb but I can't get it to work :o So far I have this.. (currentdb = update.mdb) Set wsp = CreateWorkspace("", "admin", "", dbUseJet) Set db = wsp.OpenDatabase("C:\Application\StockDB.mdb")...

Hi, sorry for the confusion.. It was a a SQL select I was having trouble with. I am opening up a filtered recordset dependent on the string being passed in, a small snippet of code to explain.. Select Case Left(seria_nol, 1) Case ("0") qstr = "SELECT * FROM Serial_Numbers...

Like 'A*' worked. Thanks for your help.

When I said needlessly using strings I mean declaring strings i.e dim option1 as string option1 = "A*" and then using '" & option1 & "'" when i can just type Like 'A*" as this is in a SELECT case statement so there are a fair few SELECT statements.

Seems like a silly question but I can't work it out ! How can I set a SELECT criteria to be LIKE "A*" I can put "A*" inside a string and its fine but I don't want to be needlessly using strings to hold data if I dont need to.

Im guessing this is a long shot but im currenty adding the ability to change the currency into an existing application. Rather than the user manually entering the current exchange rate I thought it would be pretty clever if I could download the latest rates on a daily basis.. Are there any...

As said it is .Attachments.Add = "Path to file"

Found it xlApp.Columns("G:G").Select Selection.Delete

I've written a module to write data generated in Access (97) to excel. I want to be able delete a Column if a value in a field is 0 e.g. If xlApp.Cells(1,1).Value = 0 then xlapp.Column("B").Delete End if I cannot find any examples though, only for VB.Net or for deleting Rows.. Anyone able...

All working now... Added in drec.MoveLast drec.MoveFirst rec = drec.Recordcount :)

Thanks for that, sadly still have the problem though. When I try and count the records that are found in the query (which will be greater than 1 if there are duplicates) it is always showing recordcount as 1 :confused:

Got a bit of a funny one here, got a table with a load of Company names in and it contains a number of duplicates, i've written this little sub to open the table, find duplicates, if it does then delete them until the record count = 1. Its not doing what I want though, when I run my SELECT...

Im trying to check on the current status of a table / recordset in Access 97. I've currently got it so the following happens; User 1 runs the procedure and table and recordset are opened. If at the same time User 2 attempts to run the procedure then it errors with code 3262 and I capture it...

Thanks for the reply, your mention off running everything off SQL server answered something I had been wondering about. I now have the query constructed and running on the server, i've then linked to this in access (as a table :confused:), all seems to work exactly as i'd hoped and runs alot...

I've recently been experimenting with SQL 2005 Express for when we come to move our main db out of access and onto a SQL backend.. I've created a few of our main tables in access and transferred some data into it, im now trying to re-create one of our main queries utilising the SQL tables, im...

Thanks for the code namilam, I tried it but it doesn't seem to want to work, I till get syntax errors. I think I need to approach this from a different angle now anyway, i've had another look at what im trying to do this morning and im not sure how its possible. A bit more background on what I...

Hi, This is what I have in the Expression Builder box.. =IIf([Data_Dir]=True,[DataImage].[Visible],[DataImage]=True.[Visible]=False) This is written in the IIf(exp,truepart,falsepart) format of the expression builder. Data_Dir is a Yes/No field in the table that is linked to the form and I...

All of it lol I've tried writing an If Then statement like.. If [Field] = True Then Me.Image.Visible = True Else Me.Image.Visible = False End If I get the following error.. "The expression you entered contains an Invalid Syntax" "You may have entered an operand without an operator"

Im trying to write an expression in expression builder that sets the visibility of an image depending on a true/false value in a table. Im getting no where with it and I can't find any relevent guides :( Can anyone shed any light on how I would do this?

Thanks for the reply, Sorry, I should of mentioned that I am already using a FSO object to find the date out, problem is that on random files it error's which leaves me unable to continue my files indexing. This is what I am currently using.. Private Sub Modified_Date(strPath As String...