mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Stampa scontrini...

Ciao,
se a qualcuno interessa ho realizzato un ocx, pronto all'uso, per stampare
gli scontrini fiscali. Supporta già un discreto numero di registratori
fiscali.
Il software in verità è in vendita ma al momento non c'è alcuna protezione,
quindi basta usarlo e tutto andrà benone.
Se poi qualcuno ha qualche buon consiglio o trova qualche difetto, non ho
nessuna difficoltà a regalarne la licenza d'uso.
L'ocx si chiama: df_ecr basta fare una ricerca in giro oppure vi posto
l'url.
Grazie

 l'url.
non so se ti va , vista la strana licenza del tuo ocx, cmq potresti inviarlo
al sito comune (in firma) cosi da renderlo disponibile a tutti Tnk ! (magari
mettici la versione vecchia e la new la tieni in vendita)
-- 
<Gigio2K>
--- 
http://www.g2kweb.it/gigio2k
 ---
Nokia -> I.T.H.N. -> 
http://www.ithn.it/
VB -> I.C.L.VB -> 
http://www.it-lang-vb.net/

 wrote in message
news:c0jao9$175gs2$3...@ID-174485.news.uni-berlin.de...


 dove è il sito comune?
http://www.it-lang-vb.net/
Bye, G.

 wrote in message
news:c0jks8$16l130$1...@ID-108681.news.uni-berlin.de...


Qui il download diretto: 
http://www.info2001.it/download/df_ecr.msi

> Qui il download diretto: 
http://www.info2001.it/download/df_ecr.msi
Ti consiglio di allegare nell'installazione un piccolo file di guida (magari
anche solo un esempio commentato).
Inoltre la licenza dice:
"LEI NON PUÒ:
[cut]
- RIVENDERE, INCORPORARE, PARTE O TUTTO DEL SOFTWARE IN ALTRI"
dovresti modificarla perchè l'ocx viene incorporato.
Inoltre, visto che hai detto che possiamo usarlo liberameente, dovresti
rilasciarne una versione sotto licenza free ed una sotto licenza
proprietaria (per intenderci quella che vieta ad altri di ridistribuire il
tuo ocx).
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
www.nicolaottomano.it

 wrote in message
news:vY5Yb.44022$VS6....@tornado.fastwebnet.it...


 inserite le varie clasuole,etc.
Non è proprio così, sarebbe meglio mettere un file con su scritto "il
controllo è freeware... può essere utilizzato in applicazioni vb... ecc".
Così siamo tutti sul sicuro.
Inoltre una domanda.
l'ho provato oggi (non attaccato ad un registratore di cassa però) e mi da
errore.
Dice che manca keycntrl.ocx. cosa è?


 wrote in message
news:yltYb.45952$VS6....@tornado.fastwebnet.it...


 wrote in message
news:yltYb.45952$VS6....@tornado.fastwebnet.it...


 
www.info2001.it/forum
ok e grazie ancora per aver postato il controllo al Sito Comune.


 wrote in message
news:2WkZb.50877$VS6....@tornado.fastwebnet.it...


 Oggi ho messo in linea una nuova versione che funziona.
Ho fatto una prova (però senza stampare perchè non ho la cassa) e funziona
perfettamente.
:-)


 wrote in message
news:3Ea_b.6179$UI5...@tornado.fastwebnet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: VB6 Riconoscitore vocale

Ciao Ragazzi,
nella mia applicazione VB6 vorrei inserire dei comandi vocali in italiano, 
ma non ho idea da dove iniziale....
Avete suggerimenti o esempi ????
Grazie mille 

 Avete suggerimenti o esempi ????
Ma vuoi che legga del testo, o vuoi comandare il tuo programma con dei
comandi vocali?

Vorrei comandare il mio programma con comandi vocali
"Andrea [Work]" <andrea.isw...@gmail.invalid> ha scritto nel 
messaggio news:oaesemidgnnk.1quyvrr4w9ksj$.dlg@40tude.net...


 ha scritto nel messaggio 
news:4c617186$0$18659$4faf...@reader3.news.tin.it...

Dovresti reperire le librerie SAPI4SDKSUITE.exe e installarle,
che però sono in lingua inglese, per adattarle alla lingua Italiana
ti serve per esempio l'applicazione TTSIT.EXE.
dopo di chè scrivere un bel pò di codice per far girare il tutto
sopratutto per la parte di riconoscimento vocale.
saluti
JS

 ha scritto nel messaggio 
news:4c61ad81$0$6826$5fc...@news.tiscali.it...


 ha scritto nel messaggio 
news:4c685b24$0$18992$4faf...@reader5.news.tin.it...


 ha scritto nel messaggio 
news:4c6928dd$0$30912$5fc...@news.tiscali.it...


 ha scritto nel messaggio 
news:4c699abf$0$40290$4faf...@reader2.news.tin.it...


 ha scritto nel messaggio 
news:4c6928dd$0$30912$5fc...@news.tiscali.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: ADO forse domanda stupida.....

