🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: free.it.visual-basic
Article #1134

scheda VTPlus

#1134
From: NonDico
Date: Fri, 22 Oct 2004 07:50
26 lines
1714 bytes
Salve a tutti,
ho scritto una procedura in VB6Sp6 che mi permette di aprire VtPlus e le
relative pagine interessate e quindi elaborarle.
Vorrei che all'uscita del mio prg, chiudesse anche VTPlus, ma non ci riesco.
Queste sono parte della procedura

Private sub FormLoad()
Dim Retval As Long, FileName As String
Filename="C:\Programmi\vtplus\vtplus32.exe /sc:\entrata.vts
Retval=Shell(FileName,vbMinimizeFocus)
end sub

per l'uscita, innanzitutto ho creato un file fine.vts, cos� composto:
VTPlus script
EXITAPPL

quindi in VB
Private sub Uscita()
Dim Retval As Long, FileName As String
Filename="C:\Programmi\vtplus\vtplus32.exe /sc:\fine.vts
Retval=Shell(FileName)
end sub

Niente da fare, qualcuno ha risolto?
Grazie
Giuseppe
Technical Details
Message-ID: <NY2ed.52418$N45.1537789@twister2.libero.it>
Path: arc1-ca.pugleaf.net!g2news1.google.com!news1.google.com!news.glorb.com!npeer.de.kpn-eurorings.net!news.tele.dk!news.tele.dk!small.news.tele.dk!news.mailgate.org!nntp.infostrada.it!twister2.libero.it.POSTED!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Thread: f94ee,65ead27d78ace41c,start
X-Google-Attributes: gidf94ee,public
X-Google-Language: ITALIAN,ASCII
Path: arc1-ca.pugleaf.net!g2news1.google.com!news1.google.com!news.glorb.com!npeer.de.kpn-eurorings.net!news.tele.dk!news.tele.dk!small.news.tele.dk!news.mailgate.org!nntp.infostrada.it!twister2.libero.it.POSTED!not-for-mail
From: "NonDico" <neanche@questo.it>
Newsgroups: free.it.visual-basic
Subject: scheda VTPlus
Lines: 29
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2900.2180
X-RFC2646: Format=Flowed; Original
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.2180
Message-ID: <NY2ed.52418$N45.1537789@twister2.libero.it>
Date: Fri, 22 Oct 2004 07:50:05 GMT
NNTP-Posting-Host: 62.98.114.99
X-Complaints-To: abuse@inwind.it
X-Trace: twister2.libero.it 1098431405 62.98.114.99 (Fri, 22 Oct 2004 09:50:05 MET DST)
NNTP-Posting-Date: Fri, 22 Oct 2004 09:50:05 MET DST
Organization: [Infostrada]