mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Aprire una conncessione di accesso remoto?

Salve a tutti,
    come si fa a lanciare una connessione di accesso remoto da un bottone di
una form VB.
No voglio soltanto aprire la finestra di connessione, ma voglio anche
connettermi automaticamente.
grazie a tutti
Gabriele

Guarda le 3 api
RasDial
RasEnumEntries
RasGetEntryDialParams
Trovi tanti esempi se hai invece il 98 o 95 usa questo
Call Shell("Rundll  Rnaui.dll,RnaRunImport " & strDUNFile)
PROVA ANCHE QUESTO
Const Internet_Autodial_Force_Unattended As Long = 2
Private Declare Function InternetAutodial Lib "wininet.dll" (ByVal dwFlags
As Long, ByVal dwReserved As Long) As Long
Private Declare Function InternetAutodialHangup Lib "wininet.dll" (ByVal
dwReserved As Long) As Long
Private Sub Form_Load()
Dim lResult As Long
lResult = InternetAutodial(Internet_Autodial_Force_Unattended, 0&)
End Sub
--
Piero Romani
HomePage:
http://digilander.iol.it/vbsegreti
"Non dico mai non si può fare."

 ha scritto nel messaggio
news:X5B08.24235$aD.8...@twister2.libero.it...


Salve, interessanti le 3 API, mi sai anche dire come fare in Win95 a
cambiare la modalita' di composizone (impulsi a toni): praticamente dovrei
variare da programma la stringa di impostazioni addizionali di una
connessione DUN senza falro fare manualmente all'utente.
Grazie
Stefano R.Š

Newsgroup: it.comp.lang.visual-basic
Titolo: Menu visualizza, dove sei?

Non so se vi è mai capitato, ma sul mio PC nel giro di pochi giorni, ad ogni
accesso a VB6, il menu visualizza si è "ristretto" - si proprio così - nel
senso che le voci di menu sono diminuite, fino a restare 3. Visualizza
codice, oggetto, dati. Cosa può essere successo? (d'accordo posso
reinstallare VB6, ma perché deve fare cose del genere, non gli basta tutti i
problemi che ci da'? )
;)
Marco Trapanese


Semplicemente, ripristina lo stato originario del menu.
 - Click destro sulla barra degli strumenti
    - Personalizza...
        - Barra dei menu
            - Pulsante "Reimposta..."
Ritorna il menu predefinito di sempre.
Poi, che problemi "ci" da ?
A me nessuno.

 ha scritto nel messaggio
news:8drgaj$dca$1...@nslave1.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: gfdsa

gdfgfd


Non si parla con la bocca piena !!
Ciao
Sir Jo

 wrote in message
news:t62m3of...@corp.supernews.com...

very big ROTFL :))))))))
Aldo

 Aldo
Che è ???????
ROTate FLag ???
Ciao
Sir Jo
Newsgroup: it.comp.lang.visual-basic
Titolo: Sub

ciao,
ho 2 sub
    Call CONNESSIONE_PC
    Call COPIA_TAB_DB
Il problema è che la sub COPIA_TAB_DB
viene eseguita prima che finisca la prima CONNESSIONE_PC
come faccio se voglio che la seconda aspetti?
P.s. nella prima ci sono un po di eventi... 2 timer che vengono attivati ed 
eseguiti e un evento "change" 


Qualche variabile Boolean per controllare lo stato no eh?!
Ciao, Vincenzo 

 Ciao, Vincenzo
Avevo pensato a qualche Flag...
ma la procedura passerà sempre da li anche se va in errore (gestito con un 
msgbox) ? 

 ha scritto nel messaggio 
news:A%MWg.142063$_J1.9...@twister2.libero.it...

No, un momento :)
Cerca di usare i termini corretti altrimenti non si capisce un tubo.
Cosa vuol dire che in una sub ci sono degli eventi?
E l'evento change che c'azzecca?
VB è sincrono, quindi non fa MAI due operazioni contemporaneamente.
L'unico caso è ad es. che una delle sub sia richiamata all'interno di un 
timer e nell'altra ci sia un DoEvents.
In questo caso quando viene raggiunto il DoEvents se il timer è già 
"scaduto" viene eseguito e al termine di questo riprende il giro a partire 
dal DoEvents.
Soluzioni?
Togli il DoEvents o metti un flag che controllerai all'entrata del timer.
Ciao 

Fai cosi:
Inizializzi due variabili booleane a False
booIsCompleted = False
booIsError = False
Se dentro connessione_pc č tutto ok allora booIsCompleted = True
Prima di eseguire copia_tab_db fai questo controllo:
    If booIsCompleted = True And booIsError = False Then
        Copia_tab_db
    Else
        Msgbox "Procedura interrotta a causa .... "
    End If
Potresti anche pensare di trasformare la sub connessione_pc in una function 
che ti restituisce True se tutto č ok.
Cmq di soluzioni ce ne sarebbero tante, devi solo valutare quale č piů 
adatta alle tue esigenze.
Ciao, Vincenzo
Newsgroup: it.comp.lang.visual-basic
Titolo: Maledette API e i suoi NULL

Salve
Devo usare l'API ShellExecute, e per farlo, dopo aver utilizzato l'API
viewer per richiamare la funzione, (ovviamente ho riportato in un BAS
la linea che ho trovato sull'api viewer), utiluizzo questo codice, ma
non funziona.
Private Sub Command1_Click()
    Dim pippo, pippo2 As String
    pippo2 = "a.htm"
    pippo = "c:\windows\desktop\"
    ShellExecute Handle, lpOpen, pippo2, Null, pippo, SW_MAXIMIZE
End Sub
Sapete dirmi perchè?
Mi dice "utilizzato non valido di NULL". Come diavolo devo fare per
richiamare sto' maledetto HTML qualunque sia il browser predefinito?
Ho provato anche con l'altro metodo (X& = shell(blablabla)) ma non
funziona.
Potreste aiutarmi?
Grazie in anticipo.
ByeZ!
Alkondor
Togliere NOSPAM per rispondere in e-mail

Ecco un breve esempio:
Option Explicit
Private Declare Function ShellExecute Lib "shell32.dll" Alias
"ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal
lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String,
ByVal nShowCmd As Long) As Long
Private Sub Command1_Click()
ShellExecute Me.hwnd, "Open", "c:\documenti\Page1.htm", vbNullString,
"c:\documenti", 0
End Sub
Bye,
Corrado

 Sapete dirmi perchč?


Errato
non č &0
ma 0&
Ops
Cornova
Cornova <a@b.c> wrote in message 7qutk2$oqm$1...@auth2.ats.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: funzionamento messenger

