Vis kun 5 linier eller 200 tegn

Response.Write(Left(objRs("be"),200))

//>Rune

ops jeg skrev vist forkert, jeg vil have en kode så hvis "be" er større end 200 tegn ELLER 5 linier

Mon ikke denne kan bruges:

Linier = 0
Max = 0
do while not RS.EOF and Max < 200 and Linier < 5
  s = Left(RS("be"), 200 - Max)
  Response.Write s ' Udskriv
  Max = Max + Len(s)
  Linier = Linier + 1
  RS.MoveNext
loop

prøver

får denne fejl

Microsoft VBScript runtime error '800a01a8'

Object required: ''

/espeholt_dk/scripts/default.asp, line 63

ok jeg har rettet den nu, jeg skulle lige skrive obj foran rs

men nu får jeg en anden fejl

ADODB.Field error '80020009'

Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.

/espeholt_dk/scripts/default.asp, line 0

Sorry det kan være at denne linie skal ændres:
  s = Left(RS("be"), 200 - Max)
til
  s = Left(objRS("be"), 200 - Max)
 
Dit recordset hedder objRS

og denne linie:
RS.MoveNext

jeg har kun fået det med tegne til at virke

jeg går i seng