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

Ho Visual Basic 5.0 ; ho scritto un programma che gestisce il D.B. Access
2000 ;
quando lo eseguo sulla mia macchina tutto è Ok ; ho esportato il programma
con l'Autocomposizione Installazione su un altro computer ma  in questo caso
all'avvio del programma appare l'errore 'Il componente ActiveX non è in
grado di creare l'oggetto (errore 429)'.
Ho appurato che l'errore avviene alla 'OpenDataBase'.
Quando in passato ho fatto tutto ciò con 'Access 97' non ci sono mai stati
problemi.
Forse una o più DLL non vengono scaricate con l'Autocomposizione
Installazione ?
Se si quale sarà ?
Ringrazio di cuore
Luciano

 ha scritto nel messaggio
news:QwjV6.18916$a44.2...@news1.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: ! MsgBox con icone !, ? , X etc , HELP!

Salve,
Qualcuno sa dirmi come inserire nei MsgBox le icone (come in Alert del
VbScript) di punto esclamativo, croce, errore, imprevisto etc etc....?
Grazie,
Tommy

...


Grazie,
Devi dare un'occhiata nell'help alla voce "Funzione MsgBox", comunque, per fare
quelli che hai chiesto, devi utilizzare uno dei seguenti valori per l'argomento
"buttons".
VbCritical			16		Visualizza l'icona di messaggio critico. 
VbQuestion		32		Visualizza l'icona di richiesta di avviso.
VbExclamation	48		Visualizza l'icona di messaggio di avviso.
VbInformation	64		Visualizza l'icona di messaggio di informazione.
~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~
Gabriele Bertolucci - NT4WKSITA+SP3 - VB5PROITA+SP3
pbe...@vi.ats.it
pbe...@freemail.it
 (alias)
pbe...@bigfoot.com
 (alias)
http://members.spree.com/sip/pberto/
http://userspace.ats.it/free/pberto/
 (alias)
http://www.fortunecity.com/skyscraper/spiff/523/
 (alias)
http://www.bigfoot.com/~pberto/
 (alias)
ICQ #: 9732192
~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~

Newsgroup: it.comp.lang.visual-basic
Titolo: Non trovo dbgrid

Scusate sono nuovo.
Non riesco ad inserire una dbgrid nel mio form.
Qualcuno puň aiutarmi?
Grazie
    Marco

dal menu Progetto > componenti > selezionare Microsoft Data Bound Grid
Control
ciao

 wrote


Newsgroup: it.comp.lang.visual-basic
Titolo: ricerca di un record

Possego un file Access sul quale devo fare delle ricerche tramite i classici
Find first, last, next ecc.
Il problema è che tale file possiede dei campi che iniziano e finiscono con
"@ " e vb mi da un messaggio di errore 3077.
Come posso risolvere questo problema?
Attenzione le strutture dei file non possono essere assolutamente
modificate.
Grazie
Marco G. 
icv...@box1.tin.it

...


...

Newsgroup: it.comp.lang.visual-basic
Titolo: Come fare una copia di un oggetto?

Volendo copiare un "oggetto" ho provato il seguente codice:
Public Class Class1
    Public Valore1 As String
    Private Valore2 As Integer
    Public Sub New(ByVal Val As Integer)
        Valore2 = Val
    End Sub
    Public ReadOnly Property valoreNumerico() As Integer
        Get
            valoreNumerico = Valore2
        End Get
    End Property
End Class
Module Module1
    Sub Main()
        Dim oggettoOriginale As New Class1(1)
        oggettoOriginale.Valore1 = "CLASSE ORIGINALE"
        Dim oggettoCopia As New Class1(2)
        oggettoCopia = oggettoOriginale
        oggettoCopia.Valore1 = "CLASSE COPIATA"
        Console.WriteLine(oggettoOriginale.Valore1)
        Console.WriteLine(oggettoOriginale.valoreNumerico)
        Console.WriteLine(oggettoCopia.Valore1)
        Console.WriteLine(oggettoCopia.valoreNumerico)
    End Sub
End Module
Ho ottenuto il seguente risultato:
CLASSE COPIATA
1
CLASSE COPIATA
1
Credo che l'oggetto creato con:
Dim oggettoCopia As New Class1
venga distrutto da:
oggettoCopia = oggettoOriginale
e a "oggettoCopia" viene asseganto lo stesso indirizzo di
"oggettoOriginale".
E' vero?
E se voglio fare una copia dell'oggetto originale invece che puntare allo
stesso oggetto come devo fare?
Grazie
Marco R. 

 ha scritto nel messaggio 
news:45dc1138$0$20801$5fc...@news.tiscali.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Generazione Errori

Probabilmente l'argomento è già stato trattato però se così è me lo sono
perso!!
Sto realizzando un OCX in VB6 SP3 .La mia domanda è : si possono generare
errori personalizzati dall'OCX che possano venire intercettati tramite la
dicitura "On Error ..." in un programma che contiene l'OCX stesso???
Grazie

err.raise (i parametri guardali sull'help)
Ciao Mau

usando l'oggetto Errore con raise puoi generare qualsiasi tipo di errore
personalizzato usa un numero compreso fra vbObjectError + 513 e 65535 (mi
pare), e assegnagli tutte le varie opzioni....quando l'errore verrà generato
dal componente (compilato altrimenti l'esecuzione và a finere nel codice che
lo ha generato, però forse on error funzia) puoi usare On Error ecc... .
---------
Ciao
Sabba

 wrote in message
JHEP4.79906$xt2.9...@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: istanze di una Form

E' possibile aprire istanze diverse di una Form.
Es.. Form1.Show apre la Form1, se rifaccio Form1.Show viene sovrascritta la 
prima istanza di Form, invece voglio che siano entrambe visibili.
Grazie,
 Andrea 

 prima istanza di Form, invece voglio che siano entrambe visibili.
Se stai parlando di VB 2005, basta che crei una nuova istanza della tua 
form:
         Dim myForm As New Form1
         myForm.Show()
In VB6 non so.
-- 
news:it-alt.comp.software.openoffice : Il newsgroup dedicato a
OpenOffice.org, la suite open source di applicazioni per ufficio.
Saluti, VITRIOL

 ha scritto nel messaggio 
news:5i2omlF...@mid.individual.net...



Chissà cos'hai scritto :)
         Dim myForm As Form1
         Set myForm = New Form1
         myForm.Show()
Ciao

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

Sapreste consigliarmi dove trovare un ocx free che abbia le stesse funzioni
del dtp (datatimepicker) ma che possa essere"imbiancato"?
Si accettano suggerimenti anche su come ovviare a tale problema utilizzando
lo stesso controllo MS ...
Grazie
Andrea

Cosa intendi per imbiancato ?
:-)
--
~~~ MrOnederfull ~~~
mroned...@hotmail.com
http://www.mronederfull.com
 (coming soon!)