Salve,
alcuni giorni fa ho letto un post dove si chiedeva come funzionassero i
programmi tipo messenger e come fanno a "capire" se un certo utente č in
linea.
Mi ero ripromesso di leggere le risposte perchč l'argomento interessava
anche me ma non riesco piů a ritrovare nč il post di cui non ricordo
l'oggetto nč (ovviamente) le risposte.
Qualcuno potrebbe aiutarmi?
Grazie anticipatamente

 l'oggetto nè (ovviamente) le risposte.


Newsgroup: it.comp.lang.visual-basic
Titolo: DATACONTROL DAO

Ciao a tutti,
io ho creato un gestionale che si appoggia ad un dabase access.
Nelle utilità del mio programma ho iserito anche la funzionalità del 
salvateggio dei dati.
Il sakvataggio funziona correttamente, solo in 1 caso mi da un errore e cioè 
quando io vado ad aprire un form dove è contenuto un  CONTROLLO DATA .
Dopo che ho aperto questa form ogni volta che provo a salvare i dati mi da 
errore: Il DATABASE è aperto in modo ESCLUSIVO ........
Io qando effettuo il salvataggio comprimo prima il database.
Quindi secondo me è proprio il DATA che mi apre il database in modo 
esclusivo, ma non so come fare!!!!
Ho provato a mettere la proprietà DATABASENAME = ""
a mettere data.recordset.close
                data.database.close
                data.database.connection.close
ma nulla da FARE!!!!
Sapete darmi qualche consiglio?
Grazie a Tutti in Anticipo!!
Alberto 

> Sapete darmi qualche consiglio?
Certo.
Fai il salvataggio solo quando il database è chiuso. ;-)
Ciao, Sauro
P.S.
Molti esperti consigliano di non usare i DataControl.
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] picturebox e coordinate

Salve.
Vorrei impostare un sistema di coordinate personalizzato in un controllo
picturebox.
Dall'MSDN ho scoperto le proprietà scalewidth, scaleheight, scaletop e
scaleleft che si adeguano perfettamente al mio scopo. Infatti, dovendo
costruire grafici con numeri molto piccoli (vanno da 0,0001 fino a 10) il
sistema a twip non poteva funzionare. Modificando le proprietà scaleleft e
scaletop ho anche spostato il punto 0,0 nel margine inferiore sinistro
anzichè in quello superiore sinistro (anche se con l'inconveniente di dover
inserire i valori delle ordinate cambiati di segno). Il sistema di
coordinate però non funziona. Il punto 0,0 si trova infatti appena sotto il
margine inferiore (per la precisione le X vanno bene mentre le Y sono un pò
più in basso). Ecco come ho impostato le proprietà:
picture1.scalewidth = 16.22
picture1.scaleheight=10
picture1.scaletop=-10
picture1.scaleleft=0
picture1.width=4695
picture1.height=2895
Preciso che il valore 16.22 non è a caso ma calcolato per mantenere le
proporzioni con le altre proprietà secondo la proporzione:
width:scalewidth = height:scaleheight
Dove ho sbagliato?
Spero di essere stato chiaro.
Grazie anticipatamente.
Salvo

forse dipende dall' impostazione della proprietą appearance della picturbox,
deve essere su 0 (Flat)
-- 
gino

 deve essere su 0 (Flat)
no, non cambia nulla
Però forse ho capito qual è la chiave del problema. Ho reimpostato la
proprietà ScaleMode su 1 (twip). In questo modo vengono automaticamente
reimpostate tutte le proprietà Scale....
Le nuove impostazioni sono 0 per ScaleLeft e ScaleTop e:
ScaleWidth=4665
ScaleHeight=2865
con:
Width=4695
Height=2895
Cosa significa? Perchè la proprietà ScaleWidth è 30 in più della proprietà
Width? Idem per Height e ScaleHeight. Che con l'impostazione a 1 di
ScaleMode dovrebbero corrispondere, per quanto ho capito. Ingrandendo la
picturebox mi sono accorto che questa differenza è fissa. Bah.... chissà che
non sia un altro bug del caro vb6...
Newsgroup: it.comp.lang.visual-basic
Titolo: PER APIcultori

Ho urgente bisogno di sapere qual'è l'api che ti restituisce
la dimensione effettiva di una directory.
Sono apprezzate anche soluzioni alternative alle api.
Un panettone a Natale a chi mi aiuta!!
Ciao

>Sono apprezzate anche soluzioni alternative alle api.
Guarda un po' se ti va bene questa funzione che feci per una mia
applicazione:
Ciao
Daniele
Public Function DimensioneDir(Directory As String) As Long
Dim pstrDirectory() As String, pstrAgg As String
Dim pstrPercorso As String, pstrNome As String
Dim plngNumDir As Long, plngCont As Long
Dim plngN As Long
'Sistema le eventuali imperfezione nei percorsi
If Right(Directory, 1) <> "\" Then Directory = Directory & "\"
'Inizializza le variabili
pstrPercorso = Directory
'Corpo della routine
Scannerizza:
If Right(pstrPercorso, 1) <> "\" Then pstrPercorso = pstrPercorso & "\"
pstrNome = Dir(pstrPercorso, vbDirectory)
Do While pstrNome <> ""
     If pstrNome <> "." And pstrNome <> ".." Then
        If (GetAttr(pstrPercorso & pstrNome) And vbDirectory) = vbDirectory
Then
         plngNumDir = plngNumDir + 1
         ReDim Preserve pstrDirectory(plngNumDir)
         pstrDirectory(plngNumDir) = pstrAgg & pstrNome
        Else
        plngN = plngN + FileLen(Directory & pstrAgg & pstrNome)
        End If
   End If
   pstrNome = Dir
Loop
'Esamina le sotto-directory
If plngCont < plngNumDir Then
    plngCont = plngCont + 1
    pstrPercorso = Directory & pstrDirectory(plngCont)
    pstrAgg = pstrDirectory(plngCont) & "\"
    GoTo Scannerizza
End If
DimensioneDir = plngN
End Function

Newsgroup: it.comp.lang.visual-basic
Titolo: Licenza Visual Studio 6

Salve a tutti
Vorrei acquistare (magari con fattura) una licenza di Visual Studio 6.
Qualcuno può venderla oppure sa dove potrei comprarla?
Grazie



Salve a tutti.
Vorrei acquistare una licenza di Visual Studio 6.
Qualcuno può venderla o dirmi dove posso acquistarla?

 Qualcuno può venderla o dirmi dove posso acquistarla?
Non ho ben capito, puoi ripetere cos'è che vorresti acquistare?
;)
Ciao
(Sto iniziando a pensare di vendere la mia)
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

