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

Premetto che sono un principiante e mi trovo d'avanti questo problema. Ho 
questa porzione di codice che mi dovrebbe inserire nella tabella STAMPANOMI 
tutto il contenuto della tabella DATI, invece mi inserisce il primo record e 
basta ! Cosa sbaglio ? GRAZIE A TUTTI
Data1.RecordSource = "select * from dati order by flag, cognome, nome"
Data1.Database.Execute "delete from stampanomi"
Data1.Database.Execute ("insert into stampanomi select * from dati ")
Data1.Refresh

DB ha scritto:

Ciao, solitamente non uso l'oggetto Data, ma se la logica è la stessa
che per gli ODBC.RecordSet allora devi non puoi fare una insert di una
select.....
Devi scorrere tutto il RecordSource leggendo i dati uno ad uno e poi
facendo una insert di questi risultati su stampanomi.
Ciao

 ha scritto nel messaggio 
news:1163667148....@h54g2000cwb.googlegroups.com...
DB ha scritto:


Ciao
Grazie dell'aiuto, era proprio come dicevi tu. Grazie ancora !!
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] crystal e VB

dove posso trovare documentazione su come si usa crystal report con VB???
grazie
Ciao

dove posso trovare documentazione su come si usa crystal report con VB???
se non ricordo male, una volte c'era il manuale su 
ftp.areacom.it/vb32
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
---------------------------------------------------------------------------


se ti chiamassi Morena ti darei un bacio! Ho trovato quello che mi serviva.
grazie comunque
ciao

se ti chiamassi Morena ti darei un bacio! 
yuff... meno male.... m'è andata bene... ;-PPP


Newsgroup: it.comp.lang.visual-basic
Titolo: Apertura e chiusura del browser con API?

Saluti a tutto l'ng, avrei un problemino da sottoporvi.
Devo realizzare un programmino VB che lanci il browser ad un determinato
URL, e dopo x secondi lo chiuda.
Per l'apertura pensavo di usare il buon vecchio comando "shell", ma per la
chiusura ho qualche problema.
Esiste qualche API che faccia al caso mio?
grazie per l'aiuto

Se usi il controllo VB WebBrowser probabilmente fai molto prima...e puoi
gestirti meglio l'apertura e la chiusura della pagina.
Gianni Moretti

> Se usi il controllo VB WebBrowser probabilmente fai molto prima
Sono d'accordo con te, il problema è che purtroppo da questo vincolo non
posso prescindere (sai com'è: il cliente ha sempre ragione)
Newsgroup: it.comp.lang.visual-basic
Titolo: prova

prova

prova


PLONK
Ciao, Vincenzo
Newsgroup: it.comp.lang.visual-basic
Titolo: gli manca la parola

    Vorrei che il mio Pc parlasse va bene anche solo Papŕ.
Scherzo vorrei poter aggiungere nelle mie applicazioni dei messaggi
vocali anche se il mio desiderio sarebbe quello di realizzare qualcosa
come la voce della TIM quando chiamiamo il 916.
 ciao a tutti

  ciao a tutti
     Visto che nessuno mi ha risposto allora mi rispondo da solo. Un primo
approccio al problema
potrebbe essere quello di utilizzare il controllo multimediale MCI che
permette tra l'altro di riprodurre piccoli messaggi in formato "WAW"
potendoli gestire direttamente da codice, quindi senza l'intervento
dell'Utente.
    Esempio: per eseguire questo piccolo esempio basta aprire un form
incollare sullo stesso il controllo MCI "MMControl" impostando la
proprietà visible a false, inserire nel form due bottoni(li chiameremo
PLAY e STOP), in play inserire il codice seguente:
    '//proprietà necessarie per l'apertura della periferica
    MMControl1.Notify = False
    MMControl1.Wait = True
    MMControl1.Shareable = False
    MMControl1.DeviceType = "WaveAudio" 'è un file audio
    'qui possiamo aggiungere qualsiasi file WAW
    MMControl1.FileName = "C:\WINDOWS\media\ding.WAV"
    '//Apre la periferica WaveAudio MCI.
    MMControl1.Command = "Open"
    '//esegue la periferica WaveAudio MCI.
    MMControl1.Command = "play"
Nel tasto stop inserire il codice:
     Form1.MMControl1.Command = "Close"
    E' necessario perche una volta terminata la sequenza bisogna sempre
chiudere il controllo MCI.
    Le stesse procedure possiamo incollarle rispettivamente in form.Load e
form.Unload, io personalmente quando provo delle procedure preferisco
utilizzare dei tasti per controllare meglio il processo.
    Questo metodo no risolve completamente le mie problematiche, quindi
rigiro la domanda per sapere se ci sono metodi emettere dei messaggi
vocali + complessi.
Ciao a tutti -"Oltre l'infinito"

 Ciao a tutti -"Oltre l'infinito"
Troppo lontano.

Newsgroup: it.comp.lang.visual-basic
Titolo: da wav a midi

come da oggetto...
esiste un controllo che permetta di convertire da wav a
midi?
grazie per qualsiasi informazione a riguardo
--------------------------------
Inviato via 
http://usenet.iol.it

Non penso che esistano controlli. Puoi usare, richiamandoli, alcuni
programmi commerciali, che pero' hanno un costo alto. 
Comunque posso dirti che ne ho provato uno e non funzionava un granchè
bene.
Non ricordo però i nomi di questi programmi. prova a cercare in rete.
ciao
-------------------------------------------------------
Messaggio inviato da 
http://www.sandlab.org/newsgroup/
Accesso gratuito via web ai Newsgroup

 grazie per qualsiasi informazione a riguardo
controlli non ne conosco.
sw vari, uno gratuito di cui mi hanno detto che funziona benino era
segnalato su cfs:
http://www.completelyfreesoftware.com/m-media_programs2_w95.html#AudioTo32
il sito e' in russo.
ciao, a.

>sw vari, uno gratuito di cui mi hanno detto che funziona benino era
direi piu' che benino
grazie 1000
ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: .NET e COM

Salve, ho fatto un libreria di classi in .NET, poi ho generato la type
library, successivamente ho creato un progetto vb6, ho selezionato nei
riferimenti la type library ed ho utilizzato le classi sviluppate in .NET, e
fino a qui non ci sono problemi (tranne per il fatto che la dll deve stare
nella stessa directory dell'eseguibile, che in fase di debug è
...\visualstudio\vb98\..).
Però perchè in VB6 non ho l'intellisence sui metodi e proprietà delle classi
.NET che ho sviluppato nella libreria??
In realtà non è un grosso problema, è solo un pò palloso.
E poi perchè in vb6 posso utilizzare solo i costruttori di default? (eppure
esistono COM con costruttori parametrici utilizzabili da VB6, vedi DAO per
esempio)
e ancora, perchè in VB6 non vedo gli eventi presenti nelle classi .NET?
E' forse un problema di regasm.exe che non genera correttamente la TLB???
Esiste eventualemnte qualche costrutto in .NET da prefiggere alle firme dei
metodi e delle proprietà per risolvere il problema??
Grazie per il vostro aiuto.

 riferimenti la type library ed ho utilizzato le classi sviluppate in .NET, e
[snip]
Queste sono le soluzioni che ho trovato io.
http://snurl.com/2xon
P.S.: la valocità dell'interop lascia decisamente a desiderare.
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6]combo in cella simulato?