Newsgroup: it.comp.lang.visual-basic
Titolo: Sapere quando sono effettivamente in Internet

Ciao a tutti! Sono risucito a richiamare la connessione di Accesso Remoto;
riesco a controllare la partenza della connessione, ovvero sò quando la
connessione diventa attiva, ma come faccio a sapere quando si è veramente
connessa ad internet? Ho tentato parecchie volte e ho letto sul NG che sono
in internet quando il mio IP è diverso da 127............, ma come faccio a
scoprire il mio IP? Oppure esiste un'altra strada?
Grazie e ancora ciao

 wrote in message
news:8hfiia$4hd$1...@fe2.cs.interbusiness.it...

Ti dispiacerebbe dirmi come hai fatto tutte queste belle cose?
Ovvero
a) Richiamare la connessione di Accesso Remoto
b) Controllare la partenza della connessione
c) Sapere quando è attiva
            Grazie in anticipo
Danilo

scoprire il mio IP? Oppure esiste un'altra strada?
Esiste un'altra strada: dai un'occhiata sul mio sito.
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

c) Sapere quando è attiva
Dai un'occhiata sul mio sito.


Ho copiato un pezzo del tuo codice, ma mi da l'errore : variabile non
definita all'inizio: HKEY_LOCAL_MACHINE
'Definisco le variabili
Dim handle As Long, lpData As Long
Dim Connesso As Boolean
Dim lngRet As Long
Connesso = False
lngRet = RegOpenKey(HKEY_LOCAL_MACHINE,
"System\CurrentControlSet\Services\RemoteAccess", handle)
If ret = ERROR_SUCCESS Then
 lngRet = RegQueryValueEx(handle, "Remote Connection", vbNull, vbNull,
lpData, Len(lpData))
 If ret = ERROR_SUCCESS Then
  If lpData = 0 Then
          Connesso = False
         Else
          Connesso = True
         End If
 End If
End If
RegCloseKey (handle)

 "System\CurrentControlSet\Services\RemoteAccess", handle)
in
lngRet = RegOpenKey("HKEY_LOCAL_MACHINE",
"System\CurrentControlSet\Services\RemoteAccess", handle)
Ciao
	  :-) Hd (-:
-^- Verso l'infinito e oltre -^-

definita all'inizio: HKEY_LOCAL_MACHINE
Perché semplicemente non l'hai dichiarata...
Public Const HKEY_LOCAL_MACHINE = &H80000002


Tutto questo se sono in locale. (credo)
Se sono in rete con un Server connesso su cui e' installato un proxy come
faccio ad accorgermene?
Ciao
 Kjo

Grazie di tutto!!!!!!!

Usa questa:
Public Declare Function InternetGetConnectedState Lib "wininet.dll" (ByRef
lpdwFlags As Long, ByVal dwReserved As Long) As Long
MsgBox InternetGetConnectedState(0&, 0&)
PS
Cerca nell'MSDN "Establishing a Dial-Up Connection to the Internet"
--------
Ciao
Sabba

 wrote in message
news:Km9%4.114995$VM3.8...@news.infostrada.it...


Straprego...
----------
Ciao
Sabba

Newsgroup: it.comp.lang.visual-basic
Titolo: Scansione hard disk


Newsgroup: it.comp.lang.visual-basic
Titolo: Dove posso trovare source code su oroscopo o temi astrali

Ciao A tutti del NG
Qualcuno mi puo' aiutare (vedi oggetto)
Ciao e grazie
in...@elettronicsystem.com
ICQ N.: 27427846

 tanto qualcuno che ci crede lo trovi.
ahahahahah
questa me la segno
--
Fibia "Sakamoto" FBI
E-mail: 
fibi...@hotmail.com
ICQ UIN 63586057
Sito Personale: 
http://www.geocities.com/fibiafbi
VB Simple: 
http://vbsimple.virtualave.net
Membro #25 delle Mitiche Brigate Takahashi sezione Sud

 Qualcuno mi puo' aiutare (vedi oggetto)
I casi sono 2:
1) ci credi, allora conviene di più affidarsi a qualcuno specializzato in
merito: 
http://www.armonics.net/servint/index.html
2) Non ci credi: Fai un programma basato solo sulla funzione RND, tanto
qualcuno che ci crede lo trovi.
Fare un lavoro serio in quel campo è un casino. Devi calcolarti la posizione
dei pianeti e delle stelle in base all'ora e a latitudine e longitudine in
cui ti trovavi al momento della nascita. E' talmente complicato e difficile
da debuggare, che anche se trovassi qualcosa di gratuito, come fai a
fidarti?
E poi parlare di "lavoro serio sull'astrologia", è una contraddizione in
termini.
Parere personale, eh?
*Roby*

 ha scritto nel messaggio
news:98r4ip$41h$1...@pegasus.tiscalinet.it...


 Ciao
chiedendo ad altavista

Newsgroup: it.comp.lang.visual-basic
Titolo: Riconoscere fusi orari

Ciaooooooo ragazzuli quanto tempo che non scrivo... [se vi raccontassi
tutto quello che è successo ci metterei una vita]
Vado subito al sodo
Il lavoro che sto cercando di fare è relativo a degli orari da
controllare.
Da un file txt importo tutto dentro una tabella ma prima di passarli
alla tabella faccio uso di array bidimensionali e fin qui non ho nessun
problema.
I dati in questione sono degli schedulati ossia orari di partenza e di
arrivo ed io tramite questi dati devo far si che il programma mi calcoli
il servizio notturno del dipendente ( per legge il serv.notturno va
dalla 22 alle 8).
Questi orari però sono soggetti a fusi orari e ho un pò di problemi
perchè il fuso non è sempre lo stesso ( il calcolo andrebbe fatto con il
fuso italiano)
Vi faccio un esempio:
GG = Giorno
PAR = Orario di Partenza
ARR = Orario di Arrivo
DA = Città di partenza
A = Città di destinazione
HV = Ore di viaggio
  GG     |PART  | ARR |  DA  | A |  HV
01/04/05  13.50  17.50  ROMA  NYC  10.00
Normalemente il fuso di New York è -6 ore ma se lo calcolo oggi è -7
perchè li ancora non hanno cambiato fuso.
C'è una qualche funzione che mi aiuti a risolvere questo problemino?
Ne approfitto anche per chiedervi un altra cosa. Avete visto il dato
nella colonna giorni? Esite una funzione che me lo faccia apparire con
il giorno della settimana tipo 01VE (sta per venerdi)
Un bacio a tutti quelli che in passato mi hanno aiutato
Debby
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 tutto quello che è successo ci metterei una vita]
Ciao Debby , belloccia
Grüße von Yenkee_dudu

 il giorno della settimana tipo 01VE (sta per venerdi)