Newsgroup: it.comp.lang.visual-basic
Titolo: CreateWithEvents

ho trovato negli esempi di MSDN questa funzione, che e' simile alla create
object, solo che ti inizializza un controllo.
Problema:
pur avendo installato V. studio completo, questa funzione non la trovo, il
compilatore non me la riconosce....
Qualcuno sa dove trovarla?
grazie mille
benny


non credo che esista, potresti indicare l' esempio che la usa ?
ciao, hal

"Benny"

WithEvents è una parola chiave.
In tutta onestà, mi pare improbabile che esista una funzione che 'crea' e
restituisce un riferimento ad una parola chiave.
dickie
Newsgroup: it.comp.lang.visual-basic
Titolo: Insert sql parametrica in visualbasic

Buongiorno a tutti...,
qualcuno sa come si fanno a passare a una insert in sql al posto dei valori
fissi di tipo stringa delle variabili?
Io uso la insert in un modulo fatto in viusal basic all'interno di Access...
Es:
invece di scrivere cosi...
strsql (" insert into TabellaAnagrafe (NOME,COGNOME) values
('Giulio','Andreotti')")
vorrei scrivere cosi...
Parametro1 = "Giulio"
Parametro2 ="Andreotti"
strsql (" insert into TabellaAnagrafe (NOME,COGNOME) values
(Parametro1,Parametro2")
se qualcuno sa giusto la sintassi corretta e l'assegnazione dei parametri
alla query...,
che ne so tipo...
queryAnagrafe.params[1].asstring = Parametro1
queryAnagrafe.params[2].asstring = Parametro
o una cosa del genere...(in Delphi era una cosa del genere ma in visual
basic non sono riuscito!)
Grazie a tutti...

Marco Silvestri ha scritto:

Non mi è ben chiara la necessità di una query parametrica
compilata.....!
sSQL="INSERT INTO TabellaAnagrafe (NOME,COGNOME) " & _
          "VALUES ('" & Parametro1 & "','" & Parametro2 & "')"
Se Parametro1 e Parametro2 sono valorizzati la Query Action funziona
regolarmente...!
Fai attenzione che trattandosi di campi Testo servono gli apici,
oltretutto ti invito a non sottovalutare l'eventualità che il campo
Cognome abbia l'apostrofo....!
@Alex

 ha scritto nel messaggio 
news:yA9ug.41638$zy5.8...@twister1.libero.it...


 cm.Execute
Mi scuso per l'intrmoissione. Si può fare la stessa cosa con DAO ?

ToSka ha scritto:

Si ovviamente, leggi questo:
http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=228
@Alex



Grazie!

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con Crystal Report

Salva a tutti,
ho un problema con Crystal Report che non riesco a risolvere.
Succede che un report reperisca dei dati se usato su una certa macchina
(quella di sviluppo) mentre se lanciato su un altro PC si presenti il report
in anteprima completamente bianco.
Qualcuno può darmi qualche dritta?
    Grazie
    Mario

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Avere in un array l'elenco file di una cartella con data e ora

Chi č cosě gentile da potermi postare (o dirmi dove trovare) il codice x
avere all'interno di un array (o qlsiasi altra cosa) l'elenco dei file
presenti in una directory con pure la data e ora creazioen dei file?
Aiutatemi ....


Vado di fretta, per quel che riguarda i file di una directory puoi fare un a
cosa simile:
dim listafile() as string
dim indice as integer
indice = 0
pippo = Dir(\il_tuo_percorso)
while pippo <> ""
    redim preserve listafile(indice + 1)
    listafile(indice) = pippo
    pippo = Dir()
wend
più o meno... magari non van bene gli indici... però il contetto è quello...
saluti

per la data e ora puoi usare
FileDateTime(file)
ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Caratteri ascii e collisioni help!

Salve, sto programmando un giochino giusto per vedere come fare, ma mi sono
impantanato in 2 problemi principali:
1: Fino a quando si tratta di fare muovere il mio personaggio ( una
comunissima Shape ) con tasti come a, z , , , . non ho problemi: il fatto è
che vorrei che si muovesse con le freccine: so che il codice ascii delle
freccine è quello che va dal 024 a 027 o dal 028 al 031 , ma come posso
dargli queste input? Ho provato con
Case chr (027) : istruzioni
ma non è successo niente! Per le freccine, cosa posso fare?
2: Come posso gestire le collisioni?!?! E' un qualcosa che mi sta facendo
impazzire!
Ciao
Jiz

 ha scritto nel messaggio
news:8ib0ra$cco$1...@nslave2.tin.it...



Per rilevare le collisioni, prova ad utilizzare al posto dei controlli
shape, quelli Picture di cui puoi sfruttare l'evento Paint che si ha quando
una parte della picture è coperta e poi scoperta da un altro controllo
(quindi in caso di collisione).

Newsgroup: it.comp.lang.visual-basic
Titolo: Conversione da txt a dbf

Salve!Il mio problema è che non riesco a esportare una tabella dal formato
txt delimitato al formato dBase III. Ho provato con una query sql ma il Vb6
mi da sempre errore.
Da notare che neanche il visData presente nei samples effettua la
conversione che sto cercando di ottenere. Grazie in anticipo

...


 Francesco Petrone ha scritto nel messaggio


Newsgroup: it.comp.lang.visual-basic
Titolo: Data di sistema

Come faccio a recuperare in una variabile la data di sistema?
Grazie

>Come faccio a recuperare in una variabile la data di sistema?
Dim dtDate As Date
' legge la data corrente e la salva in una variabile
dtDate = Date()  
' incrementa di un giorno
dtDate = DateAdd("d",  1, dtDate)
' cambia la data di sistema con la nuova data
Date = dtDate
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: Posta: Spedire una Mail in formato HTML

Ricevo spesso mail che si presentano immediatamente nel formato HTML senza
bisogno di allegati. Cosa devo "scrivere" per ottenere questo risultato?

 wrote in message
8sm6d6$f82$1...@pinco.nettuno.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Report in VB?

Scusate l'ignoranza ma in Visual Basic6 c'è un qualcosa per realizzare
REPORT?
(tipo i report di access).
Lo chiedo perchè un amico mi ha chiesto se nella versione che ho io di VB
(ho il Visual Studio6.0) ci sono i REPORT?
Sapevo che i report erano in access.
Grazie
Luca

 ha scritto nel messaggio
news:4DLR8.63167$j65.1...@twister1.libero.it...



Anche nella versione Professional è incluso il CR.
Ciao
Ven.
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema Crystal Report (componente ActiveX) e proprieta ParameterFields

Qualcuno ha avuto problemi con la proprieta
    Report.ParameterFields(NumeroParametro) =
"NomeParametro;Valore;VisualizzaMascheraParametri"
Il problema è sul parametro VisualizzaMascheraParametri. Non fa quello che
deve fare.
Nel mio caso ho il primo parametro di un report che è di tipo BOOLEAN e
diventa cosi:
    Report.ParameterFields(0) = "NomeParametro;TRUE;TRUE"
dovrebbe settare il valore a TRUE e non visualizzare la maschera dei
parametri. Invece... la mostra!!
Qualcuno l'ha già incontrato?
Grazie

 ha scritto nel messaggio
news:95efht$5j5$1...@fe1.cs.interbusiness.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Creazione OCX

Ciao a tutti,
voglio crearmi un OCX su misura: all'inizio di Visual Basic quale tipo
di progetto devo scegliere?
Per adesso ho provato con Controllo ActiveX ma quando creo eseguibile
ottengo sì un Ocx ma non ha le proprietà che voglio io.
(esempio1: ha solo tre eventi --> Got Focus ,etc. e non il Click!)
(esempio2: non ha proprietà come ForeColor, etc.)
Come fare? 
Grazie.
Andrea.

 Come fare? 
Apri VB e crea un progetto "activex control"
dopo di che vai sul menu a tendina "Project" e clicca
"Add User Control", ti si aprira una finestra dove potrai
scegliere quale tipo di OCX creare, se guardi bene c'è anche
un WIzard che penso faccia al caso tuo
ciao
Fabio
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Windows CE

si tuò realizzare in Visual Basic un programma con archivi da installare su
un portatilino Windows CE????
Grazie
Ciao da Chrys

un portatilino Windows CE????
Si' noi lo facciamo ma anche il solo allestimento dell'ambiente
(rigorosamente sotto NT) e' un'avventura.
----------------------------------------------------------
Paolo Hölzl
Metis Informatica s.a.s technical manager (Ferrara)
----------------------------------------------------------
ATTENTION!, antispam 
For reply, substitute xxx.xx with 
tin.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Menù avvio o start e ICQ.....

Avrei 2 quesiti:
Avrei bisogno di fare un pulsante che se clickato generi un menů.....
Un pulsante come l'Avvio o lo Start di Win9x quindi...!
Come posso fare...?
Dovrei poi realizzare un programmino tipo ICQ...
Diciamo che ho le idee chiare su come fare tutto tranne la cosa
principale.....!
Infatti sappiamo che l'indirizzo Ip cambia ad ogni connessione... Quindi
come posso cercare l'utente nella mia lista...?
Ho bisogno di fare registrare ogni utente e inserire le informazioni su un
server... che potrebbe essere anche 
http://members.xoom.it/icq/
 (x esempio)
giusto?
ecco il problema č proprio che non so come fare a gestire questa lista sul
server cioč come fare a registrare e rintracciare gli utenti...!
Spero di essere stato chiaro...
Grazie x le risp...
--
Ciao
Federico
--------------------------------------------------------------
E-mail : 
mari...@tin.it
ICQ Number : 48388141
--------------------------------------------------------------

Come posso fare...?
mmm creare un menu (con il top-level) invisibile e poi fare
PopupMenu mnuName
quando clicchi sul pulsante va bene? poi se vuoi metterci le immagini, la
barrettina verticale colorata ecc... allora č un altro discorso...
Faber
P.S.: sorry ma sul resto non posso aiutarti...

se vai su 
vbaccelerator.com
 troverai i sorgenti per fare i menu a tendina
come dici tu.
Per fare un programma tipo icq ti occorre un programma che faccia da server
e che tenga la lista di utenti su un database.
aggiungi un nuovo record sulla anagrafica degli utenti quando si registrano
per la prima volta. Immagina di avere un counter, quello sarà l'UOIN del tuo
utente.
Poi tieni una tabella (chiamiamola ONLINE), questa tabella ad esempio
contiene  due campi (è solo un esempio) ovvero l'UIN dell'utente che si è
collegato e che quindi è in linea in quel momento e data e ora dell'ultimo
"keep alive". Quando l'utente avvia il suo client, manda un pacchetto al
server e il server aggiunge un record se tale record non esiste già. ogni
minuto il client manda un pacchetto di "keep alive" per mantenersi
registrato. se il server non riceve pacchetti dal client dopo n minuti lo
considera disconnesso e lo toglie dalla tabella
se vuoi avere la lista degli utenti il client manderà un comando tipo "ison
xxxxx" (la sintassi ovviamente la sto inventando) al server e il server
ispezionando la tabella gli restituirà lo stato dell'utente desiderato.
Se invece vuoi la lista di tutti gli utenti in linea allora manderai un
comando chesso' "list" e il server farà una query della tabella ONLINE e ti
sbrodolerà la sua lista.
credo che icq usi degli udp per i messaggi da qui il discorso dui pacchetti
con la funzione di "keep alive" altrimenti se fai delle connessioni tcp il
keep alive non serve perchè se ti scolleghi il server se ne accorge al volo.
Spero di averti dato degli input utili :)
ciao
CiRcLeMaster
http://www.arlequine.com/circle
Newsgroup: it.comp.lang.visual-basic
Titolo: lanciare un programma

Ho bisogno di lanciare l'applicazione associata ai file txt per
mostrare il risultato di un'operazione tramite un log-file da me
generato.
c'e' qualcuno che mi sa dare una dritta?
Grazie mille, Claudio Benghi

...


...


Grazie mille, Claudio Benghi
Ringraziando chi mi ha risposto ed aiutato pubblico la soluzione
tratta dalla knowledge base Microsoft:
occhio agli acapo aggiunti dal mailer
Private Declare Function ShellExecute Lib "shell32.dll" Alias
"ShellExecuteA" (ByVal hwnd As Long, ByVal lpszOp As String, ByVal
lpszFile As String, ByVal lpszParams As String, ByVal lpszDir As
String, ByVal FsShowCmd As Long) As Long
Private Declare Function GetDesktopWindow Lib "user32" () As Long
vResponso = MsgBox("Operazione conclusa. Desideri vedere il logfile?",
vbQuestion + vbYesNo)
If vResponso = vbYes Then
    Dim Scr_hDC As Long
    Dim StartDoc As Long
    Scr_hDC = GetDesktopWindow()
    StartDoc = ShellExecute(Scr_hDC, "Open", App.Path & "\log.txt",
"", "C:\", 1)
    If StartDoc <= 32 Then
        MsgBox "Errore nell'apertura automatica del logfile." &
vbNewLine & App.Path & "\log.txt"
    End If
Grazie ancora, Claudio Benghi
bon...@geocities.com
Newsgroup: it.comp.lang.visual-basic
Titolo: DLL VB e pagine internet con ASP

Ciao a tutti,
scusate se sono ancora qui, ma in questo periodo sto tribulando parecchio e
ho bisogno di conforto...:-)
Ecco il problema (?)
Ho un motore di vendita per internet, realizzato sfruttando ASP, VBScript e
SQL...ovviamente per girare nelle pagine internet č contenuto in pagine
*.asp nel mio sito (o in quello di miei clienti).
Domanda:
posso inserire le mie funzioni sql e VBscript in una Dll scritta in ambiente
VB ?
Posso richiamare queste funzioni da pagine HTML contenenti codice ASP
liberamente(ovviamente dopo aver registrato la DLL nel sistema del server)?
La mia necessitą nasce dal fatto che, essendo questo pacchetto commerciale,
venduto a studi grafici, non vorrei che i signori facessero i furbetti e
usassero il motore da me progettato (che essendo scritto su pagine html č
chiaramente visibile ai piu').senza pagarmi le licenze.
Sicuramente non tutti i grafici sono ingrado di fare le opportune
personalizzazioni per i singoli utenti, ma potrebbero passare le pagine a un
qualsiasi programmatore loro conoscente e farmi saltare il poco guadagno che
ne traggo.
Cosa mi suggerite? Mi sto facendo una paturnia inutile o la mia č una
richiesta sensata?
Vi ringrazio tutti per le eventuali risposte.
Grazie
Emanuele
ps. Se dovete insultarmi fatelo sottovoce, per favore....:-)


          Anche se non ho capito cosa intendi per "funzioni sql ", puoi farlo, puoi
creare un componente inprocess/out of process in VB ed usarlo nelle pagine
ASP, lato server naturalmente.
Nota:
 Le pagine HTML non contengono codice ASP...è il contrario...
Ciao
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/


Hai ragione scusa...
Ma con VB devo registrare la DLL nel server...non esistono linguaggi che
consentono di creare delle DLL o altro simile, ma che non necessitino di
registrazione ??
questo sarebbe molto utile....
Puoi indicarmi un sito dove ci siano esempi per chiarire il mio problema (si
lo so..sono un rompiscatole......)
Ri Ciao e grazie
Emanuele

 Ri Ciao e grazie
 Di nulla, ciao


 guarda qui se riesci a chiarirti i dubbi
grazie ci do uno sguardo e spero di capirci di piu'.....
Grazie
Emanuele
Newsgroup: it.comp.lang.visual-basic
Titolo: vb6 masterizzare DVD

Qualcuno conosce un metodo per masterizzare DVD in vb6?
grazie anticpatamente!

 
 
Cerca IMAPI2 ed avrai risposte. Ma temo che avrai un po' di problemi a
farlo andare con vb6.

Newsgroup: it.comp.lang.visual-basic
Titolo: Regular Expression

Ciao a tutti,
Volevo sapere se con le RegExp e il metodo replace c'è un modo per shiftare 
di un offset variabile tutti i caratteri di una stringa.
Es. con offset 4:
ABCDE   => EFGHI
E' esclusa la possibilià di utilizzare cicli "for" per una questione di 
prestazioni (le stringhe possono raggiungere anche il megabyte di 
dimensione)
Qualcuno saprebbe darmi qualche dritta?
Grazie
Adriano 


Non credo che si possa fare con regexp e anche se si potesse non sarebbe certo
molto più performante di un ciclo for.
L'ideale sarebbe far effettuare l'operazione ad una DLL appositamente scritta in
C.
Bye
Raf
-----------------------------------------------------
Funk: cooler than the other side of the pillow.
Newsgroup: it.comp.lang.visual-basic
Titolo: TabStrip, questa sconosciuta

Chi puņ postarmi degli esempi su come si usa questo controllo ???
--
Solo risposte sul news

A differenza delle SSTab, le TabStrip non sono dei "contenitori".
Devi quindi usare il "trucco" dell picture, ovvero disegnare n picture quante sono i Tab e poi nasconderle o
visualizzarle a seconda del tab selezionato.
I controlli sono all'interno delle picture, quindi vengono nascosti o visualizzati automaticamente assieme ad essa.
Eccoti un esempio se non sono stato chiaro:
Disegna in un form un controllo TabStrip, chiamato TabStrip1, un vettore di picture composto da tre elementi
(Picture1(0), Picture1(1), Picture1(2)), e disponi la Picture1(0) nella posizione definitiva;
Disegna, nelle picture i controlli che vuoi e poi:
Private Sub Form_Load()
 
    Dim i As Integer
 
    Cornice = 0
    For i = 1 To 2			'Allineo le Picture
        Picture1(i).Visible = False
        Picture1(i).Top = Picture1(0).Top
        Picture1(i).Left = Picture1(0).Left
    Next i
 
End Sub
Private Sub TabStrip1_Click()
 
    Dim i As Integer
    If TabStrip1.SelectedItem.Index = Cornice Then Exit Sub
 
        For i = 0 To 2
            If i + 1 = TabStrip1.SelectedItem.Index Then		'A differenza degli SSTab, l'indece dei TabStrip
parte da 1
                Picture1(i).Visible = True
            Else
                Picture1(i).Visible = False
            End If
        Next i
    Cornice = TabStrip1.SelectedItem.Index
End Sub
Cornice è una variabile globale che mi fa si, nel caso in cui clicco nel tab corrente, di non ridisegnare a vuoto i
controlli.
Spero di esserti stato d'aiuto,
Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)

Mi da errore in questo punto :
"Private Sub TabStrip1_Click"
con il seguente msg:
Errore di compilazione:
La dichiarazione della routine non corrisponde alla descrizione dell'evento
o della routine con lo stesso nome.
Cosa sbaglio ???

prova ad incollare il codice della sub (senza la dichiarazione della sub stessa) nell'evento Click della TabStrip.


Chi può postarmi degli esempi su come si usa questo controllo ???
  Ce ne sono nell'help.
  Ciao :-)
  Massimo
  Nell'indirizzo, inserire una "h" tra la "t" e la "u"
  In the address, insert an "h" between the "t" and the "u"