Secondo voi la lista a discesa in una cella combobox di una grid ï¿œ una 
combobox, oppure ï¿œ disegnato un bottone che al clic visualizza una listbox?
 
Carmelo

 ha scritto nel messaggio 
news:54087506$0$10751$4faf...@reader2.news.tin.it...

A quale controllo ti riferisci ?
Io in vb6 uso flexgrid ma non esistono celle combobox
ne in generale celle modificabili.. devi crearle tu in qualche modo
In 
vb.net
 c'ï¿œ il controllo datagridview in cui esistono celle modificabili e 
per quanto ho visto (gli esempi che ci sono su msdn)
quando la cella non ï¿œ in modalitï¿œ di modifica viene solamente disegnato il 
controllo corrispondente.
Al momento che si attiva la modalitï¿œ di modifica il sistema crea una nuova 
istanza del controllo se giï¿œ non esiste,
lo posiziona sopra la cella e lo visualizza
 
Antonio 
 


Io uso vb6 e nel DataGrid impostando una colonna a ComboBox viene 
visualizzato un button cliccandoci sopra scende la tendina con gli item.
Mi chiedevo come potri fare la stessa cosa in uno usercontrol senza 
usare controlli aggiuntivi.
 
Carmelo
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB.NET] smtp + ssl - componenti chilkat software

ciao a tutti
devo preparare un programma che possa spedire usando un server smtp con 
connessione sicura.
ho provato a usare la classe fornita con il framework 
(System.Net.Mail.SmtpClient) ma la connessione non viene stabilita e il 
programma restituisce solo un errore di timeout.
da notare che se dalla stesas macchina che con .net non riesco a contattare 
tento la connessione con un client di posta, il tutto funziona 
regolarmente, quindi la connessione client - server c'e'...
dopo qualche test ho preferito cercare componenti di terze parti per 
semplificarmi la vita e ho trovato qualcosa di interessante (anche per il 
prezzo...) su:
www.chilkatsoft.com
qualcuno ha gia' usato componenti di questa software house e mi sa dare 
qualche impressione?
m'interessa principalmente il supporto, per capire se in caso di rogne 
siano 'presenti' oppure latitanti ^^
sono bene accette anche indicazioni su altri componenti
grazie
paolo
-- 
Paolo opg
BE AWARE that this post uses a fake reply-to address
to contact me write to:
janickg ( at ) hotmail ( dot ) com
--

 regolarmente, quindi la connessione client - server c'e'...
Provato con una cosa del genere:
Imports System.Net
Imports System.Net.Mail 
    Dim Autentificazione as boolean=True
    Dim enableSSL as boolean = True
            Dim smtp As New SmtpClient(ServerSmtp, Val(PortaSmtp))
            If Autentificazione Then
                smtp.UseDefaultCredentials = False
                smtp.Credentials = New NetworkCredential(utente, password)
            Else
                smtp.UseDefaultCredentials = True
            End If
            ' per gmail EnableSSL=True e porta 587
            smtp.EnableSsl = enableSSL

"Andrea [Work]" <andrea.isw...@gmail.invalid> wrote in
news:xti9ifvemt7q$.1jp64jp9nk9fl$.
d...@40tude.net
: 