Puoi ottenerlo con Format(Giorno, "dd") & UCase(Left(Format(Giorno,
"ddd"), 2))
Bye
Raf
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 "ddd"), 2))
Grazie Raf sei stato un angelo a rispondermi


"Debby"
nel registro (star esegui regedit) hai tutti i fusi
HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Time Zones
--
Fosco

 Debby
Non c'è di che!
Bye
Raf

Newsgroup: it.comp.lang.visual-basic
Titolo: DATABASE con Visual BAsic.

Ciao a tutti.
La domanda sembrerà stupida, ma spero di trovare qualcuno tanto gentile da
rispondere:
Sono un programmatore rimasto "fermo" per qualche  anno.
Programmavo in C, Basic e soprattutto Clipper, per la facilità con la quale
quest'ultimo gestiva i database.
Ora vorrei passare a qualcosa di nuovo quale Visual Basic o Visual FoxPro.
Qualcuno saprebbe indicarmi un manuale o un tutorial in rete che possa
mostrare in modo semplice le possibilità offerte da Visual Basic di gestire
Basi Dati.
Grazie
Lu...@usa.net

 wrote in message
_0xt3.3732$98.4...@typhoon.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Word XP: capire se una casella di testo è selezionata.

salve,
vorrei sapere come posso fare a rilevare quale casella di testo (ce ne posso
essere x) già disegnata nel documento attivo è selezionata (cioè quando il
cursore è all'interno della casella oppure se l'abbiamo cliccata sul bordo),
il tutto da un modulo che sta nel file normal.dot
ci ho provato ma non ho notato proprietà relative, per cui mi serve proprio
un aiuto!
grazie
--------------------------------
Inviato via 
http://usenet.libero.it


ho fatto un passo in avanti riuscendo a capire quando una casella di testo
(cioè una shape) è selezionata, così:
Selection.Type = wdSelectionShape 'se true è selezionata
a questo punto mi manca di sapere *qual'è* la casella selezionata!!
sempre grazie


Newsgroup: it.comp.lang.visual-basic
Titolo: windows xp tablet e vb6

Salve a tutti,
a breve dovro' scrivere un piccolo software per windows xp tablet edition e 
mi domandavo se ci fossero problemi con vb6... avete esperienze in merito? 
Per il pannello touch se non ricordo male � totalmente trasparente... nel 
senso che � come se l'utente cliccasse col mouse giusto?
grazie 1000
A. 

 ha scritto nel messaggio 
news:4bf5...@news.x-privat.org...

ricordo benissimo che circa 3 anni fa feci un programma la cui interfaccia 
utente aveva l'aspetto di un telefonino(lo scopo era di selezionare con il 
mouse un codice cliccando sulla testiera software sullo schermo ed appariva 
una foto...ecc ecc.)
 Utilizzando il programma su un pc che avera come monitor un touch screen 
tutto funzionava correttamente utilizzando come input il dito della mano per 
digitare sullo  schermo direttamente il codice...
ma che tu cosa intendi per "windows xp tablet edition" perche
io vorrei utilizzare la wacomm bamboo touch & pen tablet
(costo circa 80 Euro) per fare una applicazione in VB6 per persone con 
handicap
leonello34

 ha scritto nel messaggio 
news:g4OJn.182430$813.1...@tornado.fastwebnet.it...

io devo fare una semplice interfaccia ad un db che girer� su un pc tablet... 
guardando le caratteristiche del tablet mi riporta che ha installata questa 
versione di xp... altro purtroppo non ti so dire... cmq non utilizza alcuna 
tavoletta... � una sorta di ipad con monitor touch
A.
Newsgroup: it.comp.lang.visual-basic
Titolo: Disabilitare una scheda di un TabStrip

Ciao,
Come faccio a disabilitare ( rendere cioe' non clikkabile, ma
visibile) una scheda di un controllo TabStrip?
Grazie
Giacomo

 ha scritto nel messaggio
news:39d7955a...@news.tiscalinet.it...

non puoi, al massimo puoi disabilitare i controlli "contenuti";
ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Impostazione stampante

Salve a tutti volevo sapere come potevo fare tramite codice ad
impostare una stampante invece che un'altra.
Mi spiego meglio, ho un programma che ho fatto io in VB che stampa
sulla stampante predefinita, ora ho una seconda stampante ogni tanto
mi sbaglio e stampo sulla seconda.
Come posso fare?
Entrambe le stampanti sono USB.
Ciao e grazie

 ha scritto nel messaggio 
news:1184953674.5...@r34g2000hsd.googlegroups.com...

Prova questo: (supponendo di avere una combo1 su un form)
Private Sub Combo1_Click()
  Dim prn As Printer
  For Each prn In Printers
    If prn.DeviceName = Combo1.Text Then
      Set Printer = prn
      Exit For
    End If
  Next
End Sub
Private Sub RiempiCombo()
  Dim prn As Printer
  For Each prn In Printers
    Combo1.AddItem prn.DeviceName
  Next
  Combo1.ListIndex = 0
End Sub
Private Sub Form_Load()
    RiempiCombo
End Sub
In pratica visualizza in un combo le stampanti disponibili, ed effettuata la 
selezione stampa su di essa.

Newsgroup: it.comp.lang.visual-basic
Titolo: dbgrid, ma come si riempiono "dinamicamente"?

salve,
e' possibile "dimensionare" una dbgrid senza collegarla ad una fonte
dati?  
intendo dire come si fa com la msflexgrid, e cioe' qualcosa del tipo
dbgrid1.cols=5 dbgrid1.rows=7 e via cosi'.
sono stato tutta la giornata sull'help ma niente...
mi servirebbe perche' devo fare alcune cose che con la msflex non si
possono fare...
grazie.
======================================================
my opinions do not necessarily have to be true.
======================================================
per rispondermi rimuovere NOSPAM. dall'indirizzo email
to answer me remove NOSPAM. from email address
======================================================


Ti conviene scricare dal sito della Apex (
www.apexsc.com
)
l'aggiornamento gratuito della griglia. Insieme c'è un help decente,
con un buon tutorial.
Ciao
--------------------------------------------------------------------
Fulvio Senore
Eliminate "zz" dall'indirizzo e-mail per scrivermi (spammers...)
Remove "zz" from e-mail address to write me (spammers...)
--------------------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: textbox