....ma non ho trovato alcuna risposta  a riguardo e spero che qualche super
esperto mi possa dare qualche dritta!
Utilizzando l'ADO apro un recordset, e trasferisco il valore (Set
Forms("CLIENTI").Recordset = rst1, dove rst1 e' definito come
ADODB.recordset) ad una maschera che non ha origine dati.
Cosě riesco a visualizzare tutti i record.
Il problema si presenta invece quando cerco , utilizzando lo stesso metodo,
di creare una maschera per inserimento dati, dopo aver usato il comando
rst1.addnew non posso inserire nessun valore sulle caselle di testo presenti
nella mia form (da notare che ogni casella di testo ha come origine record
il nome del campo di riferimento (es nomecliente, indirizzo etc) anche se
poi la maschera non ha nessun origine dati associato.
C'e' qualche passaggio saltato?? oppure devo solo cercare (ma fin ora non
l'ho trovata) l'istruzione che mi permetti di dire
....form.clienti.recordsource=recordset??
Ciao a tutti e spero proprio di trovare un esperto di ADO....
Grazie
--
* SuperDavid *


Il problema non č di Ado, ma di Access (perchč tu non ce l'hai detto ma stai
usando Access, vero?...)
Quando tu passi il recordset alla form, ne setti la source, č vero, ma
questo non significa che i controlli abbiano come source il rst1... quindi,
continua a fare una Addnew sulla form.recordsource...
(Access mi pare faccia una cosa tipo docmd.goto newrec o qlc di simile...
Orrore...)
ciao
ugo

---------------------------------------------------------------------------
---------<
-- 
Posted from [212.141.54.102] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Mi piacerebbe capire da dove proviene la Proprietà Recordset di Forms????
Non mi pare essista!!!Se così come faccio a collegare la Maschera e i
relativi
campi ai dati di un Recordset??? Visto che Access non sà gestire nemmeno
gli array di controlli, devo scrivere Sub esagerate per ripopolare le
TextBox??
Spero questi dubbi arrivino dalla mia scarsissima conoscenza di Access.
Se qualcuno ha delle dritte per il problema???


 Right("ACCESS",4).
diciamo Right$("ACCESS", 4) & "O"
-- 
Samuele Battarra
mail server: 
libero.it
, indirizzo: battarsa@(mail server)
prova il mio newsreader:
http://digilander.iol.it/battarsa/programmi/leggiminews.html

Newsgroup: it.comp.lang.visual-basic
Titolo: replicate property window

Hello,
      I want to provide functionality like that of the property window
in VB IDE particularly that of the catagorized mode. I should be able
to show the property-value pair in a an heirarchial manner. I need
something of a sort of cross between listview and the treeview, or
should I be looking at something else. flex datagrid control??
Thanx in Advance,
Ash

 wrote in message
news:5f878834.05031...@posting.google.com...

Newsgroup: it.comp.lang.visual-basic
Titolo: Differenza ADO e DAO

Devo inziare la progettazione dei un programma di una gestione dati e
conosco abbastanza bene il DAO ma non l'ADO.
Ci sono vere differenze sostanziali fra ADO e DAO?
Se sì, in quali casi mi consigliate l'uso di uno piuttosto che l'altro?
Grazie della vostra disponibilità
Mauro

Su MSDN ci sono bellissimi articoli su DAO, RDO e ADO!
In breve:
- DAO e' il vecchio e non sara' piu' supportato; ottimo per database Access, pessimo per database ODBC; puoi fare qualunque cosa: cambiare struttura del database, delle relazioni, etc.
- ADO e' il nuovo; ottimo per qualsiasi database (da Access a DB2 su mainframe); se non sbaglio ad oggi non e' possibile modificae la struttura di un database ma solo leggerla.
Nell'uso sono abbastanza simili. ADO ha in piu' una gestione piu' attenta del tipo di cursore, del tipo di lock e del tipo di "isolation level" ovvero del "lock a livello di tabella" (semplificando, guarda la documentazione per i dettagli).
Se usi ADO puoi usare il Data Environment che ti permette di scrivere SQL in modo grafico e vedere la connessione come un oggetto globale del programma (tipo un form) con metodi che corrispondo all'esecuzione delle query. Molto comodo, professionale e ottimo per non "inchiavardare" il programma di select da tutte le parti.
Antonio

Antonio
... e dove posso trovare un po di documentazione ?
Grazie.
Bruno

>... e dove posso trovare un po di documentazione ?
Su MSDN Library che dovresti gia' avere c'e' scritto di tutto, di piu'.
Antonio

Newsgroup: it.comp.lang.visual-basic
Titolo: Cerco VB3

Qualcuno puo' aiutarmi?
cerco Una copia di Visual Basic 3.0 Professional.
Originale per favore con licenza d'uso.
Grazie

Originale per favore con licenza d'uso.
Visual Basic 3.0 č stato inserito tra i programmi decretati come "morti" da
Microsoft... non mi sono ancora informato esattamente, ma credo che ciň
sottindenda il fatto che ora non č piů necessaria nessuna licenza per
utilizzarlo.
^____^
Visual Basic 3.0 č morto ?!
Viva Visual Basic 3.0 !!!  ^__^
Zeross
Newsgroup: it.comp.lang.visual-basic
Titolo: Come ottenere la funzione PopUp GUIDA RAPIDA di win 95 ?!

Vorrei utilizzare nei miei programmi dei menů PopUp che quando
l'utente fa click con il mouse su determinate aree del programma gli
venga presentato un piccolo menů con l'opzione Guida Rapida, simile
alla funzione disponibile in Win95. So come fare per creare menů PopUp
ma non so come fare ad associare l'evento del mouse con un file
contenente gli help.
Grazie.

...


Grazie.
------------------------------------------------
Devi per prima cosa costruirti un file Help con un programma apposito (che
credo tu abbia già fatto), e ad ogni Help per oggetto devi assegnare un
numero di identificazione.
Se ad esempio hai fatto un Help per una TextBox gli assegni il numero di
identificazione (ad esempio 100).
A questo punto dopo che hai compilato l'help, quando lavori in VB alla
TextBox che inserisci sulla form dovrai assegnare alla sua proprietà
WHATTHISHELPID il numero 100 (lo stesso che hai usato per l'help).
Quando clicchi sulla Text col tasto Dx devi aprire il suo Help 100 quindi
nella Procedura  Sub Text_MouseDown(button as
integer..........................) scrivi
If Button=VBrightButton then
    gethelp (che chiama un'altra procedura)
End Sub
Public Sub GETHELP ( C as Control)
C.SHOWWHATSTHIS
End Sub
 Per fare ciò comunque ricorda di dichiarare la variabile C nel General
Private C as Control
Forse è un pò incasinato, ma non è molto difficile, fai qualche prova
Ciao
Paolo (Antares)


wrote:

Grazie mille per il suggerimento, purtroppo il file help non l'ho
ancora fatto e non so da dove cominciare. Non sapresti mica indicarmi
qualche programmino che mi permetta di creare e compilare un file
hlp?

hlp?
----------------------------------------------------------------------------
-----------------------------------------
Ciao, credo che senza che tu ti sia costruito l'help sarà difficile fare
eseguire al tuo povero Pc  quello che hai intenzione di dover fare.
Non so consigliarti molto su che programma usare, ma ti posso dire che io ne
ho trovato uno in Internet che è piuttosto intuitivo.
Non sono in grado di darti l'indirizzo, ma cerca questo titolo con i motori
di ricerca:
"ForeHelp"
Ciao
alla prossima
Paolo (Antares)
Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO - Ottenere l'immagine (picture) da un controllo OLE

Salve a tutti!
Ho un problema molto grave. Sto usando VB4/16bit e ho bisogno di ottenere
una picture da un controllo OLE contenente un'equazione (da Equation
Editor). So che il controllo OLE ha la proprietà .Picture, ma funziona solo
se l'applicazione server è attiva e questo nel mio caso non è vero poichè
leggo gli oggetti ole da files su disco (con OLE1.ReadFromFile) e
l'applicazione server non è nemmeno installata (le files ole sono creati
con Equation Editor su un pc, poi la mia applicazione su un altro pc li
legge e qui ho bisogno l'immagine).
Per favore, aiutatemi, non so proprio come fare, le ho provate tutte. Ho
trovato anche l'API OleCopyToClipboard che potrei usare per copiare
l'immagine nella Clipboard e poi incollarla in una picturebox, ma non
conosco la dichiarazione (e il metodo .Copy del controllo OLE non funziona
se l'applicazione server non è attiva...).
Vi ringrazio!!
Paolo Mugnaini
PS Per favore rispondetemi a 
smar...@tin.it



Newsgroup: it.comp.lang.visual-basic
Titolo: giusto una conferma per Public

se definisco una Sub come Public Sub la posso richiamare con call in
qualsiasi "punto"del programma, giusto? se scrivessi Private invece non
funzionerebbe, no?
mi serve giusto una conferma.
grazie a tutti per la pazienza
ivan

 mi serve giusto una conferma.
confermo!
private può essere chiamato soltanto dal modulo in cui la sub è dichiarata.
--
Fibia "Sakamoto" FBI
E-mail: 
fibi...@hotmail.com
ICQ UIN 63586057
Sito Personale: 
http://www.geocities.com/fibiafbi
VB Simple: 
http://vbsimple.virtualave.net
Membro #25 delle Mitiche Brigate Takahashi sezione Sud

 private può essere chiamato soltanto dal modulo in cui la sub è
dichiarata.
E se le metti in un modulo il codice diventa ancora + leggibile.
Almeno io faccio cosi... :-)
_____________________________________________
James Tiberius Kirk, matricola SC 937-076 CEC
  Nato a Riverside, nello Iowa, USA, Terra
            il 1277.1 (26/03/2233)

Newsgroup: it.comp.lang.visual-basic
Titolo: Cancellare righe in una tabella.

Vi chiedo un'info. Che tipo di info sql dovrei fare per cancellare ad
esempio soltanto le prime 100 riche di una tabella
Grazie

 esempio soltanto le prime 100 riche di una tabella
la prima ceh mi viene in mente:
    dim conn as new adodb.connection
    dim rsTemp as new adodb.recordset
    conn.Open StringaDiConnessione
    rsTemp.Open "Select TOP(100) FROM Tabella",conn,adOpenStatic
    do while not rstemp.eof
            conn.execute "DELETE * FROM Tabella Where ID="  & rsTemp!ID
            rsTemp.movenext
    loop
    rsTemp.close
    conn.close
    set conn=nothing
CIAO



SELECT TOP 100 * FROM tabella
while not RS.eof
	RS.Delete
	RS.MoveNext
wend

Claudio Gamberini ha scritto:

Più semplicemente:
DELETE FROM Tabella WHERE ID IN (SELECT TOP 100 ID FROM Tabella)
-- 
Samuele Battarra
prova il mio newsreader:
http://digilander.iol.it/battarsa/programmi/news/
Newsgroup: it.comp.lang.visual-basic
Titolo: Ado.net filtrare dei dati

Salve a tutti,
con ADO 2.7 era possibile applicare dei filtri al recordset senza
dover rieseguire la query.
Ora sto cercando di fare la stessa cosa con l'ogetto datareader
di .net ma non riesco a capire come si fa.
La mia necessità è popolare una treeview con i dati di un datareader
filtrati.
Grazie in anticipo per l'aiuto
Marco

In net cariche un DataSet con il metodo Fill del dataAdapter.
Poi crei un Dataview a partire dal DataSet e su questo pui impostare i
filtri che vuoi.
In pratica il DataSet č come un mini database in memoria e il DataView č una
vista personalizzata.
Ai vari controlli gli dai come sorgente di dati il DataView, cosě ti
verranno visualizzati solo i record che rispettano il filtro impostato. 

 verranno visualizzati solo i record che rispettano il filtro impostato.
Grazie. Conosci qualche sito con qualche esempio?
Grazie

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

C'e' qualcuno che gentilmente sa dirmi come posso fare a mettere un
campo che punta un database (RptTextBox) nell'intestazione pagina o
nell'intestazione report con crystal report di visual basic 6.0 ?
Se non puo' essere fatto c'e' un'alternativa ?
A me serve di visualizzare un nome nell'intestazione pagina contenuto in
un database .mdb
Grazie in anticipo

 wrote in message 396C8AC3...@virgo.infn.it...

Quando ho problemi del genere di norma definisco un campo funzione fittizio vuoto che posiziono
nella testata,
che poi valorizzo dal codice VB prima di dargli il via.
Mi sembra che per fare questo devi dirgli qualcosa tipo
OCXCrystalReport.Formulas(IndiceDellaFunzione) = "NomeDellaFormula = " & ValoredaVisualizzare
--
C'ya,
ICQ           14842802                   Rimuovere NOSPAM per email private

Newsgroup: it.comp.lang.visual-basic
Titolo: R: [?] Ai GURU delle API, scrolling...

Ecco l'esempio per scrollare una textbox, la label purtroppo non ha hwnd
quindi no Sendmessage
Option Explicit
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA"
(ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Integer, ByVal
lParam As Long) As Long
Const EM_LINESCROLL = &HB6
Private Sub Command1_Click()
SendMessage Text1.hwnd, EM_LINESCROLL, 2, 4
End Sub
Private Sub Form_Load()
Dim intLineIndex As Integer, intWordIndex As Integer
         Text1.Font = "Courier New"
         Text1.Text = ""
         For intLineIndex = 1 To 25
            Text1.Text = Text1.Text & "Line" & Str$(intLineIndex)
            For intWordIndex = 1 To 5
               Text1.Text = Text1.Text & " Word" & Str$(intWordIndex)
            Next intWordIndex
            Text1.Text = Text1.Text & vbCrLf
         Next intLineIndex
End Sub
Ciao,
Corrado

 DaVe
Io un'idea c'è l'avrei! Senza API!
L'ho anche provata e funziona! Consiste nel collegare il valore di una
VScrollBar alla proprietà top della label.
Ti ho anche scritto un progettino di esempio che permette lo scrolling di
una label su una picture. Se ti interessa mandami il tuo indirizzo e-mail
che te lo invio!
 __     __
<o>  <o>
      []
  \____/   ......(Fammi sapere!)
Pasquale Minerva
mine...@libero.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Esiste funzione di temporizzazione per microsecondi o similie?

Salve a tutti,
dovendo spesso effettuare misure di tempo ed attese di tempo molto
piccole precise,mi chiedevo se non esistesse una funzione per
misurazione o temporizzazione precisa con valori minimi nell'ordine
dei microsecondi o simile......
Vi ringrazio e vi saluto..

 ha scritto nel messaggio
news:41444af7...@news.tin.it...


 ha scritto nel messaggio
news:41444af7...@news.tin.it...

Bye
Raf

Newsgroup: it.comp.lang.visual-basic
Titolo: Basic e AmigaOs

Chi di voi a esperienze di programmazione in AmigaOs ?
Esiste, in AmigaOs, un ambiente paragonabile a VB ?

 wrote in message
b6%85.34450$2s6.4...@news.infostrada.it...


> penso di no, ma AMOS "era" stratosferico
Grande l'AMOS
Easy Amos - Amos The Creator - Amos Professional
Sigh, il mio primo linguaggio "serio"
--
Fibia "Sakamoto" FBI
URL: 
www.geocities.com/fibiafbi
E-Mail: 
fibi...@hotmail.com
ICQ UIN 63586057

 Esiste, in AmigaOs, un ambiente paragonabile a VB ?
Ho visto che molti hanno indicato Amos... e il Blitz Basic 2.1 che fine
ha fatto? E' almeno 5 volte più veloce dell'Amos! (e ne sono sicuro
perchè li conosco benissimo entrambi, ed a fondo anche...)
Cmq non saprei dirti al momento dove poterlo trovare. Se ti interessa
saperne di più posso cercare qualche riferimento. Dammi conferme via
mail.
Byez!

Newsgroup: it.comp.lang.visual-basic
Titolo: Stampare Testo Giustificato

Carissimi tutti,
sto impazzendo, avrei bisogno di stampare al pių presto il contenuto di un
RTF su carta in modo che sia giustificato in margini che posso impostare sia
a runtime che a design time.
Qualcuno ha qualche idea?
Carlo

 Qualcuno ha qualche idea?
mi pare che sul sito comune (
http://www.murialdo.it/it_lang_vb
) ci sia un
esempio di testo giustificato..
Ciao
Faber
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Visualizzatore disegni DXF

Esiste qualche visualizzatore (freewere) di disegni in formato DXF?
E' possibile pilotarlo da VB come oggetto active X?
Grazie a chiunque possa aiutarmi         Claudio

 Grazie a chiunque possa aiutarmi         Claudio
anni fa mi ero scritto un prg clipper per visualizzare (in dos...) i dxf di
autocad 10, mi sembra, potrei ripescarlo ma mi sa che ci perdi piu' tempo
che altro.
in compenso avevo visto piu' volte messaggi sui ng usa, direi con
risposte -- ho cercato con oultook ma non li trovo. prova sui gruppi di
news.devx.com
 --> tipo vb.multimedia_graphics
oppure in quelli (io li ho via interbusiness) tipo
microsoft.public.vb.winapi.graphics
o comp.lang.basic.visual.misc
cmq se ti prendi un manuale di autocad, di solito c'e' spiegata la struttura
dei dxf, e almeno quelli vecchi erano abbastanza comprensibili.
probabilmente la trovi anche in 
www.wotsit.org
anzi, la trovi senz'altro: 
http://www.wotsit.org/cgi-bin/search.cgi?dxf
hth, pal

 che altro.
Inoltre occorrerebbe modificarlo parecchio per fargli vedere
i nuovi DXF di autoCAD 14 e 2000... :-((
--
Ciao!
----------------------------------
Nel mio sito (sezione "I Miei Programmi") trovate il
programma FREEWARE AutoQuote! che permette di quotare
i messaggi che non quota Outlook Express.
==================================
Daniele Pinna  Email: 
dap...@lycosmail.com
Nell'indirizzo Email eliminare la parola "OOPS."
Sito Web: Il DoCFa in Pillole: 
http://dapinna.freeweb.org
ICQ UIN: 24567484

Newsgroup: it.comp.lang.visual-basic
Titolo: Interfaccia in stile win98/vb5 etc -urgente- =(

Salve a tutti,
sto prepearmndo una nuova interfaccia per un programma e volevo (devo)
dotarla di coolbar, menu in stile Vb 5 e se possibile (argh) finestre con
barra del titolo con gradiente.
La cosa è tutta moolto urgente (sigh).
Ho scaricato il controllo M$ per le coolbar (rebar) ma, a parte il fatto che
fa poco e niente (e solo un contenitore) e che il codice di esempio è a dir
poco "strano", non mi soddisfda molto il risultato ottenuto.. nel senso che
ho dei problemi con il drag&drop(quando cambio allinemaneto alla coolbar le
toolbar all'interno non cambiano orientamento, rimane sempre a "0"...) e che
le singole "band" non possono essere divise dalla rebar (come ad esempio in
vb5).
So che con le API si possono creare le coolbar.. come? quali api? dove posso
trovare del codice di esempio? su MSDN c'è qualcosa di valido?
qualcuno di voi è riuscito a realizzare un'interfaccia di questo tipo?
...I menù in stile office( con le immagini che non vengono evidenziate per
capirci..) qualcuno ha idea di come crearli?? Esisterà sicuramente qualche
API? oh no? ...
Grazie a tutti voi.. sempre riconoscente...
DC da lavoro.
PS grazie a tutti.. questo NG è mitico!!

...


 ToolbarHandle = FindWindowEx(Toolbar1.hwnd, 0&, "ToolbarWindow32", vbNullString)
Molto bello, il tuo esempio. Esiste un modo per fare la stessa cosa
anche con i menu' ?
Saluti,
Paolo.
Newsgroup: it.comp.lang.visual-basic
Titolo: Download da internet

E' possibile sfruttare un'api di windows che mi scarichi un file da un sito
e che lo metta nella cartella che gi passo???
grazie!!!

 e che lo metta nella cartella che gi passo???
e poi?
una API che ti faccia anche le patatine?
A parte gli scherzi, guardati il controllo Winsock o il controlo
Inet(Microsoft Internet Transfer Control)
Su MSDN trovi tutto, io personalmente cose del genere non ne ho mai fatte,
però ho letto articoli e quasi sempre ho visto usare il winsock per
effettuare operazioni come quella da te richiesta.
ciao

Private Declare Function URLDownloadToFile Lib "urlmon" Alias _
    "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, _
    ByVal szFileName As String, _
    ByVal dwReserved As Long, _
    ByVal lpfnCB As Long) As Long
Public Function DownloadFile(URL As String, LocalFilename As String) As
Boolean
   Dim lngRetVal As Long
   lngRetVal = URLDownloadToFile(0, URL, LocalFilename, 0, 0)
   If lngRetVal = 0 Then DownloadFile = True
End Function

 e che lo metta nella cartella che gi passo???
Anzichč un'Api, ti consiglio il controllo Inet. Su MSDN c'č l'esempio
proprio del download ed č molto semplice.
Ciao
Alberto

Inet? Bah
Lo usato, ma perke complicarsi la vita quando ce un API ke ti fa tutto?
Visto ke a lui serve solo scaricare...

 ha scritto nel messaggio
news:Azog9.104057$pX1.3...@news2.tin.it...

Allora c'era la API!!!!!!!!
:-)))))))))))))))))))))))))

 Visto ke a lui serve solo scaricare...
