mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: chiusura applicazione su chiusura pc

salve,
scusate la banalità ma sono un neofita...
ho sviluppato un piccolo programmino in vb6 che si avvia all'avvio del 
computer e se ne sta ridotto a icona.
durante l'esecuzione monitorizza alcuni eventi e li salva su un file di 
testo per successive elaborazioni
il problema è alla chiusura del pc che mi compare la mascherina di windows 
"termina applicazione" se non la chiudo io manualmente.
e' possibile ovviare il problema? cioè nel momento in cui chiudo il pc. il 
programma venga chiuso senza richieste all'utente?
PS nell'evento unload dell'unica form del programma avvio una elaborazione 
che può durare una trentina di secondi.
grazie dell'aiuto
mat 


Ecco , a proposito
Ho chiesto anche ai guru VB5,6 come fosse
possibile intercettare eventi legati alla chiusura
o apertura di Windows per lanciare eventuali
procedure
Una fra tutte :  due righe di codice per intercettare  run(registro)
per far partire una procedura all'apertura di windows.
Non sono mai riuscito ad avere una risposta.


Secondo me l'unica è far sì che il tuo programma intercetti la chiusura di
Windows, *la annulli*, esegua l'elaborazione, e una volta conclusa invochi lui
stesso la chiusura di windows.
Non è facile perché quella famosa "elaborazione" deve essere avviata in modo
asincrono, ad esempio con l'ausilio di un timer "one-shot".
Aggiungi un Timer (es. tmrStartElab) con Enabled=False e Interval=100.
Private bElabDone As Boolean
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
    If UnloadMode = vbAppWindows Then
        If Not bElabDone Then
            ' Annulla l'azione
            Cancel = True
            tmrStartElab.Enabled = True
        End If
    End If
End Sub
Private Sub tmrStartElab_Timer()
    ' Stoppa il timer
    tmrStartElab.Enabled = False
    ' Avvia l'elaborazione
    StartElab
    ' Setta il flag
    bElabDone = True
    ' Esce da Windows
    ExitWindows
End Sub
Per ExitWindows puoi vedere il thread di ieri dal nome "shutdown / reboot API".
Bye
Raf
-----------------------------------------------------
Funk: cooler than the other side of the pillow.

 ha scritto nel messaggio 
news:465418d2$0$36452$4faf...@reader5.news.tin.it...

caspita...e io credevo che fosse una cosa banale.
grazie comunque
ciao, Mat

Questo chiude il programma emule se cambi il nome col nome del tuo programma 
si chiude il tuo programma.Naturalmente non è la risposta ma un pezzo della 
risposta. Non saprei come farla partire prima della chiusera del pc. Io per 
esempio uso un timer.
For Each obj In GetObject("winmgmts:").ExecQuery("SELECT * FROM 
Win32_Process WHERE Name='eMule_AdnzA.exe'")
     obj.Terminate
     Next
Newsgroup: it.comp.lang.visual-basic
Titolo: Errore  -2147217900 Su drop table

In visual basic 6 dopo una elaborazione devo fare una DROP table, (
SQL)  su di una tabella
ma mi da l'errore -
2147217900
 con il seguente messaggio :
Tipo di errore : il modulo di gestione del database non può bloccare
la tabella perchè in uso ad un altro utente o processo.
anche se metto le istruzioni
rs.close
SET rs = Nothing
non mi funziona
Qualcuno potrebbe darmi un aiutino 
grazie 
Christian - Chieri

 non mi funziona
Non hai altre connessioni in giro?
Prova a fare una funzione che fa il drop prima, e quando esci la lasci lě
fino a quando uno non rientra e la cancella prima di fare la nuova.
-- 
DBMS Firebird
VB6 + Ado

 la tabella perchè in uso ad un altro utente o processo.
Questo mi fa pensare che tu utilizzi i recordset connessi per 
effettuare le modifiche (cosa che io aborro, ma proprio oggi ho sentito 
pareri contrari).
Al di là di controllare da dove possa venire questa cosa, riflettiamo 
in ottica costruttiva: se la tabella ti serve solo come appoggio 
temporaneo, perchè non creare una tabella temporanea in Ram (vedi # su 
BOL), che si autodistrugge quando disconnetti e non è visibile da altri 
spid?
Ciao
Alberto
-- 
seguiam la scia
se un meganoide ci spia

 la tabella perchè in uso ad un altro utente o processo.
Apri l'Enterprise Manager e guarda chi ha il lock...magari e' un recordset 
che per sbaglio non hai chiuso.
Newsgroup: it.comp.lang.visual-basic
Titolo: selezione record

Salve,
una domanda: ho una flex grid, in cui visualizzo dei record; ora, vorrei 
selezionare, uno alla volta, solo alcuni di questi record e con un 
apposito tasto aggiungerliad una lista...ora, la domanda e' : come posso 
procedere per fare in modo che i record selezionati mi rimangono 
memorizzati, in modo da poterli poi mandari ad una routine di stampa ???
spero di essere stato chiaro...
Grazire


    Ti do una risposta, ma già so che qualcuno mi vorrà picchiare per quello
che sto per dire.
    Creati un DB di appoggio nel quale copi i record che man mano vai a
selezionare. In questo modo quando devi stampare non devi far altro che
pendere il DBPezzotto e mandarlo alla stampante (se usi Crystal Report ci
vuole un attimo).
    Ciao Rocco



ehm... se usa Crystal Report, se non ricordo male c'è una proprietà
SelectionFormula...
Se proprio non c'è nella sua versione (l'ultima volta che ho usato
Crystal Report era con VB5), che si crei una tabella temporanea, o,
ancora meglio, una query, non serve un intero db!
Ciao,
Moreno
#sirri#@#
morenosoft.com#
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.msvbsite.net
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.it-lang-vb.net
---------------------------------------------------------------------------

memorizzati, in modo da poterli poi mandari ad una routine di stampa ???
Una soluzione multiuso e', se usi ADO, creare un recordset disconnesso
cui aggiungi man mano i record selezionati.
A questo punto puoi dare il recordset in pasto a quello che vuoi:
un' altra griglia, il crystal report, il datareport, una funzione di stampa
scritta da te, puoi salvare anche il recordset su file, insomma ne fai quello
che vuoi.
hth, hal

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

Domanda da principiante:
Con il codice seguente apro un file .csv e leggo tutte le righe in esso
contenuto.
capita pero' che le righe siano parecchie es.: > 57000
in prativa quando K ha un valore alto compare l'errore di overeflow..
come posso risolvere il problema?
ciao a tutti e grazie.
......
Dim K as Long
Open sFileCsv2 For Input As iCn2
  sStream2 = Input(LOF(iCn2), iCn2)