"Private Sub TabStrip1_Click"
fai un doppio Click sul controllo e nel codice dovrebbe apparirti la Private
Sub TabStrip1_Click() se non sbaglio mancano le parentesi
ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Svuotare clipboard

Ciao ragazzi!
E' il mio primo post qui, spero che siate clementi (soprattutto se ho sbagliato NG a cui rivolgere
la domanda! ;-)).
Lavoricchiando con Excel, e cercando di migliorare le macro registrate automaticamente, mi sono
imbattuto in un problema, che al momento mi pare irrisolvibile:
esiste un comando, e se sě quale, per svuotare il contenuto della clipboard (o degli appunti, visto
che siamo italiani! ;-)) prima di eseguire altre istruzioni?
Vi sarei grato se poteste darmi una mano!
Grazie mille! Ciao da Hunter! :-)
***********************************************
*               
hun...@iol.it
                *
*                                             *
*  Sete di misteri? Visita la Camera Gialla!  *
*                                             *
*       
http://www.cameragialla.it
            *
***********************************************

 che siamo italiani! ;-)) prima di eseguire altre istruzioni?
Clipboard.Clear

 Clipboard.Clear
Inserendo pari pari la riga in Excel mi segnala "Errore 4242: necessario
oggetto".
Possibile che in Microsoft Visual Basic non ci sia questa "funzione"?
Grazie dei chiarimenti!
Ciao da Hunter!

 ha scritto



