Search results

Hi there, restoring some code I've had running tks to Forum for over a year, I've come accross 2 small problems: 1. If the code in my form is Me.[Inits] = StrConv(Me.[Inits], vbUpperCase) And original data is entered in lowercase, the code only displays in uppercase whereas on viewing in a...

Took me a while to get back on this one Buk, but I'm still not sure whether yr code actually opens an Input box or do I have to design/make one. Then having made inputbox how do I pathname to it? Is it D:/MyData/Forms!MyInputbox or what? Where does yr last code go relative to yr 1st bit of code...

Thanks greatly BukHix. This gives me something to get my teeth into.

Okay...in the past I used a Macro for this action. Now I want to learn to do it in Code. I've weekly data coming in...there are 25 tables in the Access db, I want to select 5 of the 25 same named tables each week; just the .mdb name changes. My queries are: 1. Where do I put the code? In a...

Look at yr options under the TransferDatabase command in Macro Design view. You can do it all there. Read yr F1 helps along the way.

And yet another way if you want a table of the unique set is to set yr sigma sign on, change query to make table and put that uniques set of fax nos in another table.

Sounds like you may be trying to delete from the displayed result, which is where the 'Cannot Delete' command displays for me. This is because you are viewing and trying to take action on a grouped 'report' if you like. If the selected 'grouped by' records are to be deleted: Have you tried...

Sometimes its your field lengths which may be set incorrectly . I have solved an append which would not append all data by taking a dummy append, fields one by one until I get the error. Then this determines the field causing the error and where properties may differ. Hope this helps. Good Luck

Now that's a good question...

I have a nice Add2Source Module, a la: Private Sub Combo119_AfterUpdate() If Not IsNull(Me.Combo119) Then Me.Combo119.DefaultValue = "='" & Me.Combo119 & "'" Else Me.Combo119.TabStop = True End If End Sub THIS CODE, applied to relevant fields, carries forward the data, except when that field...

Ian, Tks greatly the KeyPress option works perfectly in the related field, since I'm the user and controller of these types of entries...its perfect! However, if UCase and LCase work this way, what is the ProperCase equivalent code here, as I tried ProperCase and PCase for another field needing...

Have you right clicked yr comboboc, then properties, then clicked event and away you go...

Actually I've found, as with some other commentators here, that > is less effective than strconv....,vbUppercase code. Problem here is that I'm playing with field TITLE as per following example: FormINPUTFORM: MAINDBASE FIELDS 1-30 fields, 'many' being POSCODE. POSCODE links to POSCODE 228...

I think you are operating in reverse, in that your form is designed either on atable or a query. You must make up the query first, and then in the list box or form itself, set it to that query. Hope this helps...

Tks Fornation for the suggested change...it didn't work........ I'm still thinking of other ways... [This message has been edited by Rich_Lovina (edited 02-10-2002).]

David, Tks yr immed input. I agree with both and whilst never having touched Focus, I'll quiz up on it a bit. I did change the tab order back.

Your outline of tables looks somewhat similar to sample Northwinds dbs. Have you compared that layout with your own and their series of forms. Sounds similar to a dbase i once had in which I found better to not try and subform all onto the one form, unless you are well into VB.

Tks your answers. Q1 is not a major problem but users usually stick to keyboard, rather than use mouse, hence its a small aberration. Q2. Regret the nos appear at random, as they're a location code for a campus of buildings e. CP1-2-31w might mean Bldg CP, Wing 1, 2nd floor, Room 31 West. Then...

In a past posting Raskew gave following for carry data from one record to new record: If Not IsNull(Me.Section) Then Me.Section.DefaultValue = "='" & Me.Section & "'" 'For text fields 'Me.Operatorid.DefaultValue = "='" & Me.OperatorID & "'" 'For date fields 'Me.Operatorid.DefaultValue = "=#" &...

Tks Pat, remember now. 1st one similar to most programs.