Close iCn2
aRighe2 = Split(sStream2, vbCrLf)
k = UBound(aRighe2) - 1
For i = 1 To k
sCodice = Left$(aRighe2(i), InStr(aRighe2(i), ";"))
next

 [CUT]
Non è che hai dichiarato "i" come integer?
MIk
Newsgroup: it.comp.lang.visual-basic
Titolo: ADO e "Impossibile aprire altre tabelle"

Ciao.
  Ho un'applicazione cone delle funzioni di ricerca molto avanzate per cui
ho necessitaą di aprire diversi Recordset che caricano i vari criteri di
ricerca.
  Ogni volta, perņ, che riapro uno dei Recordset di ricerca la memoria
utilizzata del PC aumenta... fino ad un certo punto quando mi viene generato
l'errore => "Impossibile aprire altre tabelle" !!!!!!!!!!!!!!!!!!!!!!!
  E la memoria da quando ho aperto il programma č passata da 98Mb a 132Mb...
  Tenete presente che prima di instanziare un nuovo RecordSet verifico se
precedentemente non fosse aperto, lo chiudo e lo setto a Nothing:
If Not (RsEx Is Nothing) Then
  If RsEx.State = adStateOpen Then
    RsEx.Close
  End If
  Set RsEx = Nothing
End If
Set RsEx = New ADODB.RecordSet
Che altro fare???????????????????
Grazie 1000

Che altro fare???????????????????
Fornire qualche informazione in piu' ;-)
Ciao
Aldo
Newsgroup: it.comp.lang.visual-basic
Titolo: DataReport e Stampante Predefinita (3)

Vorrei stampare un DataReport direttamente senza visualizzare la finestra di
dialogo stampa.
Fin qui nessun problema, visto che basta lanciare la stampa nel modo
seguente: oggetto.PrintReport False
Ora però, la stampante che viene utilizzare è quella Predefinita nel Sistema
Operativo.
Se però volessi impostare io la stampante prima della stampa del DataReport
come debbo fare?
Io ho provato a scrivere il seguente codice:
Dim prn As Printer
   For Each prn In Printers
       If prn.DeviceName = "NomeStampanteDaImpostare" Then
          Set Printer = prn
          Exit For
       End If
   Next
   MsgBox "Stampante selezionata: " & Printer.DeviceName
Il codice funziona benissimo se io non stampo un DataReport.
Se invece stampo un DataReport, la nuova stampante impostata non viene
considerata affatto e viene comunque presa la stampante che è impostata come
predefinita.
Come posso fare?
Dove sbaglio?
Grazie in anticipo.

Buona fortuna.
Qui sotto un mio vecchio post che ha ricevuto ZERO risposte.
Ciao
Alberto
Ciao a tutti.
Ho una serie di DataReport che vengono generalmente stampati chiamando:
DataReport.PrintReport True
quindi lasciando all'operatore la scelta della stampante.
Adesso ho invece bisogno di dirigerne uno SEMPRE su una stampante
particolare, chiamiamola PRN_A, indicata in un file Ini, senza lasciare
all'operatore la scelta.
Il problema è che questa stampante NON è quella di default del sistema.
Il metodo PrintReport non accetta come parametro la stampante, e non ho
trovato nessuna proprietà di questa tipo.
Per il momento, leggo qual'è la stampante di sistema, sposto la stampante di
sistema su PRN_A, lancio la stampa, aspetto un po' e poi metto la stampante
di sistema su quella originale.
Questo però sui report lunghi, dà grossi problemi, visto che il PrintReport
è asincrono, e quindi mi trovo a volte ad avere già rimesso la stampante su
quella precedente, mentre lo spooling non è ancora terminato. Questo genera
errori di sistema o la stampa sulla stampante sbagliata.
Allora cosa ho fatto: dopo aver lanciato la stampa, aspetto che il
datareport abbia completato il task asincrono, e poi rimetto la stampante su
quella di sistema. Problema: Se l'applicativo si pianta a metà, o anche solo
se manca la luce, il sistema operativo si trova con la stampante sbagliata.
Oppure, se durante la stampa l'utente lancia un'altra stampa (ad esempio una
e-Mail della fidanzata), la stampa va senza che lui se ne accorga su una
stampante di rete sbagliata.
In sostanza, vorrei sapere se qualcuno sa come dirigere la stampa di un
datareport su una stampante che non sia quella predefinita, senza cambiare
le impostazioni di sistema.
Grazie
Alberto
VS6.0 SP4

 ha scritto nel messaggio
news:adqg8s$l06$1...@newsreader.mailgate.org...

Newsgroup: it.comp.lang.visual-basic
Titolo: Form in primo piano

Ho trovato su Tips and tricks VB32 il seguente articolo che dovrebbe
consentire di tenere un form sempre in primo piano:
'Dichiarazioni
Declare Sub SetWindowPos Lib "user32" (ByVal hWnd As Long, ByVal
hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal Cx As Long,
ByVal cy As Long, ByVal wFlags As Long)
Global Const HWND_TOPMOST = -1
Global Const HWND_NOTOPMOST = -2
'USO per Primo Piano
Call SetWindowPos(Form1.hWnd, HWND_TOPMOST, 0, 0, 0, 0, &H3)
'USO per Secondo Piano
Call SetWindowPos(Form1.hWnd, HWND_NOTOPMOST, 0, 0, 0, 0, &H3)
Ho provato ad utilizzarlo cosi':
1. form1.show
2.Call SetWindowPos(Form1.hWnd, HWND_TOPMOST, 0, 0, 0, 0, &H3)
3. form2.show
e mi aspettavo di vedere comunque il form1 in primo piano rispetto al form2
che pure avrebbe dovuto avere il fuoco, in realtà form2 nasconde il form1.
Dove sto sbagliando?
Grazie per l'aiuto.
Ciao, Fabrizio.

Ho trovato la spiegazione ma non la soluzione:
non funziona con form MDIchild: questa è la spiegazione
visto che mi serve utilizzarlo con form MDIchild qualcuno ha la soluzione?
Ciao, Fabrizio.



una alternativa potrebbe essere quella di scollegare la MDI Child e quindi visulizzarla TOPMOST...
trovi un esempio sul mio sito...
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

Newsgroup: it.comp.lang.visual-basic
Titolo: info sul registro

sapete dirmi come si può verificare la presenza di un programma all'avvio??
Cioè voglio verificare se all'avvio della mia applicaz realizzata in vb,
excel e acces è presente sul computer.
ciao

 ha scritto nel
messaggio
news:Jni_9.65466$YG2.1...@twister1.libero.it...


 Cioè voglio verificare se [] excel è presente sul computer.
