Update query

[dweekley]

Hello,



I am trying to create an update query so that I can append a particular set of text.

I have started using the following:

Expr1: Left([Material.Ext_Description],InStr(1,[Material.Ext_Description],Chr(10),1)-2) & "" &
DLookUp("[Text3]", "User_Code", "[Code]='Line 01'")

However...there are more than one carriage return and my appended test is after the first line rather at the end.

Thanks in advance for the assist.

David

[June7]

Maybe you need Mid function. Show example of data and the result you want.

[dweekley]

Hello,

Below is an example of the existing data. I am attempting to add additional text separated by an underline (50 underscores) with additional text after that. I currently have similar queries to perform updates, but seem to be having trouble with this one.

SS138RD-CL
Centerless Ground
Heat Treated (H1100)
Spec:
AMS 5629
AMS-H-6875

So the text would end up looking like,

SS138RD-CL
Centerless Ground
Heat Treated (H1100)
Spec:
AMS 5629
AMS-H-6875
__________________________________________________

'Additional text'

TIA
David

[dweekley]

Hello,

I actually have a portion of this working.

Expr1: Mid([Material.Ext_Description],1,Len([Material.Ext_Description])) & Chr(13) & DLookUp("[Text3]","User_Code","[Code]='RS STD Text 04'")

However, I can not seem to get the carriage return to work.

Thanks
David

[June7]

Why are you putting all this in one field?

If you want to append text, why do you need to extract with Mid function? Why not just concatenate?

Need two codes for CR. It's really CR & LF: Chr(13) & Chr(10)

[dweekley]

Unfortunately it is not our DB. Very limited access, so I have to be creative. I save this Query for future use when we need to update.

I search for the 50 under scores, keep what's above and replace what is below.

[June7]

So did the codes work? I think order matters and 13 is first.

[dweekley]

It did. Thank you.

David