Come inserisco un valore in una listbox tramite una textbox?

 ha scritto nel messaggio 
news:1141307950.2...@i40g2000cwc.googlegroups.com...


 Come inserisco un valore in una listbox tramite una textbox?
tramite il controllo additem
list1.additem text1.text

 Come inserisco un valore in una listbox tramite una textbox?
tramite il controllo additem
list1.additem text1.text

 ha scritto nel messaggio 
news:1141313970....@i40g2000cwc.googlegroups.com...


"zenigata" <zeni...@goemon.zzz> ha scritto nel messaggio 
news:44071412$0$36931$4faf...@reader3.news.tin.it...
ma tu sei cretino di tuo o ci metti impegno?
Ciao 

 ha scritto nel messaggio 
news:4407240d$0$29729$4faf...@reader2.news.tin.it...


> ma tu sei cretino di tuo o ci metti impegno?
Ah, hai studiato per esserlo.
Quanto fatica per niente, eri gią a un buon livello al natrale.
"Sguazza pescefesso"!
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: [?]ADO e computer senza Access.

Domanda semplice, risposta ancora di più, ma non trovo più sui vari libri
dove diamine è segnata.
Ho sviluppato una applicazione VB6 con ADO che accede ad un DB Access2000
naturalmente.
Ora su questo computer non è installato ne SQL server, ne Access2000 ne
alcun altro programma con ADO. Cosa devo installare da VB per farlo
funzionare?
--
--
Ciao da Spieg
UIN 27730515
Join the -  it.comp.giochi.simulatori.volo - NewsGroup FAQ! !!!
http://users.iol.it/ulisse31/

 wrote in message
99841m$19l$1...@pegasus.tiscalinet.it...


 ha scritto nel messaggio
news:rrQt6.3127$lT1....@news2.tin.it...


 Ora su questo computer non č installato ne SQL server, ne Access2000 ne


 parte installato con Visual Studio (cerca il file con mdac?*.*).
Grazie mille ora provo. Anzi son sicuro che così funzionerà.


 Ciao Adriano
Confermo che anche con Access2000 non funziona, per la cronaca il computer
su cui devo installare l'appicazione ha Office 97, non Office 2000, ma se
installo il programma, questo non funziona, appena il prog prova ad accedere
mi da un errore, ma ora non ricordo quale.
Se invece lo installo su un computer con SQL7 od Office 2000 tutto Ok.


 --
Dipende dalla versione (se non sbaglio per il 2000 serve la versione 2.6
Ciao VB
Newsgroup: it.comp.lang.visual-basic
Titolo: Controllo Caratteri....

Vorrei sapere se i caratteri di una stringa sono numeri o lettere,
analizzando carattere per carattere.
La divisione in caratteri la so fare ma "non riesco" a ricavare il codice
ascii da cui potrei capire se si tratta di un numero o una lettera, o
meglio, anche se so che è una cavolata, non ho il tempo di guardare
approfonditamente sull'help o sul libro perchè da domani comincio l'esame di
maturità (se picchiassero il ministro che c'ha regalato questo esame del
c---o sarei arcifelice)
Non voglio utilizzare il keypress o il keydown con le rispettive keyascii e
keycode, perche all'interno degli stessi ho l'esigenza di fare altre
operazioni.
Se qualche mini-genietto ha la gentilezza di farmi qualche esempio (magari
una function o una sub da mettere comune nel modulo) o magari di darmi la
dritta giusta..... io non ho il tempo di girarmi intorno Grazie a tutti !
Giacomo 
ande...@tin.it

analizzando carattere per carattere.
[SNIP]
Funzione IsNumeric:
Restituisce un valore Boolean che indica se un'espressione può essere
valutata come numero.
Sintassi
IsNumeric(espressione)
L'argomento obbligatorio espressione è un valore di tipo Variant contenente
un'espressione numerica o un'espressione stringa.
Osservazioni
IsNumeric restituisce True se espressione viene riconosciuta per intero come
dato numerico, in caso contrario restituisce False.
IsNumeric restituisce False se espressione è un'espressione data.
In culo alla balena per l'esame !
Bye, G.
--
---------------------------------------------
    Le risposte alle tue domande le trovi sul
    Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------
Real E-address: 
gaet...@hotmail.com
Newsgroup: it.comp.lang.visual-basic
Titolo: Word

Un programma che fa riferimento a Word con un file olb che problemi di
versione ha?
Non ho il tempo di installare tutte le versioni di Word che servirebbero per
un esperimento del genere e cosě chiedo aiuto a chi abbia tentato. Se, ad
esempio, inserisco un riferimento a Word 8 che problemi ho con le versioni
successive e precedenti eventualmente installate di Word?

 ha scritto nel messaggio
news:MJPc8.574$l_3....@twister1.libero.it...

Per quanto ci riguarda, abbiamo avuto problemi in ufficio solo in un caso,
potrebbe non essere un problema generico ma legato alla nostra
implementazione....
Comunque quello che succedeva era che un programma compilato su un sistema
Win 2000 con Office 2000, eseguito su un sistema con Office 97 dava errori
di automazione; questo pero' era un tipo di test che avevamo fatto
esplicitamente all'uscita di Office 2000, quindi ho il sospetto che non sia
sempre cosi, e sia successo qualcosa nel frattempo che ha scatenato il
problema...
Fatto sta che il procedimento inverso funziona, per cui ora quando serve,
indipendentemente da quale office abbiamo sulle workstation utilizziamo
sempre un riferimento alla object library di Word 97, che teniamo insieme ai
sorgenti, e che per il momento non ha dato problemi con le due versioni
successive.
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

 successive e precedenti eventualmente installate di Word?
Personalmente con Word non ho mai avuto problemi di versione (95-97-2000 OK,
non so XP)
Con Excel non ho problemi, ma devo utilizzare una serie di accorgimenti
perchè il CreateObject non funziona esattamente allo stesso modo a seconda
della versione (da 97 a 2000 cambia il tipo dell'oggetto...). In realtà
esiste una tecnica di programmazione che consente di essere indipendente
dalla versione.
Se ti serve te la posto.
Alberto

 ha scritto nel messaggio
news:a50m6j$sh5$1...@newsreader.mailgate.org...

Newsgroup: it.comp.lang.visual-basic
Titolo: sql base sql server access

Purtroppo ho imparato sql per sql base e questo spesso mi crea dei problemi
perchè alcune parti del dialetto sono differenti.
Il problema che ho ora è il seguente
se all'interno della tabella ho un campo data formato mm/dd/yyyy per
raggruppare i dati per mese in sqlbase mi basta fare
select @left(campodata,2), sum(campo da sommare) where condizioni varie
group by 1
questo è comunque solo un esempio, che però non rispecchia pianemtne la
realtà ma serve per rendere l'idea, anche perchè in sqlbase la data può
essere solamente di formato yyyy-mm-dd
in access @right-left-substring non funzionano, penso nemmeno in
sqlserver...
Qual'è l'equivalente? ho guardato in giro ma non ho trovato nulla.
--
------------------------------------------------------------
Davide Russo....
        ....a very internet person
-----------------------------------------------------------

 Qual'è l'equivalente? ho guardato in giro ma non ho trovato nulla.
in access dovresti essere in grado di includere nel codice SQL le funzioni
di VBA, e quindi Left (o Left$), Right (o Right$) e Mid (o Mid$). Ora, non
so se dall'"esterno", ovvero accedendo al db tramite ado o altre interfacce,
questo sia possibile, ma nelle query interne funziona.
ciao, assa.
--
Sito Comune
http://www.it-lang-vb.net/

 group by 1
Se il campo data E' un campo Date la select diventa (db access & sqlserver)
select month(campodata) as mese, sum(campo_da_sommare) as mia_somma where
mie_condizioni group by month(campodata)
Le funzioni Left ecc. esistono anche in access e SqlServer...
HTH
--
Stefano Zamboni (
sz...@libero.it
)
--------------------------------------------------------------
"If Bill Gates had a dime for every time a Windows box crashed...
...Oh, wait a minute, he already does."
Newsgroup: it.comp.lang.visual-basic
Titolo: aggiornare API 16 a 32 bit (da VB3 a VB6)

Ciao a tutti,vi disturbo per chiedervi una consulenza tosta.
Sto eseguendo l'aggiornamento di un programma scritto in vb3 a
vb6(interacciamento tra sistemi SAP R/3 - altri sistemi).
I sorgenti mi vengono forniti da un'utility di SAP.
Si fa un'uso abbondante di API, ma a 16 bit!! 
A naso ho fatto questa operazione,eliminando i dati integer..
'vb3
Declare Function RfcAllocParamSpace Lib "librfc16.dll" (ByVal numexp%,
ByVal numimp%, ByVal numtab% ) As Long
'vb6 ???
Declare Function RfcAllocParamSpace Lib "librfc32.dll" (ByVal numexp 
as long,
ByVal numimp as long, ByVal numtab as long) As Long
Come faccio a sapere come dichiararle??Ho solo la dll a 32.
E' possibile utilizzare qualche strumento,tipo API Viewer???
Sapreste per favore darmi un aiuto in base alle vostre esperienze??
Vi ringrazio tutti
Ciao 
Lorenzo

 Come faccio a sapere come dichiararle??Ho solo la dll a 32.
Qui trovi la dichiarazione dell'API in oggetto
http://help.sap.com/saphelp_45b/helpdata/en/22/042ee4488911d189490000e829fbb
d/content.htm
E qui trovi l'elenco completo delle API del SAP
http://help.sap.com/saphelp_45b/helpdata/de/22/0438e7488911d189490000e829fbb
d/applet.htm
Ciao
*Roby*

...

Ciao Roberto,
grazie per il tuo aiuto.
Il mio programma funziona.
Purtroppo l'help da te suggeritomi non è esaustivo come speravo.
Ma sicuramente molto più che un semplice punto di partenza.
Grazie per il prezioso aiuto.
Dubito ch e potrò ma i sdebitarmi,ma chi lo sà...
Grazie ancora a te ed al NG.
Lorenzo

Newsgroup: it.comp.lang.visual-basic
Titolo: Invia e.mail e cancella la propria traccia (?)

Invia e.mail e cancella la propria traccia (?)
Salve,
...pianoo, pianooo, il mio progettino stà procedendo..
..è un programma che serve a calcolare dei prezzi in base
alle scelte fatte dai clienti (ai quali andrà distribuito)...
oh.. una volta creato un file *.cfs contenente le caratteristiche
della macchina scelta, vorrei che:
questo file *.cfs mi venga inoltrato a 
pi...@pippo.it
esiste già qlc?
qlc ha già affrontato il problema?
qlc ocx?
...mi date qlc dritta (oltre a F1), considerate che smanetto
da poco con VB
grazie ancora
=:-) ®osco

 =:-) ®osco