excell.vbs  ( lo stesso lo fai con access)
Set oShell = CreateObject("WScript.Shell")
sRegBase = "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\Excel.exe\"
'( forse "wrappa".. comunque da sRegBase fino a exe\" tutto su 1 riga )
sAppExe = RegRead(sRegBase)
sAppPath = RegRead(sRegBase & "Path")
If sAppExe = "" Then
    WScript.Echo "Excel is not installed"
Else
    WScript.Echo "Excel exe: " & sAppExe
    WScript.Echo "Excel path: " & sAppPath
End If
Function RegRead(sRegValue)
    Set oShell = CreateObject("WScript.Shell")
    On Error Resume Next
    RegRead = oShell.RegRead(sRegValue)
    If Err Then
      RegRead = ""
      Err.clear
    End If
        If VarType(RegRead) < vbArray Then
      If RegRead = sRegValue Then
        RegRead = ""
      End If
    End If
    On Error Goto 0
End Function
--
Fosco
Newsgroup: it.comp.lang.visual-basic
Titolo: file di HELP

Salve a tutti
Come si fa a generare il file di help per un programma?
Da dove posso cominciare?
Grazie a tutti
Sergio

I file Help sono particolari File compilati, quindi inizia a trovare su
internet un programmillo che ti permetta di scriverli e poi di compilarli!
(in visual studio c'č anche un file che li compila....ma non ricordo il
nome).
Cmq..prendi un programma...e inizia da lě....Non č proprio cosě immediato!
:-(
Ciao Simo


 ...
In Visual Studio esiste l'HCW.EXE, che dovrebbe trovarsi nella directory
\Program Files\Microsoft Visual Studio\Common\Tools (o \Programmi\ecc. ecc.
se hai il VS in italiano...)
--
Massimo Fauro

 ha scritto nel messaggio
news:3ae45b85$1...@news.bluewin.ch...

Va bene, ma come si comincia?
Sergio

 wrote in message
news:9c1ncf$ucl$1...@hermes.unipg.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: data report visulizzazione

Utilizzo un data report che prende i dati da Access.
Se modifico i dati nel database, la prima volta che visualizzo il report mi
mostra i dati della visulizzazione precedente. Per mostrami i dati corretti
devo uscire dal report e rientrare di nuovo.
C'č un modo per far si che gią dalla prima visualizzazione i dati siano
quelli corretii?
Grazie.
Corrado
--
Indirizzi e-mail
acqu...@sogohome.com
 (fornitori)
conta...@sogohome.com
 (contabilitą)
imp...@sogohome.com
 (importazioni)
in...@sogohome.com
 (informazioni)
i...@sogohome.com
 (supporto tecnico)
ord...@sogohome.com
 (ordini clienti)
ragio...@sogohome.com
 (amministrazione)
ven...@sogohome.com
 (vendite)

 
ven...@sogohome.com
 (vendite)
E quello del portiere e dell'amministratore del condominio
dove sono?
    danilo

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Domanda x esperti linguaggio SQL

Ciao e grazie per l'attenzione !!
Allora, il mio problema é il seguente :
Da una tabella (formato access) devo prelevare dei dati in questo
modo..
- Preleva dalla tabella X la somma di  A dove valore = 5 e indice = 1
- Preleva dalla tabella X la somma di  B dove valore = 6 e indice = 1
- Preleva dalla tabella X la somma di  C dove valore = 10 e indice = 1
e poi devo mostrarli in una griglia in orizzontale, tipo  :
INDICE ---------    A     ---------  B --------  C
     1                  3                 10          7
(non so se l'allineamento sara' corretto)
E' ovvia che "tabella X" é sempre la stessa tabella, mentre A B e C
sono 3 colonne diverse.
Quello che non capisco é questo, é possibile ottenere in una sola
mossa (query) tutti i dati allineati ? 
Per ora l'unica soluzione che ho in mente é di eseguire una query per
ogni colonna  e salvare i risultati in un array, poi usare l'array per
riempire la griglia, ma magari c'e' un modo per ottenere direttamente
tutti i dati in un record solo usando una query sql "cazzuta", e
quindi senza sovracaricare il mio povero pc.
Pensavo che magari ce' il modo di fare piu' "select..where" in una
select... ma mi sa che la risposta é no eh ?
Grazie per l'attenzione, a presto !!
David
-----= Posted via Newsfeeds.Com, Uncensored Usenet News =-----
http://www.newsfeeds.com
 - The #1 Newsgroup Service in the World!
-----==  Over 80,000 Newsgroups - 16 Different Servers! =-----

 select... ma mi sa che la risposta é no eh ?
Non so se ho ben capito, temo già che ci saranno complicazioni... ;-)
select distinct indice, (select sum(a) from tab where valore=5) as ta,
(select sum(b) from tab where valore=6) as tb, (select sum(c) from tab where
valore=10) as tc from tab where indice=1



Sei mitico !  in meno di un ora eheheh
Provo subito se funziona !!
Grazie mille a buon rendere, Dave


 ...in meno di un ora eheheh
Questa non l'ho capita :-((
Newsgroup: it.comp.lang.visual-basic
Titolo: visualizzare un file...

So di chiedervi una cosa banale... ma come faccio in VB (usato all'interno
di excel) per visualizzare all'interno delle caselle del foglio elettronico
un file di testo (contenente cifre separate da tabulazioni) aperto con il
comando open???
Se attribuisco con input # le cifre a una variabile, e scrivo la variabile
in una cella (con = davanti), non mi visualizza niente!!!
Grazie.

 comando open???
Beh... visto che non mi ha risposto nessuno, mi rispondo da solo ;-)
Ho creato una macro che carica il file... e ho messo un pulsante che appena
viene schiacciato, avvia il caricamento.
Adesso pero' arriverà il difficile... Mi sa!!!
Grazie comunque.

Newsgroup: it.comp.lang.visual-basic
Titolo: Help Fltri

Mi potresti dare una mano ho bisogno di sapere come creare un filtro di
ricerca in maniera estremenmente semplice ("se possiblie avere un'ocx")
all'interno di un form.


Ma scusa:
un filtro di ricerca di cosa?
"tenta" di essere + chiaro se speri in una risposta...
ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: mouse su image

ciao
con api GetCursorPos so dove e' posizionato il cursore, se usassi un 
controllo con  Hwnd
uso WindowFromPoint(pt.X, pt.Y) = ctlHwnd
ma il controllo image non ce l'ha come posso fare?
ciao e buon week end
ilario 