Sul sito di Microsoft sembrerebbe essere specificato che per Office non ci
sono comandi per manipolare la clipboard...
(vedi: 
http://support.microsoft.com/default.aspx?scid=KB;EN-US;Q221190&
)
Mi devo mettere il cuore in pace?

 (o degli appunti, visto che siamo italiani! ;-)) prima di eseguire altre
istruzioni?
Per deselezionare la modalità copy di un intervallo di celle (per
intenderci, quello che otterresti premendo ESC quando hai un intervallo
selezionato per la copia) basta che usi
Application.CutCopyMode = False
Se invece intendo cancellare gli appunti di Windows allora ci sono le API
Public Declare Function CloseClipboard Lib "user32" () As Long
Public Declare Function EmptyClipboard Lib "user32" () As Long
Public Declare Function OpenClipboard Lib "user32" (ByVal hwnd As Long) As
Long
Sub ClipboardClear()
  OpenClipboard 0&
  EmptyClipboard
  CloseClipboard
End Sub
--
Ciao, Silv:o)
Newsgroup: it.comp.lang.visual-basic
Titolo: user control e ADO connection

ciao, ho un usercontrol che elenca i server ed i database SQL Server 
disponibili.
sempre da quest'user contol è possibile connettersi al db selezionato 
(quindi dentro l'UC apro una connessione ADO).
La domanda è: se un form utilizza il mio UC, può ottenere come parametro 
di ritorno da una funzione la connessione ADO già aperta?
Perché non funziona questo codice (dando per scontato che la connessione 
funziona nell'user control e che in questa routine in effetti tutto è a 
posto)?
nell'user control:
Public Function GetConnection(ByRef adoConn As ADODB.Connection) As 
ADODB.Connection
    Set adoConn = mConn
    MsgBox adoConn.ConnectionString
End Function
chiamata da form:
    Dim conn As ADODB.Connection
    Set conn = New ADODB.Connection
    Set conn = UC1.GetConnection(conn)
    MsgBox conn.ConnectionString
VB si incazza sull'ultima riga, dicendomi il solito "Variabile oggetto o 
variabile del blocco With non impostata".
grazie e ciao.

 (quindi dentro l'UC apro una connessione ADO).
Lo UserControl è compilato a parte, e referenziato nel progetto, o inserito 
nel progetto come codice e compilato tutto insieme?
Ciao
Alberto
-- 
E tutto mi sembrava andasse bene... 

 Perché non funziona questo codice?


Prova così:

g

Newsgroup: it.comp.lang.visual-basic
Titolo: Modificare l'icona di un Command

E' possibile modificare l'icona di un commandButton quando si posiziona il
cursore sul command stesso?
Un po' come avviene, per esempio, sulla toolbar di Outlook dove le icone
sono inizialmente in bianco/nero e quando si posiziona il mouse diventano
colorate.
Grazie.
Ciao.
Skysurfer

 wrote in message
news:9f7r4b$5um$1...@serv1.iunet.it...


 wrote in message
news:9f7r4b$5um$1...@serv1.iunet.it...

Penso che potrebbe andare utilizzando la funzione LoadPicture().
Ciao!
Esteban
Hosted by 
www.seber.it

 Esteban
Il problema era sapere quando il mouse si trova sul command e quando lo
abbandona.
Comunque con il sorgente che ho trovato sul sito di Diego sono riuscito a
farlo.
Grazie mille.
Ciao.
Skysurfer

Newsgroup: it.comp.lang.visual-basic
Titolo: intercettare evento scroll del mouse

salve ragazzi volevo sapere quali api bisogna usare e come usarle per
intercettare lo scrollo della rotellina del mouse....
grazie mille......

 ha scritto nel messaggio
news:9sdp66$giu$1...@nreada.inwind.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Aiutatemi!!!!

Salve a tutti!
Ha bisogno di un aiuto!! Ho pochissimo tempo per realizzare una sorta di
catalogo di immagini da selezionare da una struttura che prevede più livelli
di famiglie. Fin ora non ho mai avuto a che fare con la gestione di immagini
e non so come approcciare ad un discorso del genere.
le mie domande sono:
1)  In che controllo visalizzare le immagini selezionate?
        Ho pensato di utilizzare una picture pox ma non so se sia
efficiente.
2)  dove posso immagazzinare tutto l'archivio delle immagini? E' possibile
utilizzare un MDB?
3)  C'è qualcuno che ha già avuto a che fare con un progetto del genere e
magari ha anche qualche pezzo di sorgente da inviarmi??
Vi ringrazio anticipatamente!!!
Li...@mediasystems.net

 
Li...@mediasystems.net
Mi dispiace,ma non ne ho.Ciao e buon lavoro!