Puoi usare il Controllo winsock ed aprire una connessione ad un SMTP Server
sull a porta di default che è la 25 ed invii i vari comandi (vedi rfc)
oppure scaricarti un OCX che ha bisogno solo dei parametri (mittente
allegati ecc...) trovi ottimi ocx facendo una ricerca su google o su
www.active-x.com
Spero di esserti stato utile
--
~~~ MrOnederfull ~~~
mroned...@hotmail.com
http://www.mronederfull.it
 (coming soon!)

 Spero di esserti stato utile
...beh  non mi è proprio tutto chiaro (SMTP Server, porta di default , rfc)
ma è un'inizio, grazie 1.000
®osco


Non volendo passare x outlook, quale strada consigli? winsock o ocx?
®osco ;-)
Newsgroup: it.comp.lang.visual-basic
Titolo: Trasmissione messaggi in rete MS

Senza ricorrere alla versione Enterprise di VB č possibile utilizzare le
funzioni API
di sistema per inviare piccole stringhe di testo fra uno o piů PC collegati
in
una rete peer to peer WfW 3.11 o Win95?
Ringrazio anticipatamente per le risposte.

Senza ricorrere alla versione Enterprise di VB č possibile utilizzare le
funzioni API di sistema per inviare piccole stringhe di testo fra piů PC


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

Salve a tutti.
Avrei bisogno di non fare apparire la mia applicazione nell'elenco processi
di Windows (Ctrl+Alt+Canc). Come devo fare?
Grazie in anticipo.

Ciao!
Scarica l'esempio "RegServPr.zip" dal Sito Comune dei programmatori VB,
http://www.murialdo.it/it_lang_vb
.
Fammi sapere se hai altri problemi su questo o su altri argomenti.
--
Marco Minerva, 
vbco...@libero.it
http://marcominerva.cjb.net
Rosario <non...@lo.dico> wrote in message
8mc82f$v4e$1...@lacerta.tiscalinet.it...


 ha scritto nel messaggio
news:ePhi5.7881$dF5.1...@news.infostrada.it...


Per cosě poco!
Sempre a disposizione.
--
Marco Minerva, 
vbco...@libero.it
http://marcominerva.cjb.net
Rosario <non...@lo.dico> wrote in message
8mdv06$f0r$1...@lacerta.tiscalinet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: macro per excel