Dim messaggio As MailMessage 
messaggio = New MailMessage("
mi...@pec.it
", "
de...@isp.it
")
messaggio.IsBodyHtml = False
messaggio.Subject = "oggetto del messaggio di test"
messaggio.Body = "corpo del messaggio di test"
Dim cred As System.Net.NetworkCredential = New 
System.Net.NetworkCredential()
cred.UserName = My.Settings.pecSmtpUser
cred.Password = My.Settings.pecSmtpPassword
Dim smtp As SmtpClient = New SmtpClient()
smtp.Host = My.Settings.pecSmtpAddress
smtp.Port = My.Settings.pecSmtpPort
smtp.UseDefaultCredentials = False
smtp.Credentials = cred
smtp.DeliveryMethod = Net.Mail.SmtpDeliveryMethod.Network
smtp.EnableSsl = True
smtp.Send(messaggio)
risultato: timeout della connessione

Newsgroup: it.comp.lang.visual-basic
Titolo: Aggiungere un comando personalizzato al popup menu standard di Windows

Qualcuno ha qualche idea su come è possibile aggiungere una voce di menu
personalizzata al popup menu standard che appare premendo il pulsante destro
del mouse?
Ad esempio premendo il pulsante destro del mouse sull'icona di un file
visualizzato con Explorer dovrebbe apparire:
- Apri
- Invia a
- Copia
- Incolla ...
- *Mio comando personalizzato*
etc...
Grazie in anticipo per ogni aiuto
Alfio
 P.S. rimuovere NOSPAM_ per rispondere

Nella Gestione Risorse, menu Visualizza, Opzioni, tab Tipo File, scegli
l'estensione del file di cui vuoi modificare il menu contestuale, quindi clicca
Modifica. Nella finestra successiva, scegli di aggiungere una voce ed il
programma da lanciare al clic sulla voce stessa.
Ciao ciao
VaG


programma da lanciare al clic sulla voce stessa.
Ehm... forse Alfio intendeva "Come è possibile farlo automaticamente da
VB..."
Zeross

...

ESATTO! Mi sarebbe proprio utile farlo via codice
Comunque grazie lo stesso per l'aiuto
Ciao
Alfio

Alfio
Vuoi sapere come farlo da codice....vediamo...è un po' complicato, in quanto
c'è da smanettare col regisro di Windows.
Cercherò di essere ordinato:
1- prendi l'estensione del file a cui vuoi aggiungere il menu in Explorer:
la chiameremo MiaEstensione
2- Leggi il valore contenuto nel campo stringa predefinito della chiave
HKEY_CLASSES_ROOT\.MiaEstensione  (NOTA BENE il punto prima di
MiaEstensione)
Questa stringa la chiameremo MioTipoFile
3- Apri la chiave HKEY_CLASSES_ROOT\MioTipoFile\shell
4- Sotto a Shell (non fate battute per l'assonanza italiana!) crei una nuova
chiave assegnandole un nome arbitrario, quello che più ti garba. Io ti
consiglio di assegnarle un nome che possibilmente corrisponda in qualche
modo all'azione che vi è associata (non chiamarla pluto, pippo o geppetto,
lo dico a beneficio tuo e dei tuoi utenti). Questa chiave la chiameremo
MiaAzione.
5- Crei la chiave HKEY_CLASSES_ROOT\MioTipoFile\shell\MiaAzione\Command
6- Nel campo stringa predefinito della chiave creata al punto 5 ci piazzi il
comando da eseguire. Se vuoi passare il nome del file alla tua applicazione
(sempre che tu abbia implementato la cattura della CommandLine in VB) usa i
caratteri '%1' (PERCENTUALE+UNO).
Spero di esserti stato utile.
PS: IN tutto il mio discorso suppongo che tu voglia aggiungere menu
esclusivamente ad una data categoria di file e/o alle directory e/o a tutti
i file; in caso contrario, mi spiace deluderti ma non è possibile fare
quello che vuoi in VB; non puoi cioé realizzare DLL che siano shell
extensions (sensibili al contesto, che aggiungano cioé menu in base alle
caratteristiche vere del file, senza limitarsi a guardare la sua estensione)
perché, come disse una volta Roal Zanazzi: "Il VB non crea DLL indipendenti"
e quindi non puoi enchanchare i context menu.
PPS: Qualcuno mi parla di DDE???!!!!
--
Kickaha, Master of MY Universe
E-MAIL: 
IO.Ki...@mclink.it
--------------------------
Moltissima gente confonde le opinioni con i pensieri
         "Herbert V. Prochnow"
Una conclusione è il punto dove sei stanco di pensare
         "Arthur Wright"
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Acquisto VB6, VS6 o .NET

Acquisto VB6 Professional, oppure Visual Studio 6 Professional o .Net
Professional. Ovviamente devono essere originali e provvisti di valida
licenza d'uso non registrata da altri ed in versione completa.
Attendo offerte d'acquisto al seguente indirizzo email (senza TOGLI):
peppef...@tiscali.it
Grazie e ciao, Giuseppe

 Acquisto VB6 Professional, oppure Visual Studio 6 Professional o .Net
vai a vedere sul NG free.it.programmazione.visualbasic c'è uno che vende
.NET
Ciao
Paolo
--
pbonfanti2@*NOSPAM*
inwind.it
Togliere dall'indirizzo *NOSPAM*

 vai a vedere sul NG free.it.programmazione.visualbasic c'č uno che vende


Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] E' possibile allineare le finestre del CommonDialog?

E' possibile (utilizzando SetWindowPod per esempio) modificare il
posizionamento delle windowsform di apertura o salvataggio file del
Controllo CommonDialog?
In pratica vorrei allineare a mio piacimento la windowsform di apertura file
in base al posizionamento del form principale dalla quale la apro, č
possibile?
Grazie anticipatamente
MatteoC.
--------------------------------
Inviato via 
http://usenet.libero.it

 MatteoC.
ciao Bumulo


Newsgroups: it.comp.lang.visual-basic
Sent: Thursday, March 27, 2003 10:00 PM
Subject: Re: Impossibile spostare una finestra di dialogo del CommonDialog

 possibile?
Si puň, si puň (ora faccio lo sborone) ;-)
http://makeashorterlink.com/?R23416FF3
Ma cos'č? tutti oggi volete spostare quel che per anni andava dove voleva?

 non capisco io la questione o non leggete voi i post ?
La pigrizia č una brutta bestia... ;-)

chiedo venia per la mia inettitudine ma mi fidavo di MSDN
poffordincibacco  mai fidarsi della documentazione lo sapevo io...  :-)
perdono bumulo
Newsgroup: it.comp.lang.visual-basic
Titolo: influenza dell'ambiente di sviluppo

Salve a tutti, è un certo periodo che cerco di capire una sottile questione 
legata strettamente alla licenza dell'ambiente di sviluppo in generale. Mi 
spiego se io scrivo un programma con sharp develop che misembra sia 
riolasciato in LGPL posso distribuire commercialmente il mio lavoro? Grazie 
a chiunque mi saprà aiutare a togliermi questo dubbio.
Fabio. 

 riolasciato in LGPL posso distribuire commercialmente il mio lavoro?
Sě, e puoi anche distribuire i vari moduli compilati che compongono 
SharpDevelop, anche se inseriti in un prodotto commerciale closed source.
Ad esempio, potrai usare il suo editor di testo, che č contenuto nella 
libreria ICSharpCode.TextEditor.dll, e distribuirla insieme al tuo progetto.
-- 
news:it-alt.comp.software.openoffice : Il newsgroup dedicato a
OpenOffice.org, la suite open source di applicazioni per ufficio.
Saluti, VITRIOL

 progetto.
Mhhh, da questo post:
http://community.sharpdevelop.net/forums/thread/587.aspx
mi sembra di capire che non č possibile, ma magari ho tradotto male io.
stefano

Defresco ha scritto:

Da questo post si direbbe di si
http://community.sharpdevelop.net/forums/thread/587.aspx
ciao
stefano

 mi sembra di capire che non è possibile, ma magari ho tradotto male io.
Quel post si riferisce ancora alla licenza GPL. Ma SharpDevelop ha 
modificato la sua licenza il dicembre 2005 da GPL a LGPL.
http://laputa.sharpdevelop.net/SharpDevelop2LicenseChangedToLGPL.aspx
In parole povere è possibile usare i moduli compilati (assembly) di 
SharpDevelop e distribuirli senza restrizioni.
Se invece si apportano delle modifiche personali al codice, allora è 
necessario rilasciare i sorgenti e condividerteli con la comunità.
E' una delle licenze open source più libere, ed è la stessa di 
OpenOffice.org.


 
Non lo sapevo, grazie per la precisazione.
ciao
stefano
Newsgroup: it.comp.lang.visual-basic
Titolo: data report

Salve ho da poco iniziato ad usare il data report di visual basic 6,
è possibile modificare l'orientamento del report da verticale ad 
orizzontale,
e il tipo di foglio da A4 Aa A5 o A3.
Grazie. 

 orizzontale,
