Search results

Brilliant, I thought i was probably missing something like that! Thank you!

Hi, I have a button which opens a form. The form is currently edit-able, and has to be a lot of the time, but when its opened through this particular route I need it to be read only. I have tried: stDocName = "FrmName" DoCmd.OpenForm stDocName Form.FrmName.AllowAdditions False...

Hi. I am tryign to find out a bit more about the import function in access. I have had a look but i cant seem to find anything that give you an overview of what it does and how it works etc. Does anyone know of a link, or willing to explain? Thanks!

Mmm, yeah, I read that somewhere, but it said it wouldnt work if the database was used in run time, which ours will be eventually. I managed to get the recordsource bit working: DoCmd.OpenReport "RepCtrForm", acViewPreview Reports("RepCtrForm").RecordSource = "QryCtrMainStoreForPcr"...

Ooh, nice form... I think that might be very useful with a future project I have! But for this, unfortunatley, I dont think it will work. Qry2 has an extra table in, with extra linked fields etc. I cant think how you would do that in a where clause.

Hi, I have a report with the Record Source Qry1. 99% of the time, I want it to open with Qry1 as its record source, but when a certain button is pressed I want its record source to change to Qry2. Ive looked this up on the net, and i seem to be getting conflicting information, some saying you...

Ahha! Figured it out - i knew it would be something simple... In the properties of the box, the back style was set to transparent. Changed it to normal and it works fine. Thanks!

Ok, thanks for your input RG. I tried using elseIf, but i still get the same problem. I think the same will happen with the select case structure (although ill try it in a sec). The thing is, I know the if statment is working beacuse the forecolor changes as its meant to, its just not doing the...

hi, I have the following code: If Me.Urgency = 3 Then 'Red Me.Urgency.ForeColor = RGB(255, 0, 0) Me.Urgency.BackColor = RGB(255, 0, 0) Else If Me.Urgency = 2 Then 'Orange Me.Urgency.BackColor = RGB(255, 102, 0) Me.Urgency.ForeColor = RGB(255, 102, 0) Else If Me.Urgency = 1...

Your kidding me! If only id known this! Thank you... I will start reading up on it now.

Hi, I have a table with fields Name, Password and then various yes/no fields which say what they are permitted to do. I am trying to write some code which looks in that table, filters for all the records where a specific yes/no field is true (i.e. all the users that have permission to enter...

Ive just added an OR Me.ItemNo = 0 to the 1st part of the if statement and it works. Cant believe it - ive spent months trying to work this out! Thanks!

Ive got to say ive never had that happen before. All I can sugges tis make sure that all the properties of the boxes that arent showing are ok (i.e. visible, with contrasting back and fore colours) Hope you get it sorted, sorry i can be of more help!

Sorry Dave, the error does say MeetingNo. I run the code through and it seems to think the ItemNo is not null, as it goes straight to the else statement. This explains what is happening, but not why! Is my null statement ok?

Dont worry - I had an ID field which was an auto number, and it didnt like the old one being copied in. Removing this field fixed it.

I have an append query which, when run, says it can not append the records due to key violations. However, if i turn it into a select query and manually copy the records from the query into the table where i want it appended it works fine. Is there any reason why this could be happening...

Glad you got it sorted!

Ok try: Set Gebuehr = ("SELECT * FROM tblxx_Gebuehr WHERE tblxx_Gebuehr.tblxx_grabart_id= " & Grabart & "AND tblxx_Gebuehr.tblxx_Gebuehrkategorie_ID= " & Kategorie & "AND tblxx_Gebuehr.deleted=0 AND IsNull(tblxx_Gebuehr.tblxx_friedhof_id) OR tblxx_Gebuehr.tblxx_friedhof_id = " & Friedhof &...

hum, i obviously still ahvent got the hang of it! Does Aman's work? If not ill have another look!

Oops, 1st line should be: Set Gebuehr = db.OpenRecordset("SELECT * FROM tblxx_Gebuehr " & _ and then remove the & at the start of the 2nd line.