ciao a tutti,
vorrei sapere se conoscete uno script che conti all'interno di una
selezione di un foglio excel, le caselle con un certo sfondo, o se per
caso conoscete un sito dove andare a reperire l'informazione.
Grazie

 caso conoscete un sito dove andare a reperire l'informazione.
Crea un modulo ed aggiungi questa routine:
Public Function ContaCelle(Target As Range) As Long
 Dim r As Range
    For Each r In Target
        If r.Interior.Color = vbRed Then ContaCelle = ContaCelle + 1
    Next
End Function
per utilizzarla basta inserire in una cella qualcosa tipo
"=ContaCelle(A1:F12)"
Ciao, Silv:o)



Prova questo:
Sub Macro1()
Dim x As Range
Dim iconta As Integer
iconta = 0
  For Each x In Range("A1:a10")
    ' se la cella ha sfondo
giallo
    If x.Interior.ColorIndex = 6 Then iconta = iconta + 1
  Next
MsgBox "Nella selezione le celle gialle sono: " & iconta
 
End Sub
--------------------------------
Inviato via 
http://usenet.iol.it
 

 End Function
Lo script funziona alla perfezione...ora però come faccio ad avere la
tabella dei colori per gestire il tutto? Questo vale per il rosso, ma
poer gli altri colori??
Grazie infinite ancora!!

 poer gli altri colori??
i colori in VB e VBA sono rappresentati tramite numeri che tengono
conto delle tre componenti primarie. Per calcolare il valore numerico
dei colori ci viene in iuto la funzione RGB(). Ad esempio:
vbBlack = RGB(0,0,0) = 000000 (Hex) = 0 (Dec)
vbRed = RGB(255,0,0) = 0000FF = 255
vbGreen = RGB(0,255,0) = 00FF00 = 65280
e cosě via per vbBlue, vbCyan, vbMagenta, vbYellow, vbWhite, che sono
gli unici colori che hanno una costante tutta per loro. Per gli altri
devi usare il loro valore numerico eventualmente calcolato con
l'ausilio di RGB().
Oppure potresti farti una versione della ContaCelle con due parametri:
il primo č il Range di celle sulle quali effettuare il conteggio, il
secondo č una cella con lo sfondo "campione", quello da ricercare
all'interno del Range specificato dal primo parametro.
La funzione diventerebbe:
Public Function ContaCelle(Target As Range, Pattern As Range) As Long
 Dim r As Range
 Dim myColor As Long
   myColor = Pattern.Interior.Color
   For Each r In Target
     If r.Interior.Color = myColor Then ContaCelle = ContaCelle + 1
   Next
End Function
Ciao, Silv:o)

Newsgroup: it.comp.lang.visual-basic
Titolo: Che riferimento...help me

Ciao, quando lancio l'applicazione mi viene dato l'errore 'tipo non
definito' se on sbaglio devo aggiungere un riferimento ma non ricordo  a
quale dll. Il codice dove mi viene dato errore è il seguente :
Static lDocumentCount As Long
    Dim frmD As frmDocument  <<<<<<<<<<<<<<<<<<< mi si blocca qui
    lDocumentCount = lDocumentCount + 1
    Set frmD = New frmDocument
    frmD.Caption = "Document " & lDocumentCount
    frmD.Show
Grazie

Come non detto....mi ero perso il form...scusate
LD ha scritto:

Newsgroup: it.comp.lang.visual-basic
Titolo: Oggetto Webbrowser

Qualcuno saprebbe dirmi come configurare correttamente l'ogetto
webbrowser???
Non riesco ad utilizzarlo.
Come si può settare oltre che l'url che voglio anche il tipo tdi connessione
da usare (ad esempio fra libero e tiscali vorrei usare la prima anziche' la
seconda)....
Grazie

In data Tue, 17 Dec 2002 23:08:50 GMT, Emanuele ha deciso di scrivere:

secondo me le impostazioni le prende da quelle di internet explorer,
quindi se vuoi cambiare la connessione dovresti cercare o la stringa
nel registro degli eventi o qualche altro oggetto che ti permetta la
cosa.... magari sbaglio visto che l'ho usato veramente poco... cmq ho
provato
Ciao Emanuele
______________________
Emanuele
TDM 850 93' "la scura"
Ts4n full ergal
Ipaq 3630 ppc2002
Newsgroup: it.comp.lang.visual-basic
Titolo: Info su VBScript e IE6

Premetto la mia inesperienza nell'utilizzo di VBScript, però mi trovo
a dover fare una serie di operazioni utilizzando questo linguaggio tra
cui :
- inserire un indirizzo tra i trusted sites di internet explorer 6
(Tools - Internet options - Security)
- per i trusted sites settare in stato enable i controlli ActiveX
Chiedo se è una cosa che può essere fatta e se si se qualcuno può
fornirmi qualche indicazione su come procedere.
Grazie.
Frenk

- per i trusted sites settare in stato enable i controlli ActiveX
Fai prima e com meno fatica a farlo direttamente nel registro
anche esportando importando direttamente dei file reg
Guarda qui che a memoria ho postato anche una procedura
per rendere effettivi gli aggio nel registro senza bisogno
di riavviare il pc  google groups  Fosco  it.comp.lang.visual-basic
PS:
penso che una volta che hai inserito (almeno qui nel IE 5.5sp2)
un sito tra i sicuri sia gia' di default abilitato tutto l'abilitabile
www.regedit.com
http://www.winguides.com/
Registry hacks
http://www.mdgx.com/reg.htm
http://www.winguides.com/downloads/registry.exe
  (tips 1 mega)
RegShot 1.61e
http://www.pcworld.com/downloads/file_description/0,fid,19540,00.asp
http://www.snapfiles.com/get/regshot.html
Il regshot qui sopra e' utile perche puoi fare le comparazioni tra
le modifiche dei settaggi ... in pratica fai uno snap  metti un sito qualsiasi
tra gli affidabili  fai il secondo snap fai il compare e vedi cosa e' cambiato
puoi esportare la key relativa fare i camvi con qualsiasi strumento che
scriva/risciva un plain text (anche il FSO) e poi reimportare il reg modificato
oppure scrivere direttamente tutto nel registro .. VB ha gli strumenti per farlo :
http://www.google.it/search?hl=it&q=VB6%2Bregistry&btnG=Cerca+con+Google&meta=
--
Fosco
--
Fosco

 Fai prima e com meno fatica a farlo direttamente nel registro
Ho dato una controllata direttamente nel registro  e pensavo che fosse
un po' piu complicato ma almeno come detto qui su IE5.5sp2 sembra
tutto in plain text :
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Domains
i siti affidabili sono strutturati in questa maniera :
REGEDIT4
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Domains\
google.it
]
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Domains\
google.it
\www]
"http"=dword:00000002
qui si controllano le varie zones
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones
--
Fosco
Newsgroup: it.comp.lang.visual-basic
Titolo: textbox multilinea

