topcut - Right(topcut, 350) vil jeg køre, men det virker ikke.

function topcut(sString, iLen)
  dim iTemp

  iTemp = len(sString)

  if iTemp <= iLen then
    topcut = "String is to short"
  else
    iTemp = iTemp - iLen
    topcut = left(sString, iTemp)
  end if
end function

hov jeg havde ikke lige set det var Visual Basic det her hehe (troede det var ASP)

så de 2 første linjer skal erstates med:
function topcut(sString as String, iLen as Integer)
  dim iTemp as integer

Bare for at gøre det lidt pænere og mindre krævende :)

topcut = left(topcut,(len(topcut)-350))

- Mikker

de fungere jo begge to fint så jeg takker mange gange!

Selv tak :o)

- Mikker