per quello che riguarda l' orientamento io faccio
cosi  "rptBooks.Orientation = rptOrientLandscape"
dai uno sguardo nel' help in linea
per il resto non saprei che dirti, visto che ho solo
una stampante A4
ciao


Newsgroup: it.comp.lang.visual-basic
Titolo: Strano problema con True TDBgrid

Ciao a tutti!
C'è qualcuno che sa dirmi perché succede questo?
Se io scrivo:
Dim X As Byte
X = 2
TDBGridS1.Columns(X).Width = 400
...viene generato l'errore '6147' Column not found, 2
mentre se scrivo:
TDBGridS1.Columns(2).Width = 400
...la colonna viene ridimensionata regolarmente
Non dovrebbe essere la stessa cosa?
Questo problema si è presentato con versioni vecchie del controllo come
con l'ultima Pro 7.0. Ovviamente quello sopra è un esempio semplificato,
io vorrei creare un ciclo che mi ridimensiona le colonne non sapendo in
partenza quante siano.
Grazie per l'aiuto.
-------
Stefano
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Dim X As Byte
Byte?

 Non dovrebbe essere la stessa cosa?
Hai provato con un integer o un long? mi sembra strano btw...
Newsgroup: it.comp.lang.visual-basic
Titolo: per Cavalli

gentile Sig. Cavalli
lei ieri mi ha mandato un esempio su come si gestiscono gli array di
controlli in 
vb.net
. Da buon dilettante non ho capito molto. Il mio problema
è mettere 72 textbox su un form e gestirne le proprietà tramite un ciclo di
for......next. Se le è possibile gradirei una spiegazione passo passo.
Grazie per la sua disponibilità e cortesia.

campa cavallo :-)
Luca ha scritto:


 Luca ha scritto:
[snip]
Wow, questo č un "top-mess-quoting": ottimo esempio di come *non* postare.
Ciao
--
' // Initialize the expression evaluator
Engines.Evaluator = CreateObject("
http://www.neodatatype.net
")
' // you can find resources for and from the NG here!
Me.SitoComune = "
http://www.it-lang-vb.net
"

 Wow, questo č un "top-mess-quoting": ottimo esempio di come *non* postare.
Rettifico:
Questo č un ""top-mess-fuckyoubastard-quoting" :)
Ciao

Innanzitutto dammi del tu ;-)
Ecco un esempio che crea 10 textbox e comunizza l'evento textchanged, nelle
prime 5 textbox il colore di sfondo viene colorato di blu chiaro nelle altre
di verde (giusto come esempio...)
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
  Dim iPnt As Int32
  For iPnt = 0 To 9
   '// Creo una nuova textbox
   Dim oTxtBox As New TextBox()
   '// Imposto le proprieta...
   oTxtBox.Name = "textbox" & CStr(iPnt)
   oTxtBox.Tag = CStr(iPnt)
   '// Associo il gestore eventi
   AddHandler oTxtBox.TextChanged, AddressOf TextBoxChangedHandler
   oTxtBox.Location = New Point(10, 10 + 40 * iPnt)
   '// aggiungo l'oggetto alla collezione di controlli
   Me.Controls.Add(oTxtBox)
  Next
 End Sub
 Private Sub TextBoxChangedHandler(ByVal sender As System.Object, ByVal e As
System.EventArgs)
  '// il parametro sender indica la sorgente dell'evento, casto a textbox...
  Dim oTxtBox As TextBox = CType(sender, TextBox)
  '// recupero la tag e reagisco in base al valore...
  Dim sTag As String = CType(oTxtBox.Tag, String)
  If Int32.Parse(sTag) < 5 Then
   oTxtBox.BackColor = Color.LightBlue
  Else
   oTxtBox.BackColor = Color.LightGreen
  End If
 End Sub
HTH
--
Corrado Cavalli [Microsoft MVP]
UGIdotNET - 
http://www.ugidotnet.org

>>Wow, questo č un "top-mess-quoting": ottimo esempio di come *non* postare.
cosě va meglio? :-)
Newsgroup: it.comp.lang.visual-basic
Titolo: maxlength sparisce

Ultimamente mi si è presentato un problema strano su un progetto a cui stò 
lavorando in VB6.
A design-time imposto le proprietà di maxlength delle caselle di testo, e 
fin qui tutto ok.
Poi avvio il progetto, e quando ritorno in fase di design-time tutte le 
prorietà maxlength che avevo
impostato ritornano a zero!
L'unico modo che ho trovato per aggirare è aprire il file .frm del relativo 
form con un altro editor di testo,
ed aggiungere manualmente l'istruzione di Maxlength.
Il service pack di VB6 che avevo installato era sp5. Ho installato adesso 
l'sp6 ma il problema rimane.
Qualcuno sa a cosa può essere dovuto? 

Non so risponderti, ma VB6 faceva cose strane anche a me... bah!

a me sono spariti alcune voci di menu contestuali sulla finestra di 
eplorazione del progetto, ad esempio la voce "Rimuovi" e la voce "salva con 
Nome".
Prova a reinstallare il vb. 

non è che per caso i file del tuo progetto sono in sola lettura 

 ha scritto nel messaggio 
news:45221672$0$25880$4faf...@reader1.news.tin.it...


se non è complesso prova a ricreare il progetto.
Parti da un vbp nuovo e includi i files. 

 ha scritto nel messaggio 
news:45224166$0$5857$4faf...@reader3.news.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Informazioni di sistema in VB5

Salve,
qualcuno sa dirmi come posso ottenere informazioni sulle impostazioni del
sistema come il formato della data (dd/mm/yyyy, mm/dd/yyyy, dd.mm.yyyy,
etc.) ed altre utilizzando VB5?
Grazie!
P.S. Non e' in argomento, ma qualcuno sa come si inviano fax con Win 98
senza SW aggiuntivi? Ri-Grazie!

...

-----------------
Rispondo al tuo PS anche se è un po' OT: sul CD di Windows 98 c'è Microsoft
Fax di Windows 95 (ora non ricordo in quale cartella).
Spero di averti aiutato. Ciao
Marco Minerva
http://www.geocities.com/SiliconValley/Foothills/7260/
http://www.armaditaggia.com/marco

Newsgroup: it.comp.lang.visual-basic
Titolo: problema compiler error

cosa c'è che non va?
Private Sub MDIForm_Load()
    Public Property Get GetCommonDialog() As CommonDialog
        Set GetCommonDialog = ctlComDlg
    End Property
    Public Property Get GetStatusBar() As StatusBar
        Set GetStatusBar = ctlStatusBar
    End Property
 