dopo un po di provo ci sono riuscito
se puo' servire
Private Function CheckMouseOver(immagine As Image) As Boolean
    Dim pt As PointAPI
    GetCursorPos pt
    If pt.Y >= immagine.Top * Screen.TwipsPerPixelY And pt.Y <= 
(immagine.Top + Image.Height) * Screen.TwipsPerPixelY And pt.X >= 
immagine.Left * Screen.TwipsPerPixelX And X <= (immagine.Left + 
immagine.Width) * Screen.TwipsPerPixelX Then
        CheckMouseOver = True
    Else
        CheckMouseOver = False
    End If
End Function
ciao
ilario 

due piccole modifiche
Private Function CheckMouseOver(immagine As Image) As Boolean
    Dim pt As PointAPI
    GetCursorPos pt
    If pt.Y >= immagine.Top * Screen.TwipsPerPixelY And pt.Y <=
(immagine.Top + immagine.Height) * Screen.TwipsPerPixelY And pt.X >=
immagine.Left * Screen.TwipsPerPixelX And pt. X <= (immagine.Left +


ciao mi potete provare questo codice, ho notato che funziona ma qualche 
volta mi fa i capricci
per fare veloce
in usercontrol inserite 5 (6)  image con diverse immagini (pulsanti normal e 
hover) e due timer
e poi questo codice
Private Declare Function GetCursorPos Lib "user32" (lpPoint As PointAPI) As 
Long
Private Type PointAPI
        X As Long
        Y As Long
End Type
Private Sub Image1_MouseMove(Button As Integer, Shift As Integer, X As 
Single, Y As Single)
Image1.Picture = Image3.Picture
Timer1.Enabled = True
End Sub
Private Sub Image2_MouseMove(Button As Integer, Shift As Integer, X As 
Single, Y As Single)
Image2.Picture = Image4.Picture
Timer2.Enabled = True
End Sub
Private Function CheckMouseOver(immagine As Image) As Boolean
    Dim pt As PointAPI
    GetCursorPos pt
    If pt.Y >= immagine.Top * Screen.TwipsPerPixelY And pt.Y <= 
(immagine.Top + immagine.Height) * Screen.TwipsPerPixelY And pt.X >= 
immagine.Left * Screen.TwipsPerPixelX And pt.X <= (immagine.Left + 
immagine.Width) * Screen.TwipsPerPixelX Then
        CheckMouseOver = True
    Else
        CheckMouseOver = False
    End If
End Function
Private Sub Timer1_Timer()
If CheckMouseOver(Image1) = True Then Exit Sub
Image1.Picture = Image5.Picture
Timer1.Enabled = False
End Sub
Private Sub Timer2_Timer()
If CheckMouseOver(Image2) = True Then Exit Sub
Image2.Picture = Image5.Picture  '( Image6.Picture)
Timer2.Enabled = False
End Sub
il tutto per fare il mouse hover su un controllo image  per non usare le 
picture
sto' sviluppando una scrollbar personalizzabile ora funziona con le picture 
ma le voglio sostituire con delle image
mi dite come va per cortesia
ciao
 ilario
Newsgroup: it.comp.lang.visual-basic
Titolo: Chiusure IE

Buon giorno e buona domenica.
Ho questo problema, riesco ad aprire da VB Internet Explorer, ma non riesco
a chiuderlo; il sistema che uso per aprirlo è questo:
Dim inte As Object
    Set  inte = CreateObject("InternetExplorer.application")
        inte.Visible = True
        inte.Navigate CStr("
www.altavista.it
")
Per chiudere l'applicazione ho provato con: inte.close, ma a VB restituisce
questo messaggio: "propietà o metodo non supportati dall'oggetto".
Come fare?
Grazie Fabio.

...

inte.Quit
ciao

 ha scritto nel messaggio
news:8mjh5p$iaf$1...@nslave2.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: funzioni di cripptaggio

lo so che la domanda forse non è pertinente ma esistono funzione vb
che criptano e decriptano stringhe
ciauz 




Per la serie "si faccia una domanda e si dia una risposta"?
Nulla di standard, puoi provare con le CryptoAPI ma ti auguro tanta fortuna
:PP
Ciaotutti,
*

 wrote in message
9jj8p0$nldsj$1...@ID-68324.news.dfncis.de...

C'e' una classe gia' pronta sul Sito Comune basata sulle CriptoAPI, il file
in questione e' 'clsCripto.zip'
Ciao
--
Luca Dormio
luca....@tin.it


Ops, hai ragione, mi scordo sempre :P
Ciaotutti,
*

> 'clsCripto.zip'
Aaaaaaaarrrggghhh!!!
:)
Ciao

 Ciao Gab
sito comune
ciao
e.

Newsgroup: it.comp.lang.visual-basic
Titolo: Salva col nome

Vorrei salvare, in una detrerminata directory, la pagina attiva di una
applicazione tipo notepad, direttamente, senza che appaia la finestra
"salva col nome". Come posso fare ??
Grazie a chi mo risdponderà.

...


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

Salve a tutti
Ho necessità di modificare un file di installazione  (.cab)  creato da
vb 6.
come  posso fare ?
Grazie Enzo
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 come  posso fare ?
ti rispondo solo per il tuo cognome, che ultimamente è tra i miei
preferiti!!!!!
:-ppp
a parte scherzi, cosa intendi per modificare? se devi
aggiungere/modificare/cancellare files lo puoi fare tranquillamente. un cab
è un file compresso, per cui......ricordati di aggiornare l'lst così da
riflettere le modifiche che hai messo nel cab.....
good coding!!!
-- 
Alletun
Sorry, ask me if you want to get my e-mail!
Newsgroup: it.comp.lang.visual-basic
Titolo: directory & password

si puo accedere trmite visual basic ad una cartella condivisa in rete
protetta da password (e la si conosce).....?
faccio uin esempio:
io per accedere alla cartella cicio sul computer pippo faccio:
\\pippo\cicio\xxx.mdb
ok? ma se questa è protetta da password come la INVIO??


Tu non inviare niente, ci pensa lui a chiedertela.
Si lo so che tu volevi memorizzartela da qualche parte oppure far uscire
una finestra decorata tipo mimetica con scritto "PAROLA D'ORDINE:", ma
non si puo' avere tutto dalla vita..
Ciao

 Ciao
  il mio problema č che non riesco ad accedere all'archivio in rete se la
quest'ultmio si trova in una cartella con password...... e per me č un
grosso problema......
tu mi dici che non č possibile..... e io sono molto triste.....
non mi dą neanche la finestra di richiesta passaword... magari!...

 Ciao
ho risolto.... il metodo c'e'....
si deve creare un drive virtuale ... e poi accedere a questo drive....
questo si puņ fare da windows... o addirittura in run-time usando il comando
"Net Use"
Bye

> > protetta da password (e la si conosce).....?
Ai provato ad eseguire la connessione utilizzando un'unita' di rete?
(se non ricordo male evita anche un "bachetto" nelle connessioni
tramite UNC).
Purtroppo non ho provato ad eseguire la connessione direttamente da
VB. Puoi aggangiare e sganciare la connessione tramite batch file e il
comando NET USE etc.etc. Ho provato questa soluzione su NT e funziona.
Bye
Diego

Newsgroup: it.comp.lang.visual-basic
Titolo: Realizzare un'applicazione: quando è meglio usare VB e quando ACCESS ?

Una domanda per i conoscitori di entrambe gli ambienti di sviluppo:
dovendo realizzare un'applicazione la cui funzione principale (ma non
l'unica) e' la gestione di un database, quando conviene usare VB5 e quando
ACCESS (dato che VB5 consente di gestire un DB e ACCESS consente di
programmare eventi e altro in VB) ? Quali sono i limiti dei due ambienti ?
Un'ultima domanda: ultimamente sento spesso parlare di ADO come sostituto
del DAO in VB5, da dove arriva sto ADO ? come si usa ? dovo trovo un minimo
di documentazione ?
Grazie, Roberto

...


Access e` sicuramente superiore x tutto quello che e` "gestionale puro".
I controlli standard sono enormemente piu` potenti di quelli standard
forniti con vb e riesci a fare l'applicazione scrivendo 1/4 del codice
(se conosci bene Access ;-)
Per contro, VB e` sicuramente piu` veloce nella gestione dello schermo
e lascia piu` liberta` per fare "cose strane", in altre parole e` piu`
flessibile,
essendo un linguaggio "general" e non prettamente orientato alla gestione
dei dati.
Newsgroup: it.comp.lang.visual-basic
Titolo: random numeri

Ciao a tutti
Vorrei fare un programma che mi calcola randomizzando dei numeri
supponiamo che ho 100 numeri e il programma me ne deve scegliere 9... come
si fa?
Grazie dell'eventuale risposta
ciao

Si preme F1 e si cerca random...
Le funzioni in questione sono Randomize e RND.
Se vuoi un paio di consigli sull'algoritmo:
1- Metti un randomize all'inizio dell'esecuzione del codice sennò ti escono
sempre gli stessi valori...
2- Okkio che non ti esca 2 volte lo stesso numero...
                Ciao
                            Allanon

 ha scritto nel messaggio
news:9vveh9$i17ph$1...@ID-67444.news.dfncis.de...


 un po' voi che codice usereste al posto mio...
Prova prima un pò tu al "posto tuo", poi se hai difficoltà posti il codice
dove hai dei problemi.
Bisognerebbe dimostrare un pò di buona volontà.
Senza polemica,
Sal

Newsgroup: it.comp.lang.visual-basic
Titolo: Compressione file in automatico

Ciao a tutti,
avrei il seguente problema: debbo trovare un modo per comprimere dei file
*.mdb in modo da ottimizzare lo spazio di uno ZIP 100.
Il tutto deve essere eseguito da un'applicazione la quale prima di copiare
nello ZIP 100 tali file li comprime.
Che cosa mi suggerite?
Debbo acquistare del software?
Saluti
Mosca

 Che cosa mi suggerite?
Puoi utilizzare DAO e l'istruzione compactDatabase che riduce lo spazio 
inutilizzato del db.
Poi puoi comprimere il file mdb ad esempio utilizzando le zlib o simili.
(la compressione e' di 5-10 volte di solito).
Sul sito comune c'e' un ocx o una dll per farlo o anche con google trovi 
parecchie cose free.
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

Newsgroup: it.comp.lang.visual-basic
Titolo: Immagini su Mdb o a se stanti ?!

 
Ciao,
ho letto sul mewsgroup che e' caldamente sconsigliato inserire
immagini su un mdb (causa il rallentamento dell'applicazione...),
quindi mettere il path sul campo e poi caricare l'immagine dal file
grafico stesso....
Ora (tentando di realizzare un cd multimediale ...) mi chiedo se e'
possibile fare in modo che le immagini non vengano distribuite cosi'
liberamente; in pratica il mio mdb protetto da pwd mi tornava utile
per proteggere un pochino anche il mio lavoro.....
Allora che faccio, carico le immagini in un form "immagini" (non sono
poche)..., Ho sentito parlare di file risorse.... 1' non saprei come
crearlo ( mi potrei documentare su qualche sito ...) e poi sopperisce
al mio problema ...
accetto consigli da chi ha gia' fatto esperienza 
Grazie in anticipo.
Ciao
Primo.

 accetto consigli da chi ha gia' fatto esperienza 
Un file di risorse puo' essere letto da chiunque (chiunque sappia cos'e' osia tutti i programmatori).
Non so dirti altro...
-- 
Hi, Ciao
Ettore                 By -MES-
http://freeweb.aspide.it/freeweb/ilmes
Il sito comune di programmatori VB
http://members.xoom.com/it_lang_vb
Newsgroup: it.comp.lang.visual-basic
Titolo: Finestre in primo piano

Salve!
Sono un giovanissimo e poco esperto sperimentatore di vb....
Ho realizzato una piccola utility ma mi sono scontrato con la necessità di
rendere un form sempre in primo piano.
Ho vb6....c'è la possibilità di visualizzare un form (non una msgbox)
"always on top"??
E ancora....si può creare un 'icona nella tray di win98 a fianco
dell'orologio????
Ringrazio enormemente coloro che avranno la pazienza di rispondermi!!!!
Magai alla mia e-mail: 
jac...@libero.it
Salve!
Giacomo Lorenzelli

Giacomo Lorenzelli
Ciao,
    Aldo

Newsgroup: it.comp.lang.visual-basic
Titolo: Devo reinstallare ?

Ho rivisto parte del programma aggiungendo un grafico (mschart) e alcune
azioni svolte da Scripting.FileSystemObject, per cui i componenti aggiunti
al Progetto sono:
MSCHART20.OCX
MSCONMTL.OCX
Domanda:
E' possibile copiare come tali questi controlli nel PC che ha in uso il file
EXE del programma senza
creare una nuova installazione del programma stesso oppure mancherà
qualcosa?
Grazie
--
Gulp ! Forse mi sono perso qualcosa !
Per rispondere via E-mail togli la x da 
xd...@cyberjunkie.com

 qualcosa?
Si però devi registrarli, eseguendo regsvr32 "path e nome del file"
Se l'ocx la metti in un path basta il nome del file.
Ciao

 ha scritto:
Grazie.
Scusami se cambio Oggetto del post (forse non è il massimo della
netiquette): file.gif
Ho notato ( o forse mi sbaglio?) che se non sono presenti nella dir del
programma (AppPath) i file gif animati utilizzati in fase di progettazione,
non vengono visualizzati,mentre altri file immagine possono non essere
presenti.... questi ultimi, e solo questi vengono inglobati nell' EXE ?
Utilizzando AppPath sostituisco tutta (nome del file compreso)oppure una
parte di questa stringa?: "C:\CartellaMioProgramma\nomefile.* "
Grazie Millllle.


 parte di questa stringa?: "C:\CartellaMioProgramma\nomefile.* "
App.path restituisce il percorso in cui č posizionato l'eseguibile o il file
del progetto aperto al momento se stai eseguendo un programma dal'IDE di Vb.
Se apri l'ide di Vb e successivamente un progetto da questo, App.Path
restituisce il percorso di installazione di Vb.
Occhio perchč App.path, per essere usabile in tutte le situazioni va
trattato, in quanto in alcuni casi termina con la barra "\" in altri no
(quando ti trovi in radice)
Se ti interessa il nome dell'eseguibile c'č App.ExeName, poi c'č App.Title
per il nome del progetto, comunque se attivi l'elenco membri automatico e
sull'ide scrivi "App." ti compare la lista, cosě puoi sfogliartela  e
guardarci con calma.
Newsgroup: it.comp.lang.visual-basic
Titolo: Indicizzare un campo

Non riesco ad indicizzare un campo con duplicati ammessi .
Usando CreateDatabase...ecc..
TableDef......(....... Unique...ecc..ecc..)
Così facendo creo solo campi indicizzati ma con duplicati non ammessi.
E' chiaro che sono sulla strada sbagliata. Qual'è quella giusta?
Grazie
Roberto

james ha scritto:

Unique Falso.

 Ok Lupo, ma non è così semplice, Unique non è settabile.
Purtroppo bisogna aggiungere per forza una riga con CreateIndex  ecc.. ecc..
Grazie ugualmente

 Grazie ugualmente
Beh, son perplesso: Unique è la proprietà di una chiave di un indice. Certo
che devi aggiungere un indice.
In altro caso non ho capito.

Newsgroup: it.comp.lang.visual-basic
Titolo: Regolazione del volume

Salve Ragazzi!!!
Come si regola il volume di registrazione e quello di riproduzione in Vb6?
Grazie
Marco

Come si regola il volume di registrazione e quello di riproduzione in Vb6?
come spiegato in un esempio sul Sito Comune...
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

Newsgroup: it.comp.lang.visual-basic
Titolo: PACCHETTO DI INSTALLAZIONE PERSONALIZZATO

Ciao a tutti!!!
Sto creando un pacchetto di installazione che crea il file Cab, cioè un
pacchetto da distribuire tramite CD-Rom.
Il programma che ho creato usa una directory fissa.
Una volta creato il pacchetto, vado a far partire l'installazione e la
directory è settata giustamente, ma il fatto è che
in parte alla path c'è il pulsante sfoglia e l'utente può cambiare la
directory di installazione..
Come posso fare per togliere quel pulsante...
Spero che qualcuno sappia rispondermi..
Ciao e grazie a tutti!!!
Igor

 in parte alla path c'č il pulsante sfoglia e l'utente puň cambiare la



Oppure, nel tuo programma, fai riferimento App.Path invece che ad un
path assoluto. App.Path ti restituisce il path reale in cui è stata
effettuata l'installazione del tuo programma.
--
 
federic...@planet.it
Eliminare NOSPAM dall'indirizzo! Delete NOSPAM from address!

 Ciao
Wow, come fai a saperlo?
Si puo' fare altro?
Ciao
Marco Rossi

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

Come si gestisce una porta parallela e seriale.
Il vecchio Qbasic aveva i comandi "OUT", "OPEN COM".
Invece VB6?
Grazie.

> Come si gestisce una porta parallela e seriale.
Per la porta parallela guarda sul sito comune che c'è una DLL per la
gestione delle porte hardware
Per la porta seriale c'è il componente MSComm
Ciao
Sirjo
Newsgroup: it.comp.lang.visual-basic
Titolo: Bug Controllo ActiveX UpDown

Non so se scopro l'acqua calda oppure se la mia copia di VB5 è mal
configurata, ma il controllo ActiveX UpDown, una volta impostati i valori
Min=3, Max=21, Increment=2 e Value=3 dopo il primo click sulla freccetta in
alto invece di restituirmi il valore "5" mi sputa fuori un bel "6". E' un
problema del controllo UpDown o mio?
Grazie a chiunque vorrà chiarirmi questa faccenda.
______________________________
Andrea Varavallo
avara...@spamaversa.peoples.it

...


in grappini che si fanno quando vanno a lavorare.
Ho dovuto berlo anch'io qualche grappino per trovare il fastidiosissimo bug
che attanagliava la mia applicazione.
Ciao!



Newsgroup: it.comp.lang.visual-basic
Titolo: Back con VB

Come faccio a fare la funzione back in vb?
Grazie Jannu

> Come faccio a fare la funzione back in vb?
Public Function Back ( _
    Not Optional SpiegatiMeglio As Boolean = AlwaysTrueIfYouWantResponse) As
Boolean
    Back = RepostQuestion (Clearer)
End Function
Faber
Newsgroup: it.comp.lang.visual-basic
Titolo: BarCode "code39"...

Ho la necessita' di stampare dei dati di spedizione (cod.prodotto,
quantita', ecc.)
su cartellini da applicare ai colli. Tutti questi dati devono essere
rappresentati
non solo in forma alfanumerica ma anche con codici a barre (code39).
Ho risolto utilizzando dei font che utilizzo nella mia procedura VB.
Il problema e' che nel mio cod. prodotto sono presenti degli spazi!
Una volta stampato il codice a barre ho provato a leggerlo con una
pistola laser senza ottenere risultati :(((
Se elimino gli spazi oppure sostituisco con un "-" tutto funziona
egregiamente!
Dalla documentazione in mio possesso risulta che il code39 permetta di
rappresentare
tutti i numeri da 0-9, le lettere maiuscole dalla A-Z, i caratteri -+.$/% e
anche lo spazio!
La mia domanda e':
perche' un codice in cui sono presenti degli spazi non viene letto?
un grazie a chiunque potra' darmi informazioni
----------------------------------------------------------
Massimo De Lisio
e-mail 
ced...@interbusiness.it
----------------------------------------------------------

Sul sito comune ci sono dei validi esempi per la riproduzione
del codice a barre.
Se cerchi poi su internet, trovi anche l'algoritmo per il codice
ean 39 ... quindi da li poi ti puoi fare il tuo codice.
Se poi, invece, vuoi comprare qualcosa di bello e pronto ti
consiglio il mabry bar code ... che racchiude una 10ina -
se non ricordo male - di tipi di codice a barre che puoi utilizzare
semplicemente impostando il barcode style e la text con il
codice numero che vuoi rappresentare.
Ciao Andrea

 ha scritto nel messaggio
news:a746t7$i9sbi$1...@ID-61006.news.dfncis.de...


 un grazie a chiunque potra' darmi informazioni
Spero di esserti stato utile, prova a vedere se riesci a stampare su
un'altra stampante ( su HP io non ho avuto problemi). Se il problema
persiste, prova ad agire sui driver della stampante......se non riesci
nemmeno così credo ti rimanga solo Lourdes!
Ciao e buon lavoro.
Giovanni


Newsgroup: it.comp.lang.visual-basic
Titolo: MS Chart

Salve ho creato un grafico con MS Chart, ma non so come poterlo riportare su
Carta (Stamparlo!!!). Potete darmi un consiglio su come fare!!!
Ciao e Grazie
Ivan

 Carta (Stamparlo!!!). Potete darmi un consiglio su come fare!!!
Clipboard.Clear
MSChart1.EditCopy
     'disegna rettangolo di contorno
     Printer.Print ""
     Printer.Line (480, 480)-(Printer.Width - 960, 480)
     Printer.Line (Printer.Width - 960, 480)-(Printer.Width - 960, 
Printer.Height - 960)
     Printer.Line (Printer.Width - 960, Printer.Height - 960)-(480, 
Printer.Height - 960)
     Printer.Line (480, Printer.Height - 960)-(480, 480)
     Printer.PaintPicture Clipboard.GetData(metafile), 900, 900, 
Printer.Width - 2100, Printer.Height - Printer.Height / Printer.Width * 
2100          'vbCFMetafile
Printer.EndDoc
metafile puo' essere:
-vbCFMetafile 
a me pero' ha sempre dato problemi perche' taglia i bordi delle parti 
del grafico
-se ometti metafile stampa correttamente ma con una definizione pessima.
Hoi cercato parecchio una soluzione ma non l'ho trovata ... :-(
ciao
		maxx
Newsgroup: it.comp.lang.visual-basic
Titolo: da VB5 aprire access97 protetto da pswd

 [.MDW].
Federico mi ha  risposto:
Prova cosi':
    Dim wrk As Workspace
    Dim dbs As Database
    Dim rst As Recorset
    DBEngine.SystemDB = "file.mdw"
    Set wrk = DBEngine.CreateWorkspace("pippo", "utente", "pwd",
dbUseJet)
    Set dbs = wrk.OpenDatabase("file.mdb", False, False)
    Set rst = dbs.OpenRecordset("tabella", dbOpenDynaset)
Ho provato questo codice, ottenendo il seguente messaggio di errore:
Run-time error '3028':  Can't start your application. The workgroup
information file is missing or opened exclusively by another user.
leonello

se è il db ad avere impostata la password (ossia non si tratta di una
autorizzazione utente) apri il db con la stringa:
set db=opendatabase("path\nomedb.mdb",false,false,";pwd=latuapwd")
ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: How can I call the "dial-up network"?

How can I call the "dial-up network" of my internet connection from
VB5? and how can i start the dial and stop the connection from the
VB5?
Thanks
Please reply also by e-mail.

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Controllo per Gif Animate su VB 5.0

Scusate se la domanda è già stata posta e se l'argomento è già stato
trattato.
Avrei bisogno di sapere se esiste e come reperire un controllo per inserire
in un form una gif animata.
Grazie per le risposte

 ha scritto nel messaggio
news:uC5R6.12447$HK.6...@news.infostrada.it...

Si esiste,
Non ricordo da dove l'ho scricato se vuoi te lo mando.
Ciao.

 ha scritto nel messaggio
news:9f4shd$91t$1...@fe1.cs.interbusiness.it...


 Ciao
sě č lo stesso.
ciao.

 animante create con "Animation Shop 3".

Newsgroup: it.comp.lang.visual-basic
Titolo: Pulsante "Start" (.. ci riprovo)

E' possibile disabilitare il pulsante "Start" (Avvio) con un apposito
comando VB, avendo comunque la barra delle applicazioni attiva ?
                                            Grazie  Marco


Hai gia' visto l'esempio sul sito comune, basta che lo modifichi usando la
funzione API:
BOOL EnableWindow(
    HWND hWnd, // handle to window
    BOOL bEnable  // flag for enabling or disabling input
   );
Parameters
hWnd
Identifies the window to be enabled or disabled.
bEnable
Specifies whether to enable or disable the window. If this parameter is
TRUE, the window is enabled. If the parameter is FALSE, the window is
disabled.
--
Roal Zanazzi
z...@iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Istanziare uno "user control" via codice

Ho un controllo ocx che devo utilizzare istanziandone una quantità
variabile.
Aggiungendo il controllo con il drag & drop tutto ok ma via codice come
posso fare??
grazie Martino

 ha scritto nel messaggio
news:9ocml7$7h7$1...@fe1.cs.interbusiness.it...

Come per i controlli normali: usando un array di controlli oppure tramite
Controls.Add.
Se ne parla sempre molto, prova a guardare i vecchi messaggi, per esempio il
thread
"Controllo on fly"
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett Brown

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

Ciao a tutti.
Vorrei sapere, con Crystal Report di VB 4, che cosa c'entra il file
CRPE.DLL. Cosa cambia se stampo con una formula di selezione piuttosto
che creare appositamente per la stampa una tabella (access x esempio)
alla quale allacciare un report (cosa che comunque faccio anche con
le formule di selezione, o no?).
Grazie a tutti per le risposte.
Gianfranco
La...@usa.net

 scritto nell'articolo
<01bceaec$5f03d780$cc7b78c3@jeff>...


Il punto non e' l'utilizzo o meno delle
formule, possibilita' che tra l'altro
ti e' offerta anche dal controllo.
 Con CRPE.DLL puo' fare molte piu' cose
 che non con le sole proprieta' del
 controllo, oltre al fatto che gestisci
 il tutto da codice ( io lo preferisco )
 gestione errori compresa.
 Comunque un classico esempio e'
 che con il controllo sei obbligato
 ad avere DATI e REPORT nella stessa
 directory ( se installi l'applicativo
 su un PC diverso da quello di
 sviluppo ) mentre con CRPE.DLL
 puoi variare il percorso dei DATI,
 subito prima di eseguire il report,
 tramite una funzione di libreria.
 Forse l'utilizzo della libreria
 e' meno agevole rispetto al
 controllo pero' , come accade
 sempre in queste occasioni,
 e' decisamente piu' flessibile.
 Ciao,   fabrizio.
-------


Vorrei rispondere a Fabrizio e Ivano che sono stati cosě gentili.
E' possibile avere un esempio anche piccolo dei due metodi di stampa
(CRPE.DLL e formule)
per favore ? 
Grazie ancora
Gianfranco
La...@usa.net

 Scusa il ritardo ma ho rotto il PC e sono rimasto
 una settimana fermo.
 Appena mi riorganizzo ( HD nuovo ) ti mando
 il codice che hai chiesto.
 Ciao,   fabrizio.
-------

Newsgroup: it.comp.lang.visual-basic
Titolo: Generatore automatico di nomi

Buongiorno a tutti,
ho la necessità di generare una sequenza di stringhe composte da un nome 
proprio seguito da un numero:
Pietro123
Anna42
Giovanni 2345
e via così
L'insieme Nome+numero dovrebbe essere univoco.
Chiaramente la cosa è fattibile avendo un DB con dei nomi propri  a cui 
associare l'ultimo numero utilizzato per il nome
ed estraendo a caso un nome ..
Quindi come prima cosa dovrei trovare un DB con nomi propri (magari 
internazionali) e poi dovrei trovare un modo di
decidere quale usare (ma questo è più facile eventualmente con un RND)
A proposito di RND... Qualcuno ha un metodo (o un modulo già fatto)  per 
generare numeri VERAMENTE casuali?
Ho visto passare non molto tempo fà un post ma non mi ricordo bene
Troppe cose per la testa e troppo pochi neuroni per ognuna ;-((
Non è che per caso qualcuno mi può dare una mano?
Grazie 1000
Tullio1248

 generare numeri VERAMENTE casuali?
Per evitare la ripetizione di numeri pseudo-random, prima di chiamare la 
Rnd, devi inizializzare il seme con Randomize.
Qui, ti spiega il perchè:
INFO: How Visual Basic Generates Pseudo-Random Numbers for the RND 
Function
http://support.microsoft.com/kb/231847/en-us/
Saluti
-- 
Gianluca Cannalire
Microsoft MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca
 

 ha scritto nel messaggio 
news:g2fvgp$2kr$1...@tdi.cu.mi.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Somma di ore

Ho un problema nello scrivere del codice che possa calcolare la somma di
una serie di ore in quanto arrivando alle 24 ore il conteggio riparte da
zero e non prosegue indicando 25,26,27...
Come posso fare?
Grazie a chiunque possa darmi una mano!!!!
Ciao
Ivan
---------------------------------------------------------------------------
Messaggio inviato attraverso 
http://www.trucchiperpc.it
 - sezione newsgroup

 Grazie a chiunque possa darmi una mano!!!!
F1 + datediff

 Come posso fare?
Le ore ripartono da zero, ma il giorno spero che cambi!
Quindi basta un
SommaOre / 24
(dove SommaOre è As Date)
Ciao

 SommaOre / 24
Scusa,
 SommaOre * 24
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: [sito comune] A che punto siamo? (lunghetto, se riesco a scrivere tutto quello che ho in mente)

Salve a tutti.
Incomincio ad avere le idee alquanto cunfuse in merito allo stato del sito
comune.
In questo momento, se non sbaglio, sarebbe in corso la discussione per la
redazione del nuovo statuto del sito comune. Il "se non sbaglio" deriva dal
fatto che lupo avrebbe proposto di azzerare il tutto, perchè la la
discusione "plenaria" non dà frutti, o perlomeno non sembra produrre un
risultato prima del pensionamento del figlio di Paperino, e di istituire una
apposita commissione. La proposta, nella sua prima formulazione, sarebbe
questa:
<citazione dal post di Lupo>
-Si candidino tutti coloro che vogliono partecipare alla "Commissione
Costituente del nuovo SC di ICLVB"
-Si metta poi un topic di votazioni aperto a tutto il NG e si scelgano 3
(no, non uno di più!) nick ai quali verrà dato il mandato temporaneo (max un
paio di mesi) di riscrivere tutta la documentazione formale del SC quindi
Statuto e Regolamento e persino Manifesto del NG.
-Costoro comunicheranno liberamente, anche e solo privatamente, con gli
strumenti a loro scelta.
-Alla scadenza verrà pubblicato tutto il materiale sul NG e sul Forum
-Si aprirà un periodo di max un mese per le proposte da parte di chicchessia
degli eventuali emendamenti
-La Commissione deciderà, sempre liberamente e autonomamente, se e come
modificare la documentazione tutta. E' libera di recepire ogni emendamento,
alcuni o nessuno.
-Si vota la documentazione emendata. Se passa, la Commissione si scioglie e
si adottano i nuovi documenti. Se non passa, si ripete tutto dall'inizio.
Sì, dall'inizio e a oltranza.
<fine citazione>
Ci sarebbero in corso le elezioni del nuovo webmaster del sito comune, in
quanto il precedente ha rassegnato le dimissioni. Attualmente si stanno
raccogliendo le candidature, il post dovrebbe essere questo:
http://makeashorterlink.com/?Z32512405
Piccolo appunto, che spero non suoni troppo polemico. Bazzicando il forum
del sito comune (per chi non lo conoscesse si trova a
http://www.it-lang-vb.net/forum
 ) ho visto che è in corso un intenso lavorio
su un progetto comune. Il progetto in sè è interessante, e il fatto che ci
stiano lavorando più persone è sicuramente una bella cosa, però c'è un
dettaglio che mi lascia perplesso: se il wm ha dato le dimissioni, chi è che
sta facendo gli upload dei file sul sito?
Lo so, è una domanda retorica, ma non sapevo in quale altro modo introdurre
l'argomento, che tradotto in soldoni è: perchè l'attuale wm continua a fare
il wm, pur avendo dato le dimissioni? La soluzione, imho, sarebbe quella che
ritirasse le dimissioni, anche perchè, come ho già detto, il progetto che
stanno portando avanti è una bella cosa.
Se qualcuno ha la possibilità di chiarire i miei dubbi lo ringrazio molto
fin da ora.
Salutoni
Sergio

[*CSSoft* : 
news...@cssoft2001.com
] ha scritto:
...
Voto la prima parte ;-)
Mi associo ai dubbi sulla seconda (essůdai, Zanna!)
Ho qualche perplessitŕ sul "progetto comune". Quale sarebbe?
Di mio aspetto ancora la creazione di un campo sul database e/o notizie su
TableEditor.