Tak for svaret, Det køre fint nu.
Henrik
"@sbjørn" <asbjorn@caduceus.dk> skrev i en meddelelse
news:mqyD7.3138$Ip2.66194@news010.worldonline.dk...
>
> "Danlamp Teknik" <danlamp@danlamp.dk> skrev i en meddelelse
> news:9rm986$5c0$1@sunsite.dk...
> > Hejsa
> > Jeg er ved at lave en udskrift del til et program, man jeg har fået et
> > problem ?
> >
> > Et sted i min udskrift har jeg denne linie :
> > Printer.Print Tab(10); RS.Fields("Medarbejdernavn")
> >
> > Hvordan får jeg det lavet, så ledes at jeg max får vist 20 tegn af
> > medarbejderens navn.
>
> Printer.Print Tab(10); Mid(RS.Fields("Medarbejdernavn"), 1, 20)
>
> Eller
>
> dim Medarbejdernavn as string
> Medarbejdernavn = RS.Fields("Medarbejdernavn")
> if len(Medarbejdernavn) > 20 then
> Printer.Print Tab(10); Mid(RS.Fields("Medarbejdernavn"), 1, 17) +
"..."
> Else
> Printer.Print Tab(10); Mid(RS.Fields("Medarbejdernavn"), 1, 20)
> End if
> > Henrik
>
> @sbjørn
>
>