End Sub


hai inserito le properties dentro Form_Load
poiche' sono funzioni a tutti gli effetti, vanno scritte a parte e non dentor un' altra routine.
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: CERCASI FILE...

Sto disperatamente cercando il file "MSVBVM60.DLL".
Dove posso trovarlo?
Grazie
                                                       ^PgReKo^

 wrote in message
7p3njl$5je$1...@nslave1.tin.it...


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

Salve.
E' possibile posizionare un form mdichild in un punto specifico dello
schermo? Grazie.

 schermo? Grazie.
Si, sempre pero' all'interno dell'area della MDIForm che la contiene.

sě, ma come?
"Jabba The Hutt" <Jabba....@Alderaan.SW> ha scritto nel messaggio
news:TGAa8.55719$om6.1...@news1.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: dichiarazione funzione ........ dinamica

come posso (se possibile) dichiarare questa funzione dinamicamente dal
momento che la gsdll.dll non viene registrata in system32 ma in una
dir che potrebbe essere scelta dall'utente?
Private Declare Function gsapi_revision Lib "gsdll32.dll" (ByVal
pGSRevisionInfo As Long, ByVal intLen As Long) As Long
grazie, alcau



In C ti avrei detto di andare sparato con il caricamento dinamico
della dll con LoadLibrary() ed il recupero dell'indirizzo della
funzione con GetProcAddress().
In vb non sono a conoscenza di un modo per sfruttare tale indirizzo,
passando pure i parametri, a meno di non trovare qualche gabola con
CallWindowProc(). Ce n'e' una qui, ma non l'ho provata, se vuoi/puoi
facci sapere:
http://www.freevbcode.com/ShowCode.Asp?ID=1863
-- 
ciao,
hal

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] OpenGL Api

Qualcuno sa dove reperire le dichiarazioni API dell'OpenGL?
Grazie

Prova sul sito del newsgroup:
http://www.murialdo.it:8000/it_lang_vb/
Ciao.


c'è qualcosa di più delle api di openGL, c'è un OCX per vb, (all'url cmq
trovi anche le dichiarazioni)
http://is6.pacific.net.hk/~edx/contents.htm
oppure sui links della mia pagina (sotto)
--
Fabio Guerrazzi
Visual Basic Development
fab...@libero.it
fab...@si.tdnet.it
http://digilander.iol.it/WarZi/default.htm

oppure sui links della mia pagina (sotto)
Grazie, ho capito che ci si deve accontentare della type lib della M$.
P.s.: un OCX mi sembra "meno" e non "più" delle api.
Ciao


hmm.... forse sottovaluti opengl, in genere si, sono daccordo, un ocx č
sempre meno di api dirette.. ma non con opengl.. avere un ocx puoi sfruttare
tutta la potenza senza impazzire.. considera che le api di opengl, tra
dichiarazioni e costanti sono piů o meno equivalenti a quelle di win32...
poi dipende sempre dall'ocx
ps: l'ocx in questione non l'ho fatto io.. l'ho solo trovato.. perfetto (o
quasi) dopo diverse lotte cone la tlb
ps2: ma... se l'obiettivo č "ottenere qualcosa" da un programma.. perché
usando le API senza tlb o ocx dovrebbe essere migliore?
Fabio
Newsgroup: it.comp.lang.visual-basic
Titolo: UserControl

Il mio problema è il seguente, ho un usercontrol con sopra una picturebox,
volevo dotare il mio controllo dell'evento MouseMove e ho fatto così:
Private Sub UserControl_MouseMove(Button As Integer, Shift As Integer, X As
Single, Y As Single)
  RaiseEvent MouseMove(Button, Shift, X, Y)
End Sub
Private Sub pctGrid_MouseMove(Button As Integer, Shift As Integer, X As
Single, Y As Single)
  RaiseEvent MouseMove(Button, Shift, pctGrid.Left +
GridBorderLenX(UserControl.ScaleMode) + pctGrid.ScaleX(X, pctGrid.ScaleMode,
UserControl.ScaleMode), pctGrid.Top + GridBorderLenY(UserControl.ScaleMode)
+ pctGrid.ScaleY(Y, pctGrid.ScaleMode, UserControl.ScaleMode))
End Sub
Private Function GridBorderLenX(ByVal ScaleMode As Long) As Single
  GridBorderLenX = ScaleX(pctGrid.BorderStyle * (1 + pctGrid.Appearance),
vbPixels, ScaleMode)
End Function
Private Function GridBorderLenY(ByVal ScaleMode As Long) As Single
  GridBorderLenY = ScaleY(pctGrid.BorderStyle * (1 + pctGrid.Appearance),
vbPixels, ScaleMode)
End Function
Con i valori tutto ok, ma nel bordo esterno della picturebox non viene
generato nessun MouseMove
Qualcuno sà come risolvere questo problema?
Grazie


Non c'e' motivo perche' non avvenga.
Ho provato il tuo codice e funziona.
Hai dichiarato l' evento ?
Ad es.: 
Public Event MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single
ciao, hal

 wrote in message
9al0vu$5pu3b$1...@ID-56381.news.dfncis.de...

Grazie di avermi risposto hal. Il punto è che funzionare funziona anche a me
ma lungo i bordi della picturebox (sono 1 o 2 pixel di spessore a seconda
delle impostazioni) non viene generato il MouseMove.
Newsgroup: it.comp.lang.visual-basic
Titolo: ADO e Stored procedures

salve !
allora...
...ho un db (MSQL7) con delle stored procedure, per ottenere un recordset da
queste faccio:
dim R as New ADODB.Recordset
R.Open "execute [my sp] [parametro1], [parametro2]", StringaConnessione,
adOpenKeyset, adLockOptimistic
....se tento di gestire il recordset mi dice che non è aperto !
sull'help del vb c'è un esempio, ma (!!!!) è come faccio io.....
...cosa non va?
grazie a tutti !!!!
--
deV

 wrote in message
news:S3TA6.141908$lj4.4...@news6.giganews.com...


 ....se tento di gestire il recordset mi dice che non è aperto !
Come fa a sapere che è una SP e non un semplice recordset ?
adcmdStoredProc
Saluti

 ha scritto nel messaggio
news:9b12q0$pl4$1...@fe2.cs.interbusiness.it...


....se tento di gestire il recordset mi dice che non è aperto !
Ti consiglio comunque di utilizzare l'oggetto Command di ADO per
eseguire delle stored procedure, specialmente quando queste hanno dei
parametri.
Cordiali Saluti,
Alberto Favetta
Axi Applicazioni per l'informatica S.n.c.
V. Vittorio Veneto 23  - Melegnano (MI)
alberto...@axi-informatica.com
 