Prova a ribaltare la cosa:
Perchè usare le Api, che da un sistema operativo ad un altro non è detto che
funzionino, quando c'è un controllo che fa tutto, e che funziona su tutti i
sistemi operativi Windows?
Ciao
Alberto
Newsgroup: it.comp.lang.visual-basic
Titolo: Gestione Codice fiscale

Come da oggetto sono alla ricerca dei sorgenti per la creazione e relativo
procedimento inverso per la gestione del Codice Fiscale.
Ringrazio per la risposta.


Mai sentito parlare di Google?!
Ciao, Vincenzo

 Ringrazio per la risposta.
Ma di niente!!!!!!!
-- 
Nella vita una sola cosa è certa: se la storia ci ha insegnato qualcosa, 
è che si può uccidere chiunque.
(Michael Corleone)
Posted from X-Privat Free NNTP server - 
www.x-privat.org

 risalire a Cognome/Nome a partire dal codice fiscale...
LOL
-- 
Le persone non sono il proprio comportamento: devi sempre andare oltre,
essere flessibile, capire il punto di vista degli altri, interpretarne i
comportamenti ed intuirne le esigenze.
Per rispondere in privato elimina
dall'indirizzo "togliquesto"
MasterDavidex

 risalire a Cognome/Nome a partire dal codice fiscale...