Newsgroup: it.comp.lang.visual-basic
Titolo: VB6 IN WINDOWS 3.1

Qualcuno mi sa dare una mano, come avete fatto in passato?
Mi č stato richiesto di realizzare un programmino per windows 3.1 ma io so
usare (sigh) solo VB6.
E' possibile ugualmente ma VB6 non č compatibile a ritroso?

 ha scritto nel messaggio
news:HELD4.23550$pn3.2...@news.infostrada.it...

NO! VB6 crea eseguibili a 32bit, non eseguibili in Windows 3x. Devi
utlizzare la versione 4.0 che aveva le due possibilitą: 16 e 32.
La sintassi di VB4 č la stessa, cambieranno tutti gli OCX (che si chiamavano
VBX, mi pare) e le DLL.
 
federic...@planet.it
Eliminare NOSPAM dall'indirizzo! Delete NOSPAM from address!

 VBX, mi pare) e le DLL.
oppure, diceva qualcuno, provare a installare win32s sul 3.x, e pregare
molto.
Newsgroup: it.comp.lang.visual-basic
Titolo: mettiamo che.. ti copino il programma....

problema:
1. mettiamo che fate un bel programma in VB per la vostra ditta
2. mettiamo che questo programma crea un bel danno ad una software-house che
forniva alla vostra ditta qualcosa di simile ma che era una cagata e che per
colpa vostra potrebbe perdere una commessa con parecchi zeri.
3. mettiamo che la software-house vi accusi di plagio!
4. mettiamo che il vostro capo (sostenitore della software-house presso la
ditta in cui lavorate e probabile destinatario di qualche manciata di zeri
di cui sopra) voglia vedere il sorgente e voi vi limitate a passare il
tabulato senza form ect ect.
5. mettiamo dopo qualche settimana la software-house esce con un
'aggiornamento' del software.
6 mettiamo che riuscite a mettere le mani sui cd di installazione.....
mi avete capito... è possibile riportare in qualche modo un eseguibile allo
stato di sorgente per dare un'occhiata??? magari lo trovo abbastanza
familiare...
in attesa di risposte.

 ti fai assumere da quella software-house? ;-)
