|
| Printer.Print ? Fra : Danlamp Teknik |
Dato : 30-10-01 14:05 |
|
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.
Henrik
| |
@sbjørn (30-10-2001)
| Kommentar Fra : @sbjørn |
Dato : 30-10-01 15:03 |
|
"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
| |
Niels Henriksen (30-10-2001)
| Kommentar Fra : Niels Henriksen |
Dato : 30-10-01 21:39 |
|
"@sbjørn" <asbjorn@caduceus.dk> wrote in message
news:mqyD7.3138$Ip2.66194@news010.worldonline.dk...
>
> Printer.Print Tab(10); Mid(RS.Fields("Medarbejdernavn"), 1, 20)
>
Hvorfor bruge Mid? her vil jeg da bruge Left()
--
Niels Henriksen
Softwareudvikler
www.ryttersnak.dk
| |
Danlamp Teknik (31-10-2001)
| Kommentar Fra : Danlamp Teknik |
Dato : 31-10-01 10:19 |
|
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
>
>
| |
|
|