Sicuramente non si puň risalire a nome e cognome, ma alla data e luogo di
nascita e al sesso sě!
Esteban

Senza offesa per nessuno ma...
...come al solito qui vige la legge del "ma è ovvio"... "basta andare in
google"... "lol" ecc...
e non si danno mai risposte sensate ma soprattutto utili.
Non mi sembra di aver chiesto la luna ma solo i sorgendi VB per poter
gestire il codice fiscale per non perdere tempo a riscrivere cose già fatte
e strafatte. E per gestire intendo sia per crearlo e sia per estrarre, ma
sicuramente a voi che sapete tutto non interessa, sesso data di nascita
comune e cap...

 ha scritto nel messaggio
news:qFlzb.145832$hV.52...@news2.tin.it...



Questo lo dici tu che è la prima volta che ti affacci da queste parti.
Ciao

 LOL
eheheh
LOL associato!!
-- 
Alex
"La differenza tra un genio ed un idiota è che il genio ha i suoi
limiti" (Anonimo)


 wrote in message
news:bqkp46$22lb48$1...@ID-207068.news.uni-berlin.de...


Newsgroup: it.comp.lang.visual-basic
Titolo: Variabili "globali"

Com'è possibile far vedere una variabile a due form diverse?
Grazie.
Christian Pasin

