Article View: be.comp.programming
Article #12581Re: [vb] Wat doe de functie Instr en Replace?
From: Zoeloelip
Date: Thu, 25 Oct 2001 20:56
Date: Thu, 25 Oct 2001 20:56
30 lines
2526 bytes
2526 bytes
> Er is nog een klein vraagje: > ik probeer het alsvolgt te gebruiken: > <Begin code> > Dim strSubject As String > Dim strMail As String > Dim intWhere As Integer > strMail = incomingdata > intWhere = InStr(1, strMail, "subject:") > strSubject = Mid(strMail, intWhere) **** > intWhere = InStr(1, strSubject, vbCrLf) > strSubject = Mid(strSubject, intWhere) > </eind code> > incomingdata is de string die de complete header bevat. > Als ik het prog probeer te runnen, dan zegt hij me, Invalid procedure call > or argument. > Waarschijnlijk is het een klein foutje, maar ik vind het niet echt. > Als ik op debug klik, geeft hij aan dat er een fout is op deze regel: > strSubject = Mid(strMail, intWhere) Zet op die regel met die sterretjes eens dat hij daar moet breaken. Dat is met in de boord te klikken zodat die regel rood gemarkeerd is met zo een bolleke voor. Dan stopt hij daar met uitvoeren en kijk een wat de waarde is van intwhere. Als hij subject niet gevonden heeft dan gaat hij 0 of null geven en dan geeft hij die fout ver der zo ik het niet weten. Als het dat niet eens mail mij dan je broncode eens dan zal ik eens zoeken. -- Mvg. Zoeloelip PUB - De Telenet-Internet gebruikersvereniging - http://pub.telenet.be
Technical Details
Message-ID:
<_%_B7.1698$aA1.261@afrodite.telenet-ops.be>Path:
arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!supernews.com!news.tele.dk!small.news.tele.dk!193.190.198.17!newsfeeds.belnet.be!news.belnet.be!ossa.telenet-ops.be!afrodite.telenet-ops.be.POSTED!not-for-mailReferences:
<4sXB7.237$PR.28998755@hestia.telenet-ops.be> <jn_B7.1536$aA1.265@afrodite.telenet-ops.be> <Mq_B7.417$d86.84191426@hestia.telenet-ops.be> <yD_B7.1596$aA1.299@afrodite.telenet-ops.be> <EL_B7.439$0A7.90203233@hestia.telenet-ops.be>Show Full Headers
Complete Article Headers
X-Google-Language: DUTCH,ASCII-7-bit X-Google-Thread: fcea4,4edd4c06c6b48422 X-Google-Attributes: gidfcea4,public X-Google-ArrivalTime: 2001-10-25 13:56:28 PST Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!supernews.com!news.tele.dk!small.news.tele.dk!193.190.198.17!newsfeeds.belnet.be!news.belnet.be!ossa.telenet-ops.be!afrodite.telenet-ops.be.POSTED!not-for-mail From: "Zoeloelip" <bartvb@pandora.be> Newsgroups: be.comp.programming References: <4sXB7.237$PR.28998755@hestia.telenet-ops.be> <jn_B7.1536$aA1.265@afrodite.telenet-ops.be> <Mq_B7.417$d86.84191426@hestia.telenet-ops.be> <yD_B7.1596$aA1.299@afrodite.telenet-ops.be> <EL_B7.439$0A7.90203233@hestia.telenet-ops.be> Subject: Re: [vb] Wat doe de functie Instr en Replace? Lines: 32 X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 6.00.2600.0000 X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000 Message-ID: <_%_B7.1698$aA1.261@afrodite.telenet-ops.be> Date: Thu, 25 Oct 2001 20:56:26 GMT NNTP-Posting-Host: 213.224.217.145 X-Complaints-To: abuse@pandora.be X-Trace: afrodite.telenet-ops.be 1004043386 213.224.217.145 (Thu, 25 Oct 2001 22:56:26 MET DST) NNTP-Posting-Date: Thu, 25 Oct 2001 22:56:26 MET DST Organization: Telenet Internet