perchè sto' casino serviva solo a chiedere un decompilatore senza essere
flamato
;-))))

ti fai assumere da quella software-house? ;-)
mmm..... questa è buona....
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

 wrote in message
WVZD5.15360$N93.5...@news.infostrada.it...
| problema:
| 1. mettiamo che fate un bel programma in VB per la vostra ditta
| 2. mettiamo che questo programma crea un bel danno ad una software-house
che
| forniva alla vostra ditta qualcosa di simile ma che era una cagata e che
per
| colpa vostra potrebbe perdere una commessa con parecchi zeri.
| 3. mettiamo che la software-house vi accusi di plagio!
| 4. mettiamo che il vostro capo (sostenitore della software-house presso la
| ditta in cui lavorate e probabile destinatario di qualche manciata di zeri
| di cui sopra) voglia vedere il sorgente e voi vi limitate a passare il
| tabulato senza form ect ect.
| 5. mettiamo dopo qualche settimana la software-house esce con un
| 'aggiornamento' del software.
| 6 mettiamo che riuscite a mettere le mani sui cd di installazione.....
| mi avete capito... è possibile riportare in qualche modo un eseguibile
allo
| stato di sorgente per dare un'occhiata??? magari lo trovo abbastanza
| familiare...
| in attesa di risposte.
|
|

 in attesa di risposte.
Gira e rigira.. stai chiedendo un decompilatore per VB giusto ? :-y
Newsgroup: it.comp.lang.visual-basic
Titolo: API ExtTextOut

Sto cercando di ottenere un testo ruotato, bordato, di un colore
assegnato, e con uno sfondo colorato.
Con questa funzione ho due mini-problemi:
- mi scrive solo il primo carattere. Se pongo l'ultimo parametro della
exttextout a 5 me ne scrive 2. Se attivo la SetTextAlign non mi scrive
nulla. Comunque il rect giallo lo fa della dim giusta.
- se hDC invece di una form e' printer.hdc, sulla stampante che devo 
usare non genera lo sfondo. il driver riconosce invece bene i
rettangoli generati con Polygon().
Dove sto sballando?
Grazie,
Sub Text_2(hdc As Long, Testo As String, x1 As Integer, y1 As Integer,
x2 As Integer, y2 As Integer, angolo As Integer, pitch As Integer,
Font As String)
Dim ofont As Long
Dim k1 As Long
Dim k2 As Long
Dim siz As Size
Dim r2 As RECT
    gLogFont.lfEscapement = 0
    gLogFont.lfOrientation = 0
    gLogFont.lfFaceName = Font + Chr(0)
 
    gLogFont.lfHeight = Abs(-MulDiv(pitch, GetDeviceCaps(hdc,
LOGPIXELSY), 72))
    gLogFont.lfWidth = 0
 
    ofont = CreateFontIndirect(gLogFont)
 
    k1 = GetTextExtentPoint32(hdc, Testo, Len(Testo), siz)
 
    r2.Bottom = y1 * Coeff
    r2.Left = x1 * Coeff
    r2.Right = r2.Left + 
siz.cx
 * Coeff
    r2.Top = r2.Bottom + 
siz.cy
 * Coeff
    If ofont Then
        k1 = SelectObject(hdc, ofont)
'        k2 = SetTextAlign(hdc, TA_CENTER)
        k2 = SetBkColor(hdc, 65535)
        k2 = ExtTextOut(hdc, x1 * Coeff, y1 * Coeff, ETO_OPAQUE, r2,
"Prova", 5 , 0&)
        k2 = DeleteObject(ofont)
    End If
End Sub

Che succede se metti
    gLogFont.lfWidth = 300
PS: come fa a funzionare : >    gLogFont.lfFaceName = Font + Chr(0)
?????
Ciao, Fabio

- mi scrive solo il primo carattere.
L'errore probabilmente sta nella dichiarazione dell'ultimo parametro della
funzione. Quel parametro serve per impostare una distanza diversa da quella
di default tra i caratteri che compongono la stringa. Se passi uno 0 per
riferimento passi un puntatore valido (<>Null), devi passarlo per valore.
Considerazioni aggiuntive:
se calcoli la dimensione del rettangolo di clipping della stringa prima di
selezionare il nuovo font, la dimensione restituita sarà quella del font
selezionato in precedenza e non quella del nuovo font.
gLogFont.lfEscapement = 0, gLogFont.lfOrientation = 0,gLogFont.lfWidth = 0
 sono dei valori di default quindi puoi anche non impostarli
Prima di cancellare il nuovo font lo devi deselezionare dal cd nel quale è
stato utilizzato. Ciò si effettua selezionando nel dc il vecchio font.
Più in generale quando modifichi una proprietà di un dc, la devi poi
reimpostare al suo valore iniziale.
Quando utilizzi le funzioni API con la stampante devi, per inizializzare la
stampa, inviare un comando print es Printer.print
Ciao Bruno




Per il colore del testo la funzione è SetTextColor(hdc,rgbColor)
Ciao Bruno


e secondo te, con le domande che faccio, mi è chiaro come fa a
funzionare=? :-)))))
Probabilmente sto facendo una mezza bestialità, ma dato che le API si
aspettano una stringa zero-terminated, faccio come facevo con il C.
Ciao,
Newsgroup: it.comp.lang.visual-basic
Titolo: VB e Open GL

Hello,
Qualcuno lo ha già usato?
Se si sarei grato se potesse darmi 2 dritte per iniziare
Thanks and Bye
Willy