http://www.axi-informatica.com

 ha scritto nel
messaggio news:3ad53ed4...@news.galactica.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: cambiare il "." (punto) con "," su tastierino numerico

non riesco a farlo in nessuna maniera. mi aiutate?
grazie

non riesco a farlo in nessuna maniera. mi aiutate?
Bastaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa!
Ecccheccavolo, ma nessuno che si prenda la briga di leggere i messaggi
di pochi giorni prima?
-- 
ciao,
hal

 ha scritto nel messaggio
news:nrg340he37se9pnqs...@4ax.com...


 perdonami ma non sono molto esperto di messaggi.
ROTFL
-- 
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
David Ruscelli


Private Sub txt_KeyPress(KeyAscii As Integer)
    If KeyAscii = 46 Then KeyAscii = 44
End Sub

Newsgroup: it.comp.lang.visual-basic
Titolo: ottenere le tabelle in vb6

Come posso ottenere i nomi delle tabelle di un database in vb6 usando 
ADO?
(Sto usando Access 97)
Grazie



Non ho vb qui con me quindi controlla la sintassi:
Dim cn  As ADODB.Connection
Dim rs    As ADODB.Recordset
Dim fld   As ADODB.Field
Dim s     As String
Set cn = New ADODB.Connection
con.Open <stringa_di_connessione>
Set rs = conn1.OpenSchema(adSchemaTables)
For Each fld In rs.Fields
    s = s & fld.Name & vbTab
Next fld
Debug.Print s & vbNewLine
Debug.Print String(30, "-")
Do Until rs.EOF
   s = vbNullString
   For Each fld In rs.Fields
       s = "" & fld.Value & vbTab
   Next fld
   Debug.Print s & vbNewLine
   rs.MoveNext
Loop
rs.Close
cn.Close
-- 
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: Crystal report

Salve ho un problema nel utilizzare crystal report 9 all'interno di 
vb6...attraverso SetLogOnInfo riesco a dare il percorso del db da cui 
caricare ma vorrei riuscire a dare run time anche una stringa sql per poter 
variare di volta in volta quello che devo visualizzare...
In che modo posso farlo? Ho cercato e non riesco in nessun modo a farlo...
Se qualcuno potesse aiutarmi ne sarei grato
Ciao 

 ha scritto nel messaggio 
news:PAa_e.20236$kA.22...@news3.tin.it...


 Cioè il mio problema è che devo poter cambiare il valore del where 

Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO CRYSTAL REPORT!!!!!!!!

E' possibile elencare dettagli da tabelle diverse?
Però dovrebbe elencare prima tutti i dati di  una tabella e poi quelli di
un'altra.
Ad esempio in una tabella ci sono i dettagli di una fattura (Con lo stesso
ID del gruppo)
in un altra magari le spese aggiuntive della fattura (sempre con un
riferimento ID del gruppo).
E se non chiedo troppo dovrebbe fare anche un totale generale tra le due
tabelle elencate.
Grazie a chiunque sappia risolvere il dilemma.

Io ho risolto il problema editando a mano il setup.lst che viene fuori
dall'autocomposizione e togliendo dllselfregister in corrispondenza di
CC245IT.DLL. Vedrai che funziona benissimo.

Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTOOOOOOOOO !!!!!!!!!!!!!!!!!!

    Salve a tutti ; due richieste davvero importanti per me :
        1) Posso eseguire una macro 'Access' con un programma VB ; se si
come ???
        2) Se ho necessità di fare una certa funzione non prevista in VB e
devo                             quindi  trovare l'API specifica, come
posso sceglierla fra quelle                                 numerosissime
elencate ??? ; cioè come posso sapere cosa fa una
            determinata  funzione 'API' ???
    Ciao
    LuCa

 ha scritto
|         2) Se ho necessità di fare una certa funzione non prevista in VB e
| devo                             quindi  trovare l'API specifica, come
| posso sceglierla fra quelle                                 numerosissime
| elencate ??? ; cioè come posso sapere cosa fa una
|             determinata  funzione 'API' ???
www.allapi.net

1) devi instanziare l'oggetto access e poi docmd.runmacro (nomemacro)
2) devi trovare documentazione una per una; qualche giorno fa è stato
postato un elenco di siti con API; in uno di questi (sito di Cesare Rizzi)
trovi un .chm con API, dichiarazione, descrizione ed esempio.
Newsgroup: it.comp.lang.visual-basic
Titolo: Compilazione "monolitica"

Ciao a tutti,
volevo sapere se in VB č possibile fare una compilazione che aggiunga
direttamente all' eseguibile librerie e OCX di cui ha bisogno, in modo da
poter avere un programma (non importano le dimensioni) indipendente dal
sistema e che non ha bisogno di installazione.
E' possibile o suona un po' come una "bestemmia" del Visual Basic?
Knefas

 E' possibile o suona un po' come una "bestemmia" del Visual Basic?
con vb da solo *non* e' possibile (anche perche' a pensarci ha poco senso:
metti che io ho sul pc 5 programmi vb, invece di installare la vm una volta
per tutte, mi tocca "installarla" 5 volte). in ogni caso esistono dei
programmi (se non sbaglio uno si chiama Fusion) che inglobano, all'interno
di un exe compilato normalmente, tutti gli ocx-dll di cui ha bisogno e si
preoccupa anche di registrare gli activex prima dell'avvio e di
de-registrarli al termine dell'esecuzione.
ciao, assa.

 di un exe compilato normalmente, tutti gli ocx-dll di cui ha bisogno