Se non sbaglio è sufficiente dichiararla nella sezione dichiarazioni di un
form, per farla vedere all'altro form basta usare la sintassi
nomeform.nomevariabile
Chri ha scritto nel messaggio ...


 ha scritto nel messaggio
news:T5rZ4.50190$VM3.4...@news.infostrada.it...


O dichiari la variabile come Public in un modulo standard oppure in un
modulo di una form....
se usi il secondo metodo devi usare la seguente sintassi:
<FormDichiaratore>.<Variabile>...
???Dichiaratore??? 8-)
-----------
Ciao
Sabba


Newsgroup: it.comp.lang.visual-basic
Titolo: VBA (excel) richiesta aiuto

sono in procinto di realizzare un progettino in excel mediante l'utilizzo di
vba.....non sono molto pratico e chieso aiuto......vorrei inserire due combo
box ove in base alla scelta effettuata nel primo combobox compaiono elenchi
a discesa diversi nel secondo combobox..........il mio problema risiede
anche nel fatto che i combobox (sia il n. 1 che il n. 2) sono inseriti nel
foglio1 ma ogni volta che seleziono una voce nel combo box1 mi si radoppia
l'elenco a discesa (si sommano le voci dell'elenco e questo diventa doppio,
triplo ....)
Grazie in anticipo.
Paolo

dimenticavo......
le voci sono state aggiunte tramite additem................
questa è la routine relativa al combobox1
ComboBox1.Item "Arbitrati"
ComboBox1.Item "Avarie"
ComboBox1.Item "Componimenti amichevoli"
ComboBox1.Item "Consulenza contrattuale"
ComboBox1.Item "Consulenze e assistenze"
ComboBox1.Item "Indennità"
ComboBox1.Item "Lavori contabili e bilanci"
ComboBox1.Item "Onorari graduali"
ComboBox1.Item "Operazioni societarie"
ComboBox1.Item "Perizie e valutazioni"
ComboBox1.Item "Procedure concorsuali"
ComboBox1.Item "Revisore di consorzi"
ComboBox1.Item "Revisore di enti privati"
ComboBox1.Item "Revisore di enti pubblici"
ComboBox1.Item "Sindaco di consorzi"
ComboBox1.Item "Sindaco di enti privati"
ComboBox1.Item "Sindaco di società"
ComboBox1.Item "SisteMazione di interessi"
ComboBox1.Item "Onorari non previsti"

Da quello che capisco sembra che in qualche modo ricari la lista da qualche
parte del programma per cui credo che quello che ti manca ed un
TuoCombo.Clear prima di caricare la lista  credo che in questo caso
specifico devi inserirlo nel ComboBox2
Inserisci un ComboBox ed un ListBox in un Form e copia il codice
prova il codice cosi come lo vedei e poi elimina il sibolo ' del comento
nella linea 1 e vedi la diferenza spero che ti serva
Option Explicit
Private Sub Combo1_Click()
1: 'List1.Clear
2: List1.AddItem Combo1.ItemData(Combo1.ListIndex)
3: End Sub
Private Sub Form_Load()
Dim x As Integer
For x = 6 To 9
Combo1.AddItem x
Combo1.ItemData(Combo1.NewIndex) = x
Next
Combo1.Text = Combo1.List(0)
End Sub
Ciao L'Oriundo

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

Qualcuno può spiegare a un autodidatta come si fa a ottenere che un
DriveListBox dia accesso anche alle risorse di rete?
Grazie, Andrea

 Grazie, Andrea
mappando le risorse che ti interessano.
oppure cambiando controllo.
uno ottimo, gratuito:
foldertreeview
www.mvps.org/ccrp
Newsgroup: it.comp.lang.visual-basic
Titolo: matrici a "scorrimento"

