Home/ Questions/Q 3312346
In Process

The Archive Base Latest Questions

Editorial Team
  • 0
Asked: 2026-05-17T21:59:03+00:00

Here’s my code Dim RefsUpdate As String() = Session(Refs).Split(-C) Dim PaymentsPassedUpdate As String() =

  • 0

Here’s my code

Dim RefsUpdate As String() = Session("Refs").Split("-"C)

Dim PaymentsPassedUpdate As String() = Session("PaymentsPassed").Split("-"C)

Dim x as Integer

For x = 1 to RefsUpdate.Length - 1

Dim LogData2 As sterm.markdata = New sterm.markdata() 

Dim queryUpdatePaymentFlags as String = ("UPDATE OPENQUERY (db,'SELECT * FROM table WHERE ref = ''"+ RefsUpdate(x) +"'' AND bookno = ''"+ Session("number") +"'' ') SET alpaid = '"+PaymentsPassedUpdate(x) +"', paidfl = 'Y', amountdue = '0' ") 

Dim drSetUpdatePaymentFlags As DataSet = Data.Blah(queryUpdatePaymentFlags) 

Next

I don’t get any errors for this but it doesn’t seem to working as it should

I’m passing a bookingref like this AA123456 - BB123456 - CC123456 - etc and payment like this 50000 - 10000 - 30000 -

I basically need to update the db with the ref AA123456 so the alpaid field has 50000 in it.

Can’t seem to get it to work

Any ideas?

Thanks

Jamie

Share

Leave an answer

You must login to add an answer.

Need An Account,

1 Answer

  1. Editorial Team

    I’m not sure what isn’t working, but I can tell you that you are not going to process the last entry in your arrays. You are going from 1 to Length – 1, which is one short of the last index. Therefore, unless your input strings end with “-“, you will miss the last one.

    • 0