Se si sarei grato se potesse darmi 2 dritte per iniziare
L'uso di OpenGL in VB non differisce dall'uso che se ne fa in qualsiasi
altro linguaggio. Ed e' anche lo stesso (fatte alcune eccezioni) che si fa
sotto altri sistemi operativi. Ti consiglio di procurarti la "bibbia" ovvero
"OpenGL Programming Guide" che, nella nuova versione (1.1) e' abbastanza
completa e tratta (anche se di striscio) anche il mondo Windows (WGL).
Molto comodo e' l'uso della GLUT (L'Utility Toolkit) che ti permette di
svincolarti totalmente dal linguaggio ed anche dal sistema operativo e ti
libera dal dover fare tutte le inizializzazioni necessarie ad aprire una
finestra di rendering (anche questa e' trattata sulla "bibbia").
Esempi ed informazioni aggiuntive le puoi trovare all'indirizzo
http://www.opengl.org
Oggi la cosa bella e' che molte schede VGA (tranne la Matrox <grin>) hanno i
loro ICD per accelerare le funzioni OpenGL in modo del tutto trasparente.
Ciao
Gian Michele Bertoni
homepage: 
http://space.tin.it/computer/gbertoni

 completa e tratta (anche se di striscio) anche il mondo Windows (WGL).
Ma è un libro da acquistare o esiste una versione free da scaricare da
internet ?
Newsgroup: it.comp.lang.visual-basic
Titolo: VBA

Esiste una funzione in VBA in grado di contare le pagine di un documento
Word?
Vi ringrazio in anticipo per la gentile risposta
Bek

 Esiste una funzione in VBA in grado di contare le pagine di
un documento Word?
No.
Esiste, nella libreria "Office", la classe
"DocumentProperties", che e` un insieme di oggetti
"DocumentProperty".
Ogni oggetto-documento di Office (un Documento di Word, una
cartella di lavoro di Excel, ...) ha due collezioni di
proprieta` del tipo "DocumentProperties", una predefinita,
"BuiltInDocumentProperties", ed una personalizzata,
"CustomDocumentProperties"; sono presenti nelle pagine alle
quali hai accesso mediante "File/Proprieta`...". In
particolare, alla pagina "Statistiche" della finestra
"Proprieta`" trovi la proprieta` "Pagine" ed il valore
corrente.
Puoi quindi trovare il valore in questione almeno in due modi:
1. accedendo alle "statistiche" del documento;
    With Word.Application.ActiveDocument
        Debug.Print .ComputeStatistics(wdStatisticPages)
    End With
   che, ovviamente, puoi abbreviare in:
    Debug.Print _
      ActiveDocument.ComputeStatistics(wdStatisticPages)
2. accedendo alle "proprieta`" del documento:
    With Word.Application.ActiveDocument
      Call .Repaginate
      With .BuiltInDocumentProperties
        Debug.Print .Item("Number of pages")
      End With
    End With
Come si fa a sapere che esiste una proprieta` predefinita di
nome "Number of pages"? Cosi`, piu` o meno:
    Dim obj As Office.DocumentProperty
      ' Preveniamo gli errori, dato che non tutte
      ' le proprieta` potrebbero essere valorizzate...
      '
      On Local Error Resume Next
      With Word.Application.ActiveDocument
        Call .Repaginate
        For Each obj In .BuiltInDocumentProperties
          With obj
            Debug.Print .Name, .Value
          End With: Set obj = Nothing
        Next
      End With
--
Ciao.
Maurizio
Newsgroup: it.comp.lang.visual-basic
Titolo: come si fa a salvare dati su un file

Ho fatto una piccola applicazione che fa dei calcoli
Come faccio ora a salvare questi risultati su un file in modo che possa
riaprire i dati senza dover un'altra volta imputare i dati di partenza??
Grazie

 ha scritto nel messaggio
news:9sebkf$132qj9$1...@ID-105970.news.dfncis.de...


 ha scritto nel messaggio
news:7DyG7.25595$zl4.7...@news2.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Ras API su NT

Ciao a tutti, qualcuno sa dirmi come effettuare la chiamata alla Api
RasDial per farla funzionare su WNT ? Grazie. Ciao. 

RasDial per farla funzionare su WNT ? Grazie. Ciao. 
Dai un'occhiata sul mio sito.
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

Newsgroup: it.comp.lang.visual-basic
Titolo: Analizzare musica con Visual Basic.

Ciao a tutti,
    il mio problema è che vorrei sapere se con Visual Basic si può
analizzare musica e più precisamente un forma d'onda. Se si, qual è la
strada migliore per intraprendere questo cammino e soprattutto, sono
necessari ActiveX aggiuntivi?
Un grossimo ringraziamento a chiunque avrà la voglia di rispondermi.
Saluti, Marco.

 writes:
CM> Ciao a tutti,
CM>     il mio problema è che vorrei sapere se con Visual Basic si può
CM> analizzare musica e più precisamente un forma d'onda.
Oddio, sarebbe meglio un linguaggio più efficente. In C/C++ inoltre ci
sono già  molti algoritmi  preconfezionati (ad esempio  la velocissima
FFTW). Alla peggio front end VB e calcoli in una DLL C.
Altra soluzione è usare un tool come Matlab.
--
Gian Uberto| main(){printf(&unix["\021%six\012\0"],(unix)["have"]+"fun"-0x60);}
Lauri      |                        David Korn, 1987 ioccc best one liner 
(aka saint)|-------------------------------------------------------------------
em@ail: 
sa...@eng.it
 ( vedere X-nospam nello header - see X-nospam in header )

Marco:
  dipende da quello che vuoi fare.
Se il tuo scopo e' l' analisi di un segnale in tempo reale, non ho
suggerimenti da darti.
Se invece ti accontenti di fare analisi spettrale (FFT, DFT),
filtrazione FIR e IIR, funzioni di auto e mutua correlazione, etc...
su di un segnale memorizzato in un file, ti posso segnalare il
progetto FiltCalc che ho messo sul mio sito di "Downloads" a:
 
http://members.xoom.it/flanguasco/
E' un programma che ho fatto e che uso regolarmente per usi
industriali (segnali di pressione, portata, vibrazioni, ...)
ma che puo' benissimo essere usato anche per la musica.
Purtroppo manca un "help" in linea che ne illustri le
possibilita'.
Ciao e se poi lo dovessi trovare utile ma avessi qualche problema
ad usarlo, contattami pure.
Franco

Newsgroup: it.comp.lang.visual-basic
Titolo: R: STRING instabile


Prova a sostituire la INPUT # con LINE INPUT #1
Ciao
Ven

1) Non postare in HTML che non si riesce a risponderti (riferito a
RielaGroup)
2) Prova cosě :
Open "nomefile.txt" For Input As #1 Len = 300
Len=300 dovrebbe considerarti i primi 300 caratteri di ogni riga.
Ciao