Quello che devo fare e' piu' facile da spiegare con un esempio...
devo fare scorrere i valori di un vettore all'interno dello stesso di n
posizioni.
per esempio:
dim v(1 to 9)
il vettore avra':
1 2 3 4 5 6 7 8 9
devo scorrerlo di uno verso sx e quindi avro':
2 3 4 5 6 7 8 9 1  (notare l'uno in fondo)
poi devo poter scorrere quest'ultimo vettore come prima ed avro':
3 4 5 6 7 8 9 1 2
ecc.ecc.
e poi magari a dx di uno ecc.ecc.
come scrivere questa procedura??
Grazie!

...

Possibile Soluzione:
Private Enum Posizione
    Sinistra = 0
    Destra = 1
End Enum
Dim Arr(1 To 9) As Integer
Private Sub Sposta(Dove As Posizione)
Dim Valore As Integer
Dim i As Integer
Select Case Dove
    Case Sinistra
        Valore = Arr(1)
        For i = 1 To 8
            Arr(i) = Arr(i + 1)
        Next i
        Arr(9) = Valore
    Case Destra
        Valore = Arr(9)
        For i = 9 To 2 Step -1
            Arr(i) = Arr(i - 1)
        Next i
        Arr(1) = Valore
End Select
End Sub









 Grazie!
dim ap as integer  'variabile di appoggio
dim I as integer    'Contatore
da dx a sx
ap = V(1)
for I = 2 To 9
    V( I - 1 ) = V(I)
Next I
V(9) = ap
------------
da sx a dx
ap = V(9)
for I = 9 To 2 step -1
    V( I - 1 ) = V(I)
Next I
V(1) = ap
Questa procedura dovrebbe (non ho potuto provarla) spostarti gli elementi
di una posizione.
Inseriscila in un ciclo per spostare gli elemnti di + posizioni

 Inseriscila in un ciclo per spostare gli elemnti di + posizioni
Funziona!
Grazie mille!
Io avevo fatto in modo simile ma riempivo v(1)=ap nel ciclo...che
pirla... :-((( per forza non funzionava...

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Word e Visual Basic

-- 
Il mio problema consiste nel inserire e salvare, ad esempio il contenuto
(text) di una RichTextBox, dopo aver aperto il Word da Visual Basic (4.0),
ecco che al momento di inserie mi da errore "5003" che vuol dire? dove ho
sbagliato?
Un infinito grazie a chi mi risponde... 
Peter Punk....
internet:
http://rampage.ml.org/users/~Marco_Koge/index.html
http://www.geocities.com/TimesSquare/battlefield/6203/index.html
http://users.iol.it/marco_koge/index.html
e-mail: 
marco...@iol.it

prova a mostrare un po' di codice
--
Enrico
enr...@spin.it
Peter Punk ha scritto nel messaggio
<01bd0b09$7b6e9da0$174bd2c3@marcokoge>...


Newsgroup: it.comp.lang.visual-basic
Titolo: DB remoti.

Hi boys!
Allora, qualcuno ha risolto questo cruccio?
E' possibile leggere/scrivere un DB Access situato nel web?
O papà Bill lo proibisce?
:-)
Byez
SebaMix

 wrote in message
8tk2v5$2nte$1...@stargate1.inet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: DIR ()

Problema molto stupido
devo verificare l'esistenza di un file e quindi faccio
nomefile$="Pippo"
nomepercorso$="C:\MiaDir\" + nomefile$
verificafile= DIR$(nomepercorso$)
IF verificafile then 
.....
Else
....
Endif
Ora al momento dell'esecuzione d IF si verifica un errore 13 Tipo non
corrispondente dei dati
Dove Toppo ??????
Ciao Riccardo

 .....
Saluti.
Newsgroup: it.comp.lang.visual-basic
Titolo: Visual Basic 6.0 Inglese VENDO

Come da oggetto un Visual Basic 6.0 Professional in
inglese con licenza Microsoft mai registrata a £
500.000 + eventuali spese di spedizione.
______________________________________________________________________
Abbonati a Yahoo! ADSL con Atlanet!
Naviga su Internet ad alta velocità, e senza limiti di tempo! 
Per saperne di più vai alla pagina 
http://adsl.yahoo.it
-- 
Posted from 
web20403.mail.yahoo.com
 [216.136.226.122] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:2001111615122...@web20403.mail.yahoo.com...


Newsgroup: it.comp.lang.visual-basic
Titolo: AdoDB: 2.6 vs 2.7

Salve
Ho un problema che riguarda il Microsoft ADODB.
Ho sviluppato un'applicazione VB utilizzando il Microsoft ADO 2.6 e
l'installazione sui client dotati della stessa versione di ADO non comporta
(ovviamente) nessun problema. Il problema nasce invece sull'installazione su
client con ADO versione 2.7. Sembra che gli oggetti ADO 2.6 non siano
compatibili con ADO 2.7.
Potete darmi conferma di questo? Se (malauguratamente) l'ipotesi č
confermata esiste una soluzione (che non sia la sostituzione dell'ADO
nell'applicazione, visto che si tratta di qualche centinaia di migliaia di
righe di codice)?
Sul client in esame č presente una referenza TLB alla versione 2.6. Il file
di riferimento č MSADO26.TLB
Ho provato l'installazione del Microsoft ADO 2.6 sul client in esame, non
ottenendo risultati (come prevedibile, del resto).
Grazie mille
    Francesco Mancini (ETELNET Dev group).

 Il file di riferimento è MSADO26.TLB
Domada stupida, forse: hai un errore durante l'installazione o durante
l'esecuzione del programma?
Personalmente non ho usato oggetti ado 2.6, ma mi è capitato di installare
applicazioni che usavano ado 2.5 su sistemi che avevano già ado 2.7 e non ho
avuto problemi
--
Salutoni
Sergio

idem .. nessun problema ..
ho usato ADO 2.5, 2.6 e 2.7  .. e nessun tipo di prob ..
--
 .. [t]Eo ..
|| TORNO SUBITO ||
" .. Sono fuori di testa. Tornerò tra cinque minuti .."

 ha scritto nel messaggio
news:b204o5$179gdl$1...@ID-173193.news.dfncis.de...


 Il file di riferimento è MSADO26.TLB
Se installi su un PC che ha i 2.7, semplicemente il tuo setup ignora la dll
di Ado, visto che ne trova una più recente, ma l'applicativo funzionerà
regolarmente.
Io ho decine di client su cui il cliente distribuisce pacchetti fatti in
passato con i 2.6, e mai aggiornati ai 2.7, ma su molti di questi client
qualcun altro ha già messo i 2.7 (anche perchè agli stessi clienti
distribuisco MDAC2.7).
Ciao
Alberto

 (connectionstring SICURAMENTE corretta) ottengo errori.
afaik, la tlb, sulla macchina target, non serve assolutamente a nulla.
Credo di poter affermare che il tuo problema non è legato alla presenza di ado
2.7 (a meno che non sia installato male, forse), ma dovresti indirizzarti
altrove: permessi dell'utente, database in sola lettura eccetera.
--
Salutoni
Sergio

 ottenendo risultati (come prevedibile, del resto).
Gli ADO 2.6 non dovrebbero riuscire a sovrascrivere i 2,7....
Facci sapere,
Ciao
Andrea
Newsgroup: it.comp.lang.visual-basic
Titolo: [CERCO] cpu PIII 500 o superiore

Cerco cpu Pentium III qualsiasi clock da 500 in poi (diciamo al max. 8/900
mhz)
PaoloS
dipaolochiocciolabitmarketpuntoit

 ha scritto nel messaggio
news:b6h0qj$57gtg$1...@ID-106271.news.dfncis.de...

Sei OT. Vai sui vari gruppi : it.comp.hardware.* e similari per scambi.
Saluti
GF

 
[SFIDA] Ma siamo al delirio o al meeting sono state prese strane 
decisioni *dopo* le abbondanti libagioni?!?
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

 wrote in message
b6h0qj$57gtg$1...@ID-106271.news.dfncis.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: Aprire un'immagine da un'applicazione VB

Chiedo scusa a  tutti per l'apparente semplicità del problema che vi pongo,
ma  ho cercato invano su 3 libri, sulla guida e sul sito comune, quindi mi
rivolgo a voi come ultima spiaggia, non senza la certezza matematica che
sappiate aiutarmi...
ecco, dopo tutto sto preambolo di lecchinaggine :-) vi chiedo:
ma in che modo posso far sì che da un mio programma in VB si apra
un'immagine con l'editor di immagini predefinito del PC su cui gira
l'applicazione?
In pratica voglio ottenere lo stesso effetto del doppio click sull'icona di
un'immagine dalle normali finestre di windows...
Incredibile, ma vero, non ho trovato nulla.
Spero possiate aiutarmi... :-D

 Incredibile, ma vero, non ho trovato nulla.
Guarda l'API ShellExecute.
-- 
Esteban
www.seber.it

Paolo C. ha scritto:

funzione shell

 ha scritto nel messaggio
news:ESSRb.285068$vO5.11...@twister1.libero.it...

Mi dispiace, ma la funzione Shell non apre i documenti usando i programmi
predefiniti. Con Shell puoi, al limite, avviare un programma passando il
nome del documento da aprire, ma se le macchine su cui dovrà girare il
programmino non hanno lo stesso programma di grafica o se il programma di
grafica non è installato su ogni macchina nella stessa cartella, allora la
funzione Shell non funziona.
Ok?
-- 
Esteban
www.seber.it

Esteban ha scritto:

a me dispiace ancor di più
X = Shell("C:\WINDOWS\system32\mspaint.exe C:\img.jpg", 1)

 X = Shell("C:\WINDOWS\system32\mspaint.exe C:\img.jpg", 1)
Robi, abbi pazienza (e magari un po' di fede), tu gli stai dicendo,
esplicitamente, quale programma usare. La richiesta (rileggila) non era
questa...
PS: Quel che hai scritto funziona sulla tua macchina, non č affatto detto
che funzioni sulla mia. La richiesta fatta da Paolo C. serve (anche, ma non
solo) a risolvere questo problema.

Esteban ha scritto:

x = shell("C:\Windows\system32\mspaint.exe c:\img.gif", 1)

 x = shell("C:\Windows\system32\mspaint.exe c:\img.gif", 1)
Ma tu, oltre a non quotare, non leggi le risposte?
Oppure insisti per puro masochismo?
Ora che sei scivolato per la seconda volta, ti piace un sacco per il dolore
che ti sei procurato?

infatti, hanno ragione lupo e esteban...
Cmq non esiste nulla che non coinvolga l'utilizzo delle API?
grazie mille a tutti

 Cmq non esiste nulla che non coinvolga l'utilizzo delle API?
Perché, ti stanno antipatiche ? Comunque, mi sa che c'è stato un
equivoco, nel thread, attenzione: l'API ShellExecute è una cosa
diversa dalla funzione Shell di VB. Qui c'è un esempio che J.
periodicamente e pazientemente riposta:
http://www.google.com/groups?selm=aovfp4%24qam65%241%40ID-51318.news.dfncis.de
Bye, G.
Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto VBA per Excel

Ciao a tutti,
sto lavorando con una tabella composta da 4 colonne e da un numero variabile
di righe (circa 500)
Per eseguire alcune istruzioni, devo poter selezionare tutta la tabella fino
all'ultima riga (che può variare di volta in volta).
Per farlo, normalmente, utilizzo la seguente istruzione:
Range(Range("a3:d3").Address & ":" &
Range("a3:d3").End(xlDown).Address).Select
che, però, presenta alcuni inconvenienti.
Ho verificato che questa istruzione seleziona tutto quello che mi interessa
a condizione che non ci siano celle vuote nella prima colonna
dell'intervallo.
Poiché alcune celle della prima colonna, invece, possono risultare vuote,
mentre le altre celle della stessa riga contengono dei dati, succede che il
comando dato non seleziona l'intera tabella.
Non posso cambiare la disposizione delle colonne.
Se potessi farlo sposterei la seconda colonna che, a differenza delle altre,
contiene dei dati in tutte le celle.
Come posso risolvere il problema?
Se posso approfittare, vi chiedo un altro aiuto.
Una volta selezionato un intervallo desidero, con una macro, che tutti i
dati, comunque inseriti, siano trasformati in carattere maiuscolo.
Mille grazie ai volenterosi e bravi.
Ciao
Pino

Private Sub Seleziona()
    Dim CelleDaSelezionare As Integer
    Dim ColonnaDaControllare As Byte
    ColonnaDaControllare = 2
    CelleDaSelezionare =
WorksheetFunction.Count(Foglio1.Columns(ColonnaDaControllare))
    Foglio1.Range(Foglio1.Cells(1, 1), Foglio1.Cells(CelleDaSelezionare,
4)).Select
End Sub
Buon divertimento!
@mikey@

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Tre domande ...

(ed eventualmente ad intercettare la connessione/sconnessione ?)
Dai un'occhiata al sito comune di questo ng:
www.murialdo.it/it_lang_vb
trovi quello che ti serve....
Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)

Es: un giochino con effetti sonori e musica di sottofondo insieme
Questo penso che sia impossibile con una sola scheda audio, a meno che tu
non ti accontenti di eseguire le musica sulla periferica midi.
Ciao!
Gabriele

Es: un giochino con effetti sonori e musica di sottofondo insieme
imposta
MCI1.Shareable=True
MCI2.Shareable=True
e..
avvia i due file con le due periferiche Mci...
bye
Newsgroup: it.comp.lang.visual-basic
Titolo: Aggiungere cornice ad una immagine

Mi chiedono una cosa di questo tipo:
con una fotocamera fanno una foto
la salvano sul pc
la selezionano da un mio software
selezionano anche una cornice
vorrebbero poter metterci la cornice sull'immagine.
E' possibile in maniera relativamente semplice? Come?
Grazie a tutti
-- 
Alex
"La differenza tra un genio ed un idiota č che il genio ha i suoi limiti"
(Anonimo)

E' possibile in maniera relativamente semplice? Come?
Disegna la cornice sull'immagine, dov'e' il problema?
-- 
ciao,
hal

 Disegna la cornice sull'immagine, dov'e' il problema?
Alcuni problema?
1. Come disegno su una immagine?
2. Come ci metto una cornice presente in un altro file?
Oggetti:
1. Che oggetto uso per leggere o aprire l'immagine?
2.  Che oggetto uso per scrivere?
Mi fermo qui ma ne ho altri...


Mi fermo qui ma ne ho altri...
Oddio, qui siamo alle basi del vb...
-- 
ciao,
hal

 Oddio, qui siamo alle basi del vb...
Non direi...semmai non ho mai utilizzato comandi per immagini di alcun tipo
anche se uso VB dalla versione 5.0...
Che vuoi che dica, facendo gestionali difficilmente si modificano
immagini...


Newsgroup: it.comp.lang.visual-basic
Titolo: Debug di un exe AIUTO!!!!

Ciao a tutti,
ho eseguito un programma in vb6 che funzione abbastanza bene sennonché 
saltuariamente mi da degli errori di Run-Time dei quali non riesco a 
trovarne la causa in quanto sul pc che usa il programma c'è solo 
l'eseguibile.
E' possibile usando il codeview entrare in debug su quel pc senza installare 
vb6?
Se si come si usa?
Grazie per gli eventuali suggerimenti 

 Se si come si usa?
Se mi dici cos'è codeview possiamo provare :)
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] rinumerazione MDB???

Ciao,
utilizzo questa routine per rinumerare un campo numerico in un database mdb
di 10'000 dati ma stranamente il tempo impiegato per fare questa operazione
č di oltre 6 minuti su un pentium III 450 e 256MBram.
TROPPO!!!
Non č un poco eccessivo come tempo per trafficare questo file MDB di access
2000 con la seguente routine?
Non avete qualche idea piů veloce????
AIUTOOOOOOO !!!!
Grazie
Franco
--------------------------------------------------
strsql = "SELECT * FROM MyDATI ORDER BY MyDate"
rst_renumber.Open strsql, dbren, adOpenKeyset, adLockBatchOptimistic,
adCmdText
rst_renumber.MoveFirst
Do While Not rst_renumber.EOF
    rst_renumber!ID_NR = cnr
    rst_renumber.MoveNext
    cnr = cnr + 1
Loop
rst_renumber.UpdateBatch
rst_renumber.close

 wrote in message
8gujvv$gq1$1...@bw107zhb.bluewin.ch...


 > Non avete qualche idea più veloce????


A mio parere dovresti fare questo:
'Query di Comando per eseguire un Update
strSQL = "UPDATE [NomeArchivio] SET [NomeArchivio].NomeCampo =
[NomeCampo]+1;"
'Eseguo il Comando sulla connessione ADO attiva
rstADO.Execute strSQL
Spero sia migliore...
U. Albano
Newsgroup: it.comp.lang.visual-basic
Titolo: Listview overflow

Ho un grosso problema, caricando un numero considerevole di elementi
(>15000) nella Listview, al momento del .clear o comunque all'uscita dal
programma, si verifica un blocco del pc che può durare anche un minuto, ho
provato anche a creare run time la listview e poi eliminarla all'uscita, ma
il problema persiste.
Se qualcuno ha già riscontrato questo problema e può darmi una mano, mi
risparmierebbe di dover cambiare controllo a metà progetto..
Grazie a tutti.

 ha scritto nel messaggio
news:9f7i5s$8mr$1...@fe2.cs.interbusiness.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Messaggi SMS.

visto che senza SMS non riesco piů a vivere.... adesso esagero!!! : )
Vorrei trovare il modo di scaricare ed inviare messaggi SMS da mio
telefonino!!
Ovviamente scrivendo un programma in VB : )
digitare centinaia di SMS č alquanto noioso!!!!
Non so da dove cominciare, qualcuno di voi sa darmi qualche dritta!!
Ciao
Davide