E se sei fortunato il tuo programma funziona anche :)
Ciao
--
' // Initialize the expression evaluator
Engines.Evaluator = CreateObject("
http://www.neodatatype.net
")
' // you can find resources for and from the NG here!
Me.SitoComune = "
http://www.it-lang-vb.net
"
Newsgroup: it.comp.lang.visual-basic
Titolo: Salto di routine

Lavoro su un programma fatto con VB5. In una forma ho due campi con tabulazione
consecutiva che si chiamano Text2 e Text3. Relativamente a Text2 ho la seguente
routine:
Private Sub Text2_LostFocus()
If Text2.Text <> "" Then
    If Text2.Text <> "1" And Text2.Text <> "2" And Text2.Text <> "3" Then
        MsgBox "INSERIRE NUMERO VALIDO", , "ATTENZIONE"
        Text2.Text = ""
        Text2.SetFocus
    Else
        rscheda.Edit
        rscheda("NUMERO") = Text2.Text
        rscheda.Update
    End If
End If
End Sub
Anche Text3 ha ovviamente la sua routine (che non sto a riportare per
comodità).
Il problema è che quando eseguo il programma ed immetto in Text2 un numero non
valido, compare il messaggio e poi il cursore non ritorna nel campo per
immettere un nuovo valore ma il programma passa ad eseguire la routine del
Text3. Il problema non sussiste quando vado in debug una riga alla volta. E'
forse un problema di velocità? Cosè che fa saltare alla routine di Text3 senza
fermarsi come dovrebbe dalla istruzione Text2.SetFocus?
Non sono molto pratico di VB5 come vedete, sono stato già aiutato da uno di voi
in passato e spero che qualcuno mi aiuterà ancora.
GRAZIE!!!
-- 
Posted from  [213.92.64.170] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Ti rispondo io! Che sono nuovo! (e magari ti dico un sacco di cretinate)
Mi par di capire, che quando viene generato l'evento lostfocus della tx2, il
fuoco passa inevitabilmente alla tx3 (senza prima controllare la validità
della text2). Ti appare il messaggio, e quando legge text2.setfocus, viene
generato l'evento text3.lostfocus.
Ma scusa, non fai prima ad usare le'vento keyPress, invece? del tipo:
sub text2_keypress(keyascii as int)
    if keyascii non è uno dei tasti permessi, allora manda un messaggio, o
keyascii = 0
end sub
O magari non ho capito quel che volevi dire, ma spero di essere stato utile!
Starla.


 >


 via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Posso dire anche io la mia cretinata?
se nella text 3 hai una routine simile a quella della text 2 quando text2
perde il fuoco perchè premi tab e passi a text3 la routine di text2 ti
riporta il fuoco su text2 facendo scattare l'evento lostfocus di text3
quindi ti conviene studiare qualcosa legato all'evento keypres o keyup
(escluderei keydown) oppure inserire una command da premere per confermare
l'inserimento dei dati.
Davide
Newsgroup: it.comp.lang.visual-basic
Titolo: Barra delle news

Vorrei aggiungere alla mia applicazione in VB6 una barra orizzontale dove 
far scorrere delle news scaricate in automatico da qualche parte.
Sapete come posso realizzare la mia idea?
Mood 



Non č molto carino, ma prova a partire da qui.
Incolla in una form una label della larghezza della form, e un timer. 
Incolla questo codice:
***********
Dim a As String
Private Sub Form_Load()
a = "Vorrei aggiungere alla mia applicazione in VB6 una barra" & _
  " orizzontale dove far scorrere delle news scaricate in automatico" & _
  " da qualche parte. Sapete come posso realizzare la mia idea?"
  Timer1.Interval = 100
End Sub
Private Sub Timer1_Timer()
Static nCount As Long
Dim ss As String
nCount = nCount + 1
If nCount > Len(a) Then
  nCount = 0
  ss = a
Else
  ss = Mid$(a, nCount) & " " & Left$(a, nCount - 1)
End If
Label1.Caption = ss
End Sub

 Sapete come posso realizzare la mia idea?
Per quanto riguarda lo scorrere del testo, ti hanno già risposto, invece
per quanto riguarda dove reperire le news io in un progetto in vb2005
leggo i dati in formato xml dalle notizie rss. Se non ricordo male usavo
quelle del sito di 
repubblica.it
, ma uno vale l'altro.
prova a cercare in questa direzione.
Saluti,
pusky re delle rane

Newsgroup: it.comp.lang.visual-basic
Titolo: Datareport ... poco flessibili

Salve a tutti,
volevo sapere se e come e' possibile modificare la proprieta' caption
(modificare il testo visualizzato) di una label inserita in un datareport
in fase di esecuzione ( VB6 professional + SP4 ).
L'unica soluzione che sono riuscito a trovare e' la funzione "title" ma
quella mi consente di agire solo su una label, non di piu'.
Grazie in anticipo.
Gianni
-- 
Posted from 
mta23-acc.tin.it
 [212.216.176.76] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Grazie in anticipo.
DataReport1.Sections(<Nome sezione>).Controls(<Nome etichetta>).Caption =
"Nuova caption"
Saluti

Ti ringrazio molto,
Ciao, Gianni
-- 
Posted from 
pop04-acc.tin.it
 [212.216.176.67] 

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB.net] Problema con do while

Ho creato un ciclo
ric.SelectionStart =0
Do While ric.SelectedText <> Convert.ToChar(Keys.Enter)
ric.SelectionStart += 1
ric.Select(ric.SelectionStart, ric.SelectionStart + 1)
MsgBox(ric.SelectionStart)
Loop
Ho scritto nella rich text box  (ric) edivadA
Con questo ciclo mi dovrebbe trovare il carattere ascii 13 che è al posto di
A.
Insomma il problema è che non me lo trova
Ho provato a sostituire il carattere a capo con la A (edivadA) e così
funziona perfettamente.
Questo credo che sia l'unico modo per individuare degli ascii 13
Voi mi sapete dire dove ho sbagliato (L'errore del ciclo è quello di andare
fino al massimo carattere e poi di andare in loop)
Grazie in anticipo.

Cosě sembra funzionare anche se non so se č esattamente quello che volevi...
 ric.SelectionStart = 0
      Do While ric.SelectedText <> Convert.ToChar(10)
         ric.Select(ric.SelectionStart, 1)
         ric.SelectionStart += 1
      Loop
HTH
-- 
Corrado Cavalli [Microsoft MVP]
UGIdotNET - 
http://www.ugidotnet.org

 ha scritto


Insomma il problema è che non me lo trova
Non so se ho capito cosa vuoi fare, ma cosi' sembra funzionare:
ric.SelectAll()
MessageBox.Show(ric.SelectedText.IndexOf(ControlChars.Lf))
-- 
hth, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: Programma multilingue

Ho scritto un piccolo programma e attraverso un file esterno permetto di
cambiare i nomi dei controlli in modo che possa essere usato anche da utenti
di altre paesi.
Un mio amico in america,  mi dice che sul suo computer tutto va bene tranne
che per le inputbox, che
hanno si il titolo in base al nome configurato nel file sopra menzionato, ma
i pulsanti continuano
a dare la scritta "ok" ed "Annulla".
Io sapevo che "msgbox" e "inputbox" prendono i nomi di "Annulla","Si" etc
dal sistema operativo dove installati.
Sapete darmi una spiegazione?
Cosa posso fare?
Grazie in Anticipo

 Sapete darmi una spiegazione?