salve, sono finalmente riuscito ad ottenere un di avere tutti i dati che
dovevo estrarre dal db in una textbox multilinea con il chr(13) che mi
divide in varie sottostringhe tutti i dati. Ora devo leggere la prima linea
e portarla in un campo textbox, poi la seconda linea in un altro textbox e
cosě via.
Mi sapete aiutare su come fare a riconoscere la fine di una stringa e
passarla ale textbox e poi fare ripartire dalla seconda stringa e cosě via?
SPero di essere stato chiaro.... Grazie, Max

> SPero di essere stato chiaro.... Grazie, Max
Non molto, a dire il vero:
1. Perchč per passarla al textbox in questione non prendi i dati
direttamente dal DB invece di passare per la text multilena?
2. Esattamente cosa ti serve? Una procedura per spezzare le righe di una
textbox multilinea o cosa?
Antonio Mirarchi

 cosě via?
Ciao, usa la funzione Split, sull' MSDN č tutto spiegato.
Come delimitatore usi il vbCrLf (carriage return e line feed).
Ciao,
Mattia

Praticamente io ho una textbox con nlla prima linea un numero, nella seconda
il cognome, nella terza il nome, ecc. e devo riuscire a prendere il cognome
e a metterlo in una variabile, il nome nell'altra, ecc...

 ha scritto nel messaggio
news:G4j8b.97635$sj6.1...@tornado.fastwebnet.it...


Max scrive:

Dim Splitted
Dim TestCompleto as String
Dim Numero as Long
Dim Cognome as String
Dim Nome as String
TestoCompleto = Text1.Text 'TextBox con le tre o piů linee da splittare
Splitted = Split(TestoCompleto, vbCrLf)
Numero = Clng(Splitted(0))
Cognome = Splitted(1)
Nome = Splitted(2)
OK?!?!?
Sulla guida era tutto spiegato chiaramente.
Ciao,
Mattia

per il momento grazie, lunedě provo..... ciao e buona domenica a tutti
"Mattia" <br...@NOSPAM.it> ha scritto nel messaggio
news:bjsfbs$ses$1...@newsread.albacom.net...

Newsgroup: it.comp.lang.visual-basic
Titolo: VB: 2 x *.RTF in un richtextbox.

C'e' nessuno che si sia mai posto il problema di inserire più di un file
*.rtf
in un richtextbox???? Boh... io non ci riesco.
F.

 *.rtf in un richtextbox???? Boh... io non ci riesco.
come segue, sul mantenimento dei colori non ci giurerei, e i truetype del
secondo spariscono proprio. comunque ci puoi lavorare su.
metti un dirbox, un filebox settato su *.rtf e 2 rtb (scrollbar vert) su un
form. incolla il codice e fai f5.
Option Explicit
Dim sPath As String, sFile As String
Private Sub Command1_Click()
    If sFile = "" Then Exit Sub
    rtb1.LoadFile (sFile)
End Sub
Private Sub Command2_Click()
    If sFile = "" Then Exit Sub
    rtb2.LoadFile (sFile)
End Sub
Private Sub Command3_Click()
    'via clipboard (esplicita)
    If rtb1.Text = "" Or rtb2.Text = "" Then _
        MsgBox "text missing!"
    Clipboard.Clear
    Clipboard.SetText rtb2.Text, vbCFRTF
    rtb1.SelStart = Len(rtb1.Text)
    If Clipboard.GetFormat(vbCFRTF) Then _
        rtb1.SelText = Clipboard.GetText(vbCFRTF)
End Sub
Private Sub Command4_Click()
    'straight way
    If rtb1.Text = "" Or rtb2.Text = "" Then _
        MsgBox "text missing!"
    rtb1.Text = rtb1.Text & rtb2.Text
End Sub
Private Sub Dir1_Change()
    sFile = ""
    sPath = Dir1.Path
    If Right(sPath, 1) <> "\" Then sPath = sPath & "\"
    File1.Path = sPath
    File1.Refresh
End Sub
Private Sub File1_Click()
    sFile = sPath & File1.FileName
End Sub
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Maverick?!?

Ciao a tutti e scusate l'OT.
C'č un mio amico che ha aperto nei giorni scorsi, ed adesso, dei 3ad ma io
non li vedo.
Ho notato che Lupo invece l'ha visto perchč č riuscito a rispondergli in un
post precedente. Quale půň essere il problema?
Il mio amico č, come da oggetto, Maverick.
Potete gentilmente dirmi se vedete i suoi 3ad o no? Grazie a tutti.
Ciao,
Mattia

oggi non c'è bisogno di scusarsi per gli OT....
:-))
cmq, può essere che usiamo server newsgroup differenti, quindi non sono
sincronizzati tra loro...
io, per esempio, uso 
news.cis.dfn.de
, come altri qui, credo....
io non vedo nessun post di Maverick, nè oggi nè ieri.....boh.....
-- 
Damiani Liborio Igor
ig...@igordamiani.it
 - 
soft...@igordamiani.it
 - 
idam...@hotmail.com
http://www.igordamiani.it
ICQ : 11847262

 Ciao,