Se hai un telefono che gestisce i comandi AT puoi farlo senza troppa
difficoltà...contattamise hai bisogno di aiuto!
ciao
Lorenzo

 wrote in message
g69Z6.20348$8R5.4...@news.infostrada.it...


Se vai sul sito della Nokia (
www.nokia.com
, o .it), alla sezione download,
puoi anche scaricare un manuale
con i comandi AT... che in teoria sono uguali per tutti i cellulari, ma in
pratica no.
Esempio: i Nokia accettano tranquillamente il comando AT+CMGL che
restituisce la lista di msg
contenuti nel cell. Il Siemens S35 no. Devi specificare il tipo di msg, cioč
AT+CMGL=4, dove la cifra
4 identifica TUTTI i messaggi che hai sul cell; 3 mi sembra quelli non
letti.... gli altri non li ricordo.
Ciao :)
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] PostMessage Come Usarla ?

Salve a tutti, leggendo vari post passato del NG, ho pensato di poter
risolvere un problema
che mi perseguita oramai da tempo.
Dovrei ottenere il seguente risultato:
Da un form di inserimento articoli, devo indicare un codice cliente
Fin qui tutto bene, dovrei però avere anche la possibilità di inserire da
questo
form un nuovo cliente utilizzando lo stesso form di inserimento clienti che
viene
usato dal form elenco clienti.
Il problema e che devo trovare un metodo 'pulito' per avere di ritorno nel
textBox del form Inserimento articoli il codice del nuovo cliente che ho
appena inserito.
il modo che sono riuscito a trovare è il seguente :
'Sono in form Inserimento Articoli, e premo un pulsante NuovoCliente
set frmNewCli as New frmNuovoCliente
Load frmNewCli
frmNewCli.lblIns.caption = "SI"  'Lo uso per dire al form che sono in
Inserimento Cliente
frmNewCli.show vbmodal
'A queto punto faccio tutto quello che voglio nel form Inserimento Cliente,
e quando
'chiamo l'Unload, eseguo solamente un Hide e riprendo il controllo nel punto
seguente :
txtCodiceNuovoCliente.text = frmNewCli.txtCodiceCliente.text
Unload frmNewCli
Set frmNewCli = Nothing
Questo mi impedisce di dichiarare il frmNuovoCliente come MDI per poterlo
aprire come vbModal.
A questo punto mi sono chiesto se fosse possibile usare la PostMessage dal
frmNewCli, dopo
avergli passato l'hwnd della frmInserimentoArticoli.txtCodiceNuovoCliente in
modo da poter
chiamare il form in modo NON modale e lasciarlo MDI.
Ho provato in vari modi ad usare la PostMessage ma non ho mai ottenuto
l'effetto desiderato
anche se non ricevevo errori. il txtCodiceNuovoCliente resta sempre
inesorabilmente vuoto.
Qualcuno sa dirmi se la PostMessage in realtà può fare quello che vorrei io
o se proprio non
c'entra niente, o in alternativa sa suggerirmi un metodo per non chiamare il
form come vbModal ?
Grazie a chiunque possa aiutarmi.
Paolo Ardissone

 wrote in message
sbmn4.80787$C3.8...@news.infostrada.it...


 form come vbModal ?
Invece di fare frmNewCli.Show vbmodal, fai:
Dim Frm as form
frmNewCli.Show
Set frmNewCli.TextBoxDaAggiornare=txtCodiceNuovoCliente
frmNewCli.show
For each Frm in Form ' disabilito le altre form
    If Not Frm is frmNewCli then Frm.Enabled=False
Next
La Riga Set  MiaForm.TextBoxDaAggiornare=txtCodiceNuovoCliente ti serve per
poter riaggiornare il tuo TextBox in unload della form. Devi creare una
property della form clienti di tipo textbox.
Quando frmNewCli.lblIns.caption = "SI"  (mi pare che questo sia il metodo
che usi per vedere se è un inserimento di nuovo cliente), durante la unload
fai:
Dim Frm as form
If frmNewCli.lblIns.caption = "SI"  then
   On local error resume next
   txtCodiceNuovoCliente.text = TextBoxDaAggiornare.text
   On local error goto 0
   For each Frm in Form ' riabilito le altre form
       If Not Frm is frmNewCli then Frm.Enabled=True
   Next
Endif
Ciao
*Roby*