Nessuno ha risposto al tuo post di due giorni fa, per cui mi sento in
diritto di sparare le mie ipotesi, per quanto campate per aria.... in ordine
di plausibilitą (crescente o decrescente?)
1) pur abitando in america, il tuo amico ha il s.o. italiano
2) con il pacchetto di installazione gli hai sostituito la versione di
qualche dll, montandogli
quella italiana.
Salutoni
Sergio

 di plausibilità (crescente o decrescente?)


 dll potrebbero essere coinvolte?
No, non lo so.
Se lo avessi saputo non avrei parlato di ipotesi campate per aria.
Potrei ipotizzare il runtime di vb6.
Salutoni
Sergio

 ha scritto nel messaggio
news:b9tlat$mtlpm$1...@ID-173193.news.dfncis.de...


 ha scritto nel messaggio
news:Juswa.198841$kYH....@news01.bloor.is.net.cable.rogers.com...

Newsgroup: it.comp.lang.visual-basic
Titolo: Salvare struttura treeview

Salve, ho bisogno in qualche maniera, di identificare le posizioni Parent, e 
child di una struttura treeview.
Mi spiego meglio:
l'utente, mi effettua il drag & drop delle voci di una treeview.
quindi sposta i vari oggetti  da un ramo all'altro della struttura.
Cio che mi serve, al termine del suo lavoro,
č di individuare le varie posizioni delle voci, chi č Parent, e chi č child,
qualche idea ?
grazie di cuore per l'attenzione.
Cesare 

 Cesare
Perchè non salvi in una Tabella(anche se sono forse più comodi XML)
con la struttura ricorsiva che si usa per le 
DI.BA
 dei materiali....?
Item
ItemChild
In questo modo sai sempre di chi è figlio un Nodo, e dalla tabella
riesci sempre a ripopolare il Tree...
Ovviamente l'estrazione dei records della tabella per la ripopolazione
verrà fatta con una Ricorsiva per Field(Item) sul Recordset....
Se ti serve ho un demo(per Access ma sostanzialmente è quello)
@Alex

 ha scritto nel messaggio 
news:1174720620.2...@n59g2000hsh.googlegroups.com...


 Cesare
Spero tu abbia Access...
Il demo è questo:
http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=247
In sostanza ora i dati salvati in tabella popolano una ListBox nella
quale EMULO
un TreeView, ma se vedi è presente l'equivalente del NodeLevel quindi
è banale adattarla.
Ci sono 2 soluzioni vedi tu quale preferire, l'importante è vedere se
la soluzione
può esserti utile.
Ovviamente per il processo contrario, cicli tutto il Tree e la dove
sono presenti Child
salvi il ChildName ed il Parent....
@Alex

 ha scritto nel messaggio 
news:46043efd$0$10622

se cerchi su google "serialize treeview" o simili trovi decine di soluzioni.
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: [help] aggiornare database

Sto lavorando per leggere/aggiornare un database access coi controlli
ADO.
Dopo aver scritto le routine per lo scorrimento dei dati ora devo fare
la parte sull'inserimento dei dati.
Purtroppo però alla fine di tutto (ossia quando si pigia il pulsante
Salva) mi esce l'errore sulla riga di codice:
adoAgenda.recordset.update.
Qualcuno mi sa dire il  perchè ?
Forse occorre aprire il database access (anche se però l'avevo già fatto
al load del form associandolo al Jet 3.51...e poi i pulsanti di
sacorrimento avanti/indietro funzionano) ?
Grazie a tutti. Un saluto.

 ha scritto nel messaggio
news:3C14A016...@libero.it...


 > Forse occorre aprire il database access (anche se perň l'avevo giŕ fatto



un momento...piccolo chiarimento: Jet 3.51 č per i database di Access 97,
Jet 4.0 consente di leggere database di Access 2000. Passo e chiudo.
Newsgroup: it.comp.lang.visual-basic
Titolo: EXCELL 97

Salve e scusate se vi chiedo un semplice aiuto.
Il problema č l'utilizzo di Excell per calcolare una media ponderata in
maniera automatica.
Esempio:
                    pezzi          Lit/pz        P.medio
art. A              100            10
art. B              135            15
art. C              250            13
art. D              190            18
Matematicamente il discorso č semplice: somma dei prodotti delle colonne
pezzi e Lit/pz diviso la sommatoria della colonna pezzi, ma se applicato con
excell il discorso diventa, secondo me complesso. Ho prvato a vedere se
nella guida vi sia qualche aiuto, ma per la veritą mi sembra di non aver
trovato nulla. Ho provato anche a vedere se utilizzanod le matrici il
discorso poteva essere impostato, ma senza nessun risultato.
Non so che fare...bohhh ???
Con il VB di excell forse ci sarebbe una soluzione, ma per la veritą mi
sembra molto arduo ed ostico.
Qualcuno sa come fare ???
Notare che vorrei impostare il foglio di lavoro in maniera che
automaticamente mi venisse fuori, sulla colonna P.medio (prezzo medio)
l'effettivo valore in funzione anche dei successivi inserimenti che poteri
fare.
Grazie per il Vostro contributo.
Pellizzari

Non ho capito bene quello che devi fare...
Metti nella tabella i risultati a cui devi giungere con le formule teoriche
e forse posso darti una mano....
--------
Ciao
Sabba





Non ho capito bene quello che vorresti 
fare


ti propongo due soluzioni:


metti nella cella della colonna corrispondente 
"P.medio" la formula 


[cella corrispondente pezzi]/
[cella corrispondente Lit/pz]


puoi impostare il formato attraverso la voce 
formato della menùbar


(ad es. numero dei decimali, punteggiatura delle 
migliaia etc.)


e lo riporti su tutta la colonna 
"P.medio"


 


se invece vuoi la somma di tutti i pezzi e la somma 
di tutti i prezzi unitari


ti crei una colonna piuttosto lunga, a fianco della 
colonna "P.medio" metterei una formula che calcola fino a quel punto quello che 
ti serve( lo fai sulla prima cella e poi la copi su tutte le altre) e 
nasconderei la colonna poi nelle celle della colonna "P.medio" metterei la 
formula:"=SE(B4;D4)" dove B4 è una cella della colonna pezzi e D4 e una 
cella della colonna nascosta, la formula significa che se la cella B4 non è NULL 
metti nella cella corrente il valore della cella corrispondente della colonna 
nascosta altrimenti non mettere niente


Spero di essere stato chiaro


 


        
                
                
                
    Sergio