[VB6]Spaties bij LineFeed/CariageReturn

[Chielos]

Ik ben bezig om vanuit code een email te genereren bijv :

code:

    With outlApplication.CreateItem(olMailItem)
        .To = strEmail
        .Body = strOutput
        .Subject = strSubject
        .BodyFormat = olFormatPlain
        .Display
    End With

Geen probleem werkt goed

met een lusje probeer ik de body te vullen

code:

While <<conditie>>
      strOutput  = csvRecordset.fields(0)
      strOutput = strOutput & Chr(13) & Chr(10)
      csvRecordset.MoveNext
Wend

waarbij ik het volgende resultaat krijg

code:

klant_toevoeging; 
klant_postcode;1825DZ 
klant_woonplaats;ALKMAAR

Het rare is nu dat er telkens een spatie achter mijn regels komen.

Ik heb het geprobeerd met chr(10)/chr(13)/chr(10) & chr(13) en vbCr en vbLf

Weet iemand wat dit probleem kan zijn? Alvast bedankt

[ Voor 3% gewijzigd door Chielos op 21-02-2005 16:09 ]

[BovenHond]

Je zou met "trim" wellicht de gehele regel weer spatie vrij kunnen maken. Maar het is mij nog nooit opgevallen dat hij spaties na de harde return zet.

code:

Trim()
Ltrim()
Rtrim()

[ Voor 42% gewijzigd door BovenHond op 21-02-2005 16:15 ]

[Tukk]

Zou het kunnen dat het mailtje zelf al deze spaties bevat voor dat je de tekst er in zet?

Als je trim er om heen zet en de spaties bestaan nog steeds, dan zou ik daar naar kijken.

[Chielos]

In mijn debug/Immediate window komen trouwens geen spaties voor, het zit hem dus blijkbaar in het outlook component vrees ik.

[BovenHond]

Chielos schreef op maandag 21 februari 2005 @ 16:29:
In mijn debug/Immediate window komen trouwens geen spaties voor, het zit hem dus blijkbaar in het outlook component vrees ik.

Maar dat zou betekenen dat als je de gehele body als één string naar outlook weg zou schrijven. Dat er géén spaties in mogen komen te staan. Of verwacht je dat outlook automatisch aan het einde van elke regel een spatie plaatst?

Vreemd in elk geval. succes er mee

[Chielos]

alleen in het edit scherm is het het geval dat er spaties aan het einde zitten..

Op het moment dat je hem echt verstuurd zijn de spaties verdwenen

Thanks iig

[Verwijderd]

Als ik jou was zou ik niet een outlook component gebruiken, maar gewoon een winsock en dan zelf het SMTP/POP3 programmeren...als je denk dat je dat gaat doen (het is niet als te moeilijk) dan reply je dat maar, dan geef ik wel wat extra info over hoe het moet

[BovenHond]

Milo Warmerdam,

Dat lijkt mij persoonlijk ook zeer interessant. Kan je me wat informatie (links of uitleg) geven over hoe ik dit moet aanpakken?

thanx

[RobIII]

BovenHond schreef op dinsdag 22 februari 2005 @ 09:53:
Milo Warmerdam,

Dat lijkt mij persoonlijk ook zeer interessant. Kan je me wat informatie (links of uitleg) geven over hoe ik dit moet aanpakken?

thanx

Winsock is niet echt om vrolijk van te worden onder VB6. Het kan wel, maar mooi is anders (Trust me, heb het meermalen gedaan). Kijk voor de gein gewoon eens naar andere (gratis) mail componenten (COM).
Eentje die ik graag gebruik is die van Dundas. Gratis, snel, compact en werkt toppie.

Voorbeeldje:

Visual Basic:

'most control methods throw an exception if an error occurs so we will use an On Error statement
On Error Resume Next  
Dim objMailer 'Mailer control   
'create instance of Mailer control
Set objMailer = CreateObject("Dundas.Mailer")
'send email
objMailer.QuickSend "[e-mail]","[e-mail]","Subject","This is the body."
'you can test for the success/failure of the operation by examining VBScript's Err object here
Set objMailer = Nothing

Maar er is veel meer mogelijk met het ding...Check de documentatie daarvoor maar

Wil je toch met Winsock aan de gang, kijk dan eens op VBIP.com, daar hebben ze bijna een hele website over Winsock en VB.

SMTP: http://www.vbip.com/winsock/winsock_smtp.asp
POP3: http://www.vbip.com/winsock/winsock_pop3.asp
Meer: http://www.vbip.com/winsock/index.asp

maar dat had je ook makkelijk effe kunnen googlen...

[ Voor 77% gewijzigd door RobIII op 22-02-2005 11:45 ]