hi thanks i got this working

please see below what i did thanks daren for pointing me in right direction

 (CASE   --TRANSISTIONS POINTS
    WHEN LENS.LNS_MATCLR in (40,41,48) THEN 35
    else 0
    end) * case when LENS.QTY > 1 then cast(cast(LENS.QTY as decimal(18,2))as float) / 2 else 1
    END AS TRANSISTIONS_POINTS,

hi jim yes it seems to me that to many columns . Current columns is 63 if i decrease the columns it works.


i have also increased the script.timeout = 300 but still same problem

if i decrease the columns then it works

thank you that is perfect thanks for all the help :-)

sorry got it right now

 Dim orderdate As String
            Dim ordyear As String
            Dim ordmonth As String
            Dim ordday As String
            orderdate = LBLORDD.Text
            ordyear = orderdate.Substring(0, 4)
            ordmonth = orderdate.Substring(4, 2)
            ordday = orderdate.Substring(6, 2)
            Dim orderdate1 As New Date(ordyear, ordmonth, ordday)
            Label1.Text = orderdate1

i receive date as 2011-06-27 how do i get it now as 2011/06/27

i apogolise for all the questions

thanks for the response

   Dim orderdate As String
            Dim ordyear As String
            Dim ordmonth As String
            Dim ordday As String
            orderdate = LBLORDD.Text
            ordyear = orderdate.Substring(1, 4)
            ordmonth = orderdate.Substring(4, 2)
            ordday = orderdate.Substring(6, 2)

i have those values now but not sure how to get the in the yyyy/mm/dd format in label1