Uh.... ho l'intestazione ma il messaggio non esiste più nel server;
essendo il messaggio di oggi deduco che è stato eliminato da un bot (magari
avere allegati all'interno) oppure l'ha cancellato l'autore stesso dal
server come previsto dal protocollo NNTP.
termoPilucco, OT

 termoPilucco, OT
Ciao,
sto parlando con lui via MSN. Dice che non l'ha cancellato. Comunque, provo
a riportare quanto scritto da lui, vediamo se può servire qualcosa...
senti chiedi a Igor se ci vuole un'autenticazione perchè quando provo ad
andare nel NG di Visual basic sul suo server mi dice:
480 Authentication required.
Configuration:
Account: 
news.cis.dfn.de
Server: 
news.cis.dfn.de
Protocol: NNTP
Port: 119
Secure(SSL): 0
Error Number: 480
Code: 800ccca4
Nel frattempo, grazie per l'aiuto...
Ciao,
Mattia

 Ciao,
Vedo solo il post "Re: LOG di sistema" di oggi, 13:47

 ma io non li vedo.
Nemmeno io... avevo notato la cosa (post di lupo)... ogni tanto succede! :(

 Server: 
news.cis.dfn.de
Uso lo stesso server, (necessita di registrazione): prima il messaggio
c'era, poi è stato cancellato.
Ho fatto in tempo giusto a scaricarare l'intestazione.
termoPilucco

Grazie a tutti.
Vediamo se Maverick ce la farà o meno...
Bye Bye Buon fine settimana a tutti
Mattia
Newsgroup: it.comp.lang.visual-basic
Titolo: Accesso Negato

Ciao!
Quando devo stampare da vb con 
crystal.net
 e come origine dati gli passo
un dataset o un file mi dice accesso negato oppure accesso non
consentito.
Qualcuno sa perche?
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Newsgroup: it.comp.lang.visual-basic
Titolo: HO TROVATO UN BUG IN VB6 ! (SP1)

Ciao a tutti,
il bug č nella listview, provate a creare una listview con i checkboxes
attivi, caricate e scaricate il form contenente la listview per 100 o piů
volte e vedrete le risorse di sistema calare fino a 0% !
Provate come segue :
create un form , nel form load :
Private Sub Form_Load()
Dim I As Integer
For I = 1 To 100
Form2.Show
Unload Form2
Next
End Sub
nel form2 create una listview con i checkboxes attivi, se la medesima prova
la fate con i checkboxes non attivi le risorse sono ok !, se avete una
soluzione vi prego di comunicarmela.

 wrote in message
7b67ep$m47$1...@nslave1.tin.it...

Semplice: non caricare 100 forms con una listview
 con i checkboxes !!! ^____^
Zeross

soluzione vi prego di comunicarmela.
Prima di scaricare il form, nascondilo e togli il checkbox a tutti gli
elementi. Oppure, se il problema e' nella creazione, carica il fom nascosto
con i checkbox disattivi, attivali a "mano" e -poi- rendi il form visibile.
Marcantonio

soluzione vi prego di comunicarmela.
Prova a scricare completamente il codice del form cosě:
Private Sub Form_Load()
Dim I As Integer
For I = 1 To 100
Form2.Show
Unload Form2
Set Form2 = Nothing
Next
End Sub

Zeross
Ciao Zeross
secondo me hai sbagliato newsgroup.
Sei sicuro che non ti troveresti più a tuo agio in
it.hobby.umorismo ?
A giudicare dalle risposte...     :-))
Ciao, Gundam

Ciao, Gundam
Mmm.... mica male l'idea....
in fin dei conti quest'estate ho vinto due volte
la gara di barzellette in campeggio.... da un
po' di anni faccio l'animatore aggiunto.... beh...
..potrei pensarci sul serio sai ? ^__^
Zeross

Set Form2 = Nothing
I manuali...


!! IN CAMPEGGIO ???? !!
..ma come accompagnatore o come scout ?
(la domanda potrebbe anche essere posta in questo modo:
- Ma quanti anni hai ?)
Ciao, Gundam

- Ma quanti anni hai ?)
Oddio... che ho detto di male ??   ?_?
Ne l'uno ne l'altro.... ci vado come normalissima persona
che va a fare campeggio (beh.. forse proprio normale no,
dato che porto con me il PC... esistono altre "normali"
persone che fanno campeggio portandosi dietro il PC ?
Non ditemi che sono un pioniere.... ^__^ )
(la risposta potrebbe anche essere posta in questo modo:
- 24 anni)
NB: se ho suscitato curiosità solo per aver detto che passo
 le mie estati in campeggio, cosa accadrebbe se dicessi pure
 che ho uno zio istruttore al C.A.I., e che quindi a volte vado in
 grotta o a fare le rocciate ??? ^____^
NB2: no, non vado in grotta con il PC... di solito non c'è
corrente (a parte l'acqua corrente) ^_^;;;;
Zeross
________________________________
"Tutto quello che voglio è una bella nave...
...e una stella verso cui dirigerla !"


Guarda che tu sei normale (a parte il fatto che ti porti il PC in campeggio,
per cui saresti penalmente perseguibile ;-)
Il problema semmai sono quei "cittadini" (questi milanesi che sono
dappertutto...) che non sanno cosa sia il campeggio, e che a Pasquetta vanno
a fare il picnic ai lati delle superstrade :-O
--
Roal Zanazzi
z...@iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Come faccio a creare un db in funzione della data impostata?

Ciao ragazzi. Innanzi tutto vi ringrazio.
Il problema è:
ho creato un programmino che mi permette di inserire mediante textBox dei
valori in una tabella già esistente di un database.
Il problema è che ad ogni giorno del mese và associata una tabella e non so,
da codice, come creare una nuova tabella  associandole la data del giorno
corrente.
Vi ringrazio Max


Vedi help in linea.
Se utilizzi DAO: cerca "Oggetto Database", TableDefs, Fields...
Se utilizzi ADO: devi usare la libreria ADOX, quindi aggiungere al progetto
il reference di questa libreria e vedere l'help di ADO per gli oggetti e
metodi messi a disposizione.
Pensierino della sera: mi pare strano che per _ogni_ giorno del mese ci sia
una tabella. In genere quando si arriva a queste situazioni c'e' alla base
un errore nel design della base dati. E' solo una supposizione, magari non
e' il tuo caso.
Roal Zanazzi

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

ciao a tutti
sto costruendo un programmino con delle list box
volevo chiedere se era possibile cambiare il colore ad ogni singolo nome
mi spiego:
se per esempio tutti i nomi di una list box sono di colore nero e vorrei ad
esempio che solo il nome enrico diventi rosso come posso fare?
sopratutto e' possibile farlo? se c'e' qualcuno che puo' darmi una mano con
un'esempio.
ciao e grazie in aticipo.

 wrote in message
838vmi$1r5k$1...@stargate1.inet.it...


 wrote in message
news:838vmi$1r5k$1...@stargate1.inet.it...


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

Ciao a tutti, è possibile da Vb richiamare Winzip passandogli la stringa
dove risiede il mio file e lui mi crea
il file compattato nella stessa directory con estensione .zip!
Un po come fare tasto destro del file e scegliere "Add to nomefile.ZIP"



Ciao a tutti, č possibile da Vb richiamare Winzip passandogli la stringa


Newsgroup: it.comp.lang.visual-basic
Titolo: VB e DXF

Qualcuno ha delle routine già fatte x creare dxf in vb ?

 Qualcuno ha delle routine già fatte x creare dxf in vb ?
per visualizzare, su 
usa.autodesk.com
 forse trovi ancora voloview express,
free, che installa una avviewx.dll referenziabile. non so se la si puo'
usare anche per disegnare, ma mi sembra che il voloview normale sia
programmabile in vba, puoi provare a guardare da loro. con 'dxf "visual
basic"' google da' un po' di link...

 ha scritto nel messaggio
news:Axdua.57899$3M4.1...@news1.tin.it...
