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

Ferdinando Cecchini scrisse in un messaggio indirizzato a All:
 FC> If Dir(txtNomeFile) = "" Then
 FC>   'se il file non esiste, dal momento che Word si avvia sempre con
 FC> un   'documento vuoto, lo salvo con il nome del file che si voleva
 FC> aprire   lblDDE.LinkExecute "[FileSalvaConNome .Nome = """ &
 FC> txtNomeFile & """]"
 FC> Else
 FC>   'se il file esiste, lo apro
 FC>   lblDDE.LinkExecute "[FileApri .Nome = """ & txtNomeFile & """]"
Sembra che il problema sia il LinkExecute... nel word non funza! Forse e`
perche` uso la ver 8.0 (office 97) che converte le wordbasic in Visual Basic?
Boh...
Se faccio una cosa simile:
Set Documento as Object
Documento = CreateObject("WinWord.Application")
Ducumento.<...>
Documento.<...>
<...> 
Cosa devo mettere al posto dei punti per aprire il documento o crearlo se non
esiste? 


esiste? 
Guarda il problema e' insolubile se poni la condizione "puo' esserci
qualunque word nella macchina dell'utente"; questo perche' alcune
versioni hanno i comandi DDE in inglese (OpenFile...), altri in
italiano (FileApri...); se invece vuoi usare OLE, calcola che va'
tutto in crash con Office 97 in quanto non viene piu' supportato
WordBasic! :) Analogamente, se usi winword.application, non ti funge
coi word vecchi...
...l'unica soluzione per far fungere la comunicazione con TUTTE le
versioni di word e' affidarsi al collegamento del file .DOC o .RTF:
semplicemente usi l'api ShellExecute e gli passi il nome del file.
Cosi' xo' non puoi far aprire word con un file nuovo: pazienza, ti
crei un file che funge da template, lo chiami NUOVO.DOC (per esempio),
lo proteggi da scrittura e lanci quello.
--------------------------
MATRO
http://www.geocities.com/SiliconValley/8383
Chiave PGP disponibile - PGP key available

lo proteggi da scrittura e lanci quello.
Parole sante!! :-)))
       _  _______________________________  _     
      / )|                               |( \    
     / / |      FERDINANDO CECCHINI      | \ \   
   _( (_ |    
fdn.ce...@flashnet.it
   | _) )_ 
  (((\ \>|_/->_______________________<-\_|</ /)))
  (\\\\ \_/ /                         \ \_/ ////)
   \       /                           \       / 
    \    _/                             \_    /  
    /   /                                 \   \  
   /___/                                   \___\
Newsgroup: it.comp.lang.visual-basic
Titolo: Excel: creare una funzione inseribile nel foglio di calcolo.

Ho visto che con vba è possibile dichiarare in qualche modo una funzione che
possa essere inserita nel foglio di calcolo.
Come si fa?
n.b. Excel 2000

 Come si fa?
Da Excel passi a Microsoft Visual Basic (Alt+F11) ed inserisci
un modulo nel progetto. Dentro al modulo scrivi la tua
funzione sul modello di quella seguente:
Option Explicit
Public Function ImportoFattura( _
  ByVal Imponibile _
, ByVal AliquotaInps _
, ByVal AliquotaIva _
, ByVal AliquotaIrpef _
)
  Dim ImponibileIva, ImponibileIrpef, ImponibileInps
  Dim ImportoIva, ImportoIrpef, ImportoInps
  Application.Volatile True
  Imponibile = CDbl(Imponibile)
  ImponibileInps = Imponibile
  ImportoInps = ImponibileInps * CDbl(AliquotaInps)
  ImponibileIva = Imponibile + ImportoInps
  ImponibileIrpef = Imponibile + ImportoInps
  ImportoIva = ImponibileIva * CDbl(AliquotaIva)
  ImportoIrpef = ImponibileIrpef * CDbl(AliquotaIrpef)
  ImportoFattura _
    = Imponibile + (ImportoInps + ImportoIva) - ImportoIrpef
End Function
che poi, nel foglio di lavoro potrai usare in uno di questi
modi:
A1: =ImportoFattura(1000000;4%;20%;20%)
-oppure-
A1: 1000000
A2: 4%
A3: 20%
A4: 20%
A5: =ImportoFattura(A1;A2;A3;A4)
Se hai qualche dubbio scrivi.
--
Ciao.
Maurizio
--------
?SPQR(C)
 X

 un modulo nel progetto. Dentro al modulo ...
Grazie mille.
Non funzionava perchè definivo la funzione nel modulo Worksheet invece di
crearne uno nuovo.

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] lo spam rende fino a 7000 dollari al giorno

 
http://www.corriere.it/scienze_e_tecnologie/08_novembre_11/spam_ricchi_59e9ceee-afed-11dd-981c-00144f02aabc.shtml--Greg

 
http://www.corriere.it/scienze_e_tecnologie/08_novembre_11/spam_ricchi_59e9ceee-afed-11dd-981c-00144f02aabc.shtml
-- 
Greg

Newsgroup: it.comp.lang.visual-basic
Titolo: [skunk] gli altri p.f. non leggano

skunk, faro' la proposta di riservarti uno dei sottogruppi di iclvb, o
almeno un nuovo tag da preporre al subject :)
non lo farei per nessun altro, ma per te ho una particolare simpatia e in
piu' non riesco a crederci che tu possa fare certe domande:
ma l'msdn ce l'hai ?
se non ce l'hai, ti spedisco la mia copia di backup !
:)))

se non ce l'hai, ti spedisco la mia copia di backup !
Non serve, grazie.
Avrei voglia di farti una domanda...è più una curiosità...magari tra
un po la posto...
Nessun saluto.

Newsgroup: it.comp.lang.visual-basic
Titolo: versione eseguibile

Ciao a tutti,
mi occorre sapere se esiste un API di Win per 
leggere la versione di file tipo EXE, DLL ecc.
Ancora meglio un esempio sul suo utilizzo.
Grazie in anticipo;
noetheriano.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 leggere la versione di file tipo EXE, DLL ecc.
cerca sul sito comune....
happy developping ... :-)
john79
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] proteggere con copyright il nome di un programma

salve a tutti,
ho realizzato per conto mio un programma e ora, visto che ho avuto la
fortuna di venderne subito un paio, avrei la necessità di registrare il nome
e/o il marchio in modo che nessuno possa utilizzarlo senza il mio consenso.
qualcuno di voi sa a chi mi devo rivolgere o se c'è un sito dove informarmi?
grazie a tutti
ciao

 ha scritto nel messaggio
news:HRnZ6.82883$Uo3.2...@news6.giganews.com...

per info riguardanti il copyright puoi guardare su
http://www.whatiscopyright.org
Ciao
Faber

SIAE (mmagino....prova a chiedere alla sede della tua città!)
Ciao SIMo
--
__________________
www.sasim.cjb.net


Newsgroup: it.comp.lang.visual-basic
Titolo: Come posso eliminare records doppi da un recordset?

SAlve.... ho un problema:
Ho un recordset creato da una SQL dove trovo diversi campi identici....come
posso modificare la SQL al fine di ingorare i campi che contengono le stesse
stringhe(cioe' quelle doppie)?
Grazie dei suggerimenti.
Saluti
Roberto
--
Posted from 
smtp4.libero.it
 [193.70.192.54] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Usa DISTINCT nella query

Newsgroup: it.comp.lang.visual-basic
Titolo: ma la GetObject non funziona?!?!??!?!!?

allora.........
ho fatto una form
su un bottone ho messo questo codice..
Private Sub Command1_Click()
Set objClient = CreateObject("ClientWeb.cClientWeb")
If Err.Number <> 0 Then
    MsgBox ("Oggetto non Creato")
exit sub
End If
    objClient.immSTR = 2
    MsgBox "la proprieta' immstr vale " & objClient.immSTR
 
End Sub
Clientweb e' una dll che abbiamo fatto noi ed ha una proprieta'
immSTR.
in un altro bottone ho messo questo codice
Private Sub Command2_Click()
    Set objClient2 = GetObject("", "ClientWeb.cClientWeb")
    MsgBox "La proprieta' immSTR dell'oggetto vale " &
objClient2.immSTR
    Set objClient2 = Nothing
End Sub
perche' la getobject non riesce a prendermi l'oggetto che ho crato
prima??? me ne crea sempre uno nuovo!!!!!!!
grazie.
ps: abbiamo sviluppato dei controlliocx che girano sul web....ma come
posso avere una lista degli oggetti ocx che l'utente ha chiamato?
vorrei disporre di tutti i metodi eventi e proprieta' di tutti gli
oggetti che l'utente richiama.

 prima??? me ne crea sempre uno nuovo!!!!!!!
Se dai un'occhiata all'help della funzione GetObject c'e' una piccola postilla
in fondo alla pagina, tipo quelle di Zio Paperone ;-), che cita:
"Non è possibile utilizzare la funzione GetObject per ottenere un riferimento a
una classe creata con Visual Basic."
Se hai bisogno di accedere a specifiche istanze delle classi del tuo ActiveX
puoi implementare, ad esempio, dei metodi che accedono ad una collection globale
dove mantieni un riferimento ad ogni classe creata e che tieni allineata nei
vari Class_Initialize/Class_Terminate
Ciao
--
Luca Dormio
luca....@tin.it

si infatti....
me ne sono accorto dopo eheheh
grazie della risposta .......
io ho vari controlli ocx che carico sul web.
quindi dovrei costruirmi qualkosa dove dentro vado ad aggiungere i
controlli che l'utente carica ...
una specie di lista dei controlli insomma. 
tu mi dici di usare una collection globale...come si fa? dove posso
trovare documentazione/esempio su questa cosa?
grazie di nuovo


 trovare documentazione/esempio su questa cosa?
Se devi intercettare l'utilizzo di controlli *diversi* cosi' su due piedi non
saprei esattamente cosa suggerirti... per tenere traccia invece delle varie
istanze di varie classi all'interno di un *unico* ActiveX (quello che mi
sembrava volessi fare con la GetObject) puoi usare la collection in questo modo:
definisci all'interno del tuo progetto una collection "Public" in un modulo
*BAS* (quindi non in una classe), in questo modo hai una variabile globale per
tutto il progetto.
Public clIstanze As Collection
nella tua classe cClientWeb puoi quindi fare
Private Sub Class_Initialize()
clIstanze.Add me,<un campo chiave per distinguere l'istanza>
End Sub
Private Sub Class_Terminate()
clIstanze.Remove <il campo chiave di prima>
End Sub

Newsgroup: it.comp.lang.visual-basic
Titolo: [!] zip e vari

http://www.webmasterfree.com/
provare a cercare "visual basic"


Accidenti! l'unico che mi interessava (3DNow) č un broken-link...
:)
Ciao

 :)
hai provato a chiedere a google "3dnow download" ?
saltano fuori diverse optimierungen, fur kingpin, quake...
sempre che sia quello che interessa a te
( io manco so cos'e' lui, figurati le patch o ottimizzazioni :)

 wrote in message
QQyg7.27279$TS4....@news2.tin.it...

prova qui':
http://web.tiscali.it/GiulianoCornacchiola/
CIAO!
Newsgroup: it.comp.lang.visual-basic
Titolo: data report controllo sul numero di pagina

E' possibile efettuare dei controlli sul numero di pagine?
ad esempio i dati della pagina 1 stamparli in rosso, quelli della due
stamparli in blu?
oppure un controllo solo sull'ultima pagina?
grazie per le vostre eventuali risposte.
maxed

Utilizzi Crystal Report?
Se si andare nelle proprietà dei campi da modificare (formato campo) e
nella sezione carattere cliccare sul campo formula (X+2) corrispondente
al colore.
Aquesto punto puoi scrivere le tue condizioni, ad esempio se vuoi
scrive in nero nella prima pagina, Rosso nell'ultima e blu nelle
centrali:
if PageNumber = 1 then
    crBlack
else
    if PageNumber = TotalPageCount then
        crred
    else
        crBlue

         crBluE
Grazie per la tua cortese risposta ma non uso CR uso datareport di vb.
hai qualche soluzione?

Mi dispiace ma non conosco il prodotto.
Cliccando il pulsante destro del mause sul campo non c'è qualcosa di
simile a formato campo?

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con shell ed iexplore.exe

Salve a tutti, ho un piccolo problema che non so da che parte affrontare.
Dunque ho un bel form con un button che quando viene premuto mi lancia il
browser di default (iexplore) e quando termino il collegamento ritorno al
mio programma che nel frattempo ha tenuto conto del tempo di collegamento,
(si, è un contascatti).
Come posso fare a lanciare il browser predefinito ?
E se volessi monitorare la porta com per intercettare la connessione in
corso senza richiamare esplicitamente il browser ?
Grazie per il vostro aiuto.

 corso senza richiamare esplicitamente il browser ?
Passo.
--
Ciao.
Maurizio
Newsgroup: it.comp.lang.visual-basic
Titolo: Errore: tipo non corrispondente??????

Qualcuno sa' spiegarmi il prechè di questo errore??
Io ho davvero provato in tutte le salse ma non ne sono venuto a capo
C'e' un controllo data nel form ed un oggetto listbox al click sul
listbox va al record corrispondente e visualizza il contenuto nei
campi:
ecco il codice nel sub_list1_click
 Dim trec, tfind As String
    Dim risposta As Integer
 
    trec = Left(Prop_cond.List1.Text, 20)
    tfind = "cognome ='" & trec & "'"
    If trec <> "" Then
        With Data1
        .Recordset.FindFirst tfind
            If .Recordset.NoMatch Then
             risposta = MsgBox("Non ho trovato l'elemento " & trec &
". Questo potrebbe essere rimasto giacente da tempo" _
             , vbOKOnly, "Errore!")
            Else
                Prop_cond.Refresh
            End If
        End With
    End If
quando esegue il comando finfirst restituisce "tipo non
corrispondente"
Mah
Attilio

 Dim trec, tfind As String
equivale a
Dim trec as Variant, tfind As String
Lo stesso vale per le funzioni stringa come Left, Trim, Mid ecc., che
andrebbero sostituite con Left$, Mid$, Trim$... in quanto quelle senza $
restituiscono un variant.
Forse è questo: tu dando trec (variant) in pasto a findfirst lo fai
arrabbiare.



Attilio

>
Niente da fare, ho cambiato le dichiarazioni ma ritorna sempre il
'Tipo non corrispondente', l'operazione pero' la compie.
Se parto da 0, definisco il database di nuovo con variabili locali e
opero nel recordset con l'operazione WITH l'errore scompare, solo che
cosi' mi devo aprire ogni volta un database.....
Mah
Attilio

Hai provato a vedere che valore hai in tfind dopo il click sulla list?
altrimenti mi sa che è un problema di database e non di codice !!!
fammi sapere


Newsgroup: it.comp.lang.visual-basic
Titolo: scrittura in file di testo usando lo stesso spazio

dovrei scrivere in un file di testo es:
Open nomefile For Append As #1
                    Print #1, GetInetStrFromPtr(.dwLocalAddr),
itmx.SubItems(1), itmx.SubItems(2), itmx.SubItems(3), itmx.SubItems(4),
itmx.SubItems(5), itmx.SubItems(6), itmx.SubItems(7)
                    Close #1
ma dovrei occupare lo stesso spazio indifferentemente dalla lunghezza di
ogni campo per tenere incolonnati i valori, es:
valore1    valore2
222         44444
22           333        ECC....
credo si usi space()???? ma come lo uso, mi sapete fare un esempio?
Grazie

[*Simba883* = 
simb...@libero.it
 in news:brpkq8$umu$
2...@lacerta.tiscalinet.it
]
ha scritto:

Space(50 - Len(stringa_effettiva))
Newsgroup: it.comp.lang.visual-basic
Titolo: DAO in comparison to newer data access methods

Can someone help me?   What are some of the advantages and disadvan
ages of the DAO in comparison to the newer data access methods?  Any help
would be great!

 would be great!
well, a full answer would mean tons... -- you could take a look at latest
issues of vbpj and alike mags.
shortly:
dao should be more reliable, tested and, with access db's, faster.
ado is the (currently) new ms technology. it should offer more
compatability, multi-tiers developing, a.s.o.
if your program will run on just one pc or a bunch of netowrked pc's with
access mdb's, you might want to choose dao.
if you think you'll need to bind to third-party db's, and/or to upsize your
program, it could be worthwhile learning ado.
hth, pal
--
andrea dot palazzi at tin dot it
free vb/sw: 
http://www.comune.modena.it/cittadini/apal/html/

 wrote in message
news:8mqt1f$q8j$1...@fe2.cs.interbusiness.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] checkbox disabilitata: cambiare colore sfondo

Salve,
ho una checkbox disabilitata. Il quadratino risulta grigio, quindi poco
leggibile.
Volevo sapere se era possibile rendere il quadratino bianco, mantenendo
l'oggetto disabilitato.
Con la proprieta' backcolor non succede nulla.
	Grazie
	Lore.

 ha scritto nel messaggio
news:3A65C2C...@agip.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Componente Ms WindowsLess..

Dove si può reperire il componente ocx MS WindowsLess .( MSWLESS.ocx) ??
E' un componente compreso in Vb6 o esterno ?? Grazie


E' nel cd di VB ma non viene installato con vb.
Te lo  devi installare a parte.
Cerca MSWLess (mi sembra) nel CD
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Microsoft Transaction Server

Salve,
    sapreste dirmi da dove posso scaricare il Setup di MTS?
Premmetto che non sono un gran ricercato, ma è da ieri sera che ci provo
senza esito! Ho scaricato e provato ad installare l'Option Pack per Windows
NT ma ho un Windows 2000 Server e dopo aver lanciato il setup, ricevo un
messaggio che mi segnala l'impossibilità ad installare l'Option Pack sul mio
Sistema Operativo.
Grazie mille
Francesco Quaratino

Sistema Operativo.
Qui si parla di visual basic e non sappiamo cosa sia MTS, prova su un
newsgroup piu' attinente.
Comunque su Windows 2000 si chiama COM+ ;-)
-- 
ciao, hal

 wrote in message
news:krzPb.268613$vO5.10...@twister1.libero.it...

Ci credo. Su Windows 2000/XP/2003 viene installato di serie insieme ad IIS.
Si chiama Component Services.
-- 
Salute e Saluti a Tutti.
-- 
Gabriele Del Giovine [Microsoft MVP] Windows Server
- Le informazioni fornite in questo messaggio sono fornite
  senza vincolo di garanzia e senza responsabilità alcuna.

 Si chiama Component Services.
Mi sai dire perchč IIS non mi funziona dato che questo COM+ non mi va?
Quando vado su
pannello di controllo --> Strumenti di amministrazione --> servizi 
componenti --> servizi componenti --> computer mi si chiude la finestra...
C'č qualcosa che non va.
esiste un modo per riparare la cosa?
Ciao

 ha scritto nel
messaggio news:buo4be$2qlu$1...@newsreader2.mclink.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Accesso a database su ADSL

	Salve a tutti
Ho realizzato un programma gestionale che si appoggia attualmente su
un database access
Ho intenzione di spostarmi su server mysql e fortunatamente
questo e' abbastanza facile visto che esistono i driver ODBC
Vorrei far questo per poter accedere facilmente e con un po' piu'
di sicurezza da postazioni diverse mediante internet
Se il server e' collegato con ADSL e i 2 client con un 56K,
sapendo che la mole di dati e' quella di una piccola azienda, 
secondo voi ci sarebbero grossi rallentamenti?
Se se invece il collegamento fosse tra 2 ADSL?
Grazie mille
HjFabius

 Grazie mille
a meno che non vada con l'HDSL o con contratti speciali
l'ADSL in Italia
Download 256 o 640kbps
Upload 128Kbps
(ad andar bene!)
i 56k del modem son teorici (non ci puoi far affidamento)
Rallentamenti al programma?
eh! bella domanda....se è strutturato bene potresti sfruttare i recordset
disconessi di ADO...
oppure fatti la fase di input via ASP e/o farti un componentino IIS
a tal fine...a suo tempo feci alcune prove....con XPpro che ha gia il
webserver...
male non andava (poche prove perchè IIS di xp non lo capisco)...
cmq con win2kserv +IIS +adsl diventi un piccolo provider....
PERO'
bisogna leggere bene il contratto adsl
è una situazione un po controversa...ossia telecom o chi sia, credo si
incazzi perchè usi le loro linee per usi un po diversi
dal previsto.In teoria potresti fare a meno di un provider(con un IP
statico)
logicamente devi trovare un contratto con un ip statico a meno che tutte le
volte non comunichi ai client il tuo ip attuale del server (fattibile...ed
estremamente + sicuro...i portscanner non sanno mai dove sei di preciso)

secondo voi ci sarebbero grossi rallentamenti?
Se usi ADO o RDO (e non access come database) e fai query mirate che 
restituiscano pochi record puoi reggere bene. L' optimum sarebbe chiamare 
delle stored procedures, in modo da trasmettere meno testo possibile.
Se usi ADO puoi anche replicare periodicamente in locale in formato xml 
le tabelle che cambiano raramente (decodifiche, configurazioni, ecc.).
E' ovvio che l' applicazione va pensata in modo completamente diverso
dall' uso in locale (o rete locale) con access. Scordati percio' le Seek di DAO,
le SELECT * senza WHERE, ecc. ecc. 
Se lo fai bene, vedrai che le prestazioni saranno accettabili con ADSL e con ISDN: 
non so con 56K, che, tra l'altro, come ha giustamente scritto Wodka4U, 
non sono mai effettivi.
-- 
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: [?]Calcolo giorni feriali!

Ho un problema devo calcolare i giorni lavorativi che passano tra una data
ed un'altra c'è una funzione che non tiene conto dei sabati e delle
domeniche.Mi spiego meglio
se io dovessi aggiungere 7 giorni alla data di oggi mi risulterebbe
28/12/2000 invece mi deve aggiungere 7 giorni lavorativi percio mi dovrebbe
restituire 30/12/00
Aiutatemi per favore se non sono stato abbastanza chiaro ditemelo!
Grazie
mauro.b...@tiscalinet.it

 ha scritto nel messaggio
news:91ssph$f4r$1...@pinco.nettuno.it...


> Public Function SommaData(ByVal x As Date, g As Long) As Date
Leggasi:
Public Function SommaData(ByVal x As Date, ByVal g As Long) As Date

Newsgroup: it.comp.lang.visual-basic
Titolo: e' meglio VB6 o editor macroVB di Word?

sono un novizio ancora in  fase di studio di VB6, e ho notato una cosa
strana.
Per prova, su un form ho incollato tre TextBox e una Label (che riceve e
mostra a video il risultato delle 3 TextBox).
Avviando, il problema e' che per spostarmi da una TextBox all' altra devo
usare TAB o, a fatica, sono riuscito ad inserire dei comandi per usare
INVIO.
Curiosamente, se nell' editor di macroVB di Word(2000) faccio la stessa
prova, riesco a passare da una TextBox al' altra con  TAB, INVIO e i tasti
freccia senza nessun "giro" di comandi!
E'possibile avere la stessa flessibilita' con il "povero" VB6?

 E'possibile avere la stessa flessibilita' con il "povero" VB6?
Al contrario! VB6 è più flessibile proprio perchè hai la possibilità di
gestire tutto.
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
www.nicolaottomano.it

se e' vero che e' piu' flessibile, xche allora  negli esempi di VB6 non e'
spiegato in modo semplice e chiaro questi passaggi? (soprattutto per i
neofiti come me!)
nessun esempio (semplice) spiega come usare i tasti freccia...

 neofiti come me!)
Flessibilità non è sinonimo di facilità d'uso.
Per imparare ad utilizzare un linguaggio di programmazione servono anni.
Ciò che tu hai già pronto in macroVB, in VB deve essere creato.
La flessibilità sta proprio nel fatto che puoi decidere di usare i tasti
freccia per muoverti tra le textbox o per altri scopi.
Ti consiglio di acquistare un buon libro di VB per iniziare.
Senza una guida lineare (come appunto può essere un libro) non si va da
nessuna parte...


allora xche' non usiamo tutti l' assembler e chi si e' visto si e' visto?
per me non e' detto che flessibilita(semplicita') e "potenza" debbano per
forza andare a scapito l' una dell' altra.
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6 vs .NET] Elucubrazione su Long e Int (ovvero Int e Short in .NET!!)

In vb6:
Dim i as Integer
Dim j as Integer
Dim a as Long
i = 30000
j = 30000
a = i + j
^^^^^^^^^^
Questa istruzione va in overflow!! :(
In 
vb.net
:
Dim i as Short
Dim j as Short
Dim a as Integer
i = 30000
j = 30000
a = i + j
tutto ok!
^-^ 

Perche` VB6 (stupidamente) essendo i due operanti integer "presume" che 
anche il risultato sia un int, prova a forzare uno dei due operandi a long 
(aggiungendo &) e vedrai che funge anche in VB6
HTH
-- 
Corrado Cavalli [Microsoft .NET MVP-MCP]
UGIdotNET - 
http://www.ugidotnet.org
Weblog: 
http://blogs.ugidotnet.org/corrado/

 HTH
Ciao, ma essendo 30000 + 30000 quindi al di sotto dei 64mila e rotti vb6
non doveva fare comunque l'operazione senza problemi (o mi sono perso
qualcosa?).
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 qualcosa?).
Mi rispondo da solo, il limite non è 64mila e rotti ma 32767/8, mi scuso
per il disturbo arrecato.


Newsgroup: it.comp.lang.visual-basic
Titolo: help! Uscita forzata da una sub

Il mio problema e' che se eseguo una chiamata ricorsiva, nel mio evento
public root As String
Private Sub Command1_Click()
Dim node As FolderViewControl.ITreeNode
root = Mid$(Text1.Text, 1, 3)
Set node = fView1.GetFirstItem
cerca_root node.Child
End Sub
Public Sub cerca_root(ByVal node As FolderViewControl.ITreeNode)
Dim NodeChild As FolderViewControl.ITreeNode
Set NodeChild = node
Do While Not NodeChild.NextSibling Is Nothing
If NodeChild.Path <> root Then
                            cerca_root NodeChild.NextSibling
                            Else
                            NodeChild.Checked = True
                            exit sub
                            End If
Loop
End Sub
utilizzando l' exit sub il tutto ritorna o all 'end if mentre dovrebbe
uscire e passare
alla sub routine che ha chiamato quest'ultima ( Command1_Click ).
Grazie per eventuali risposte

 alla sub routine che ha chiamato quest'ultima ( Command1_Click ).
Questo problema è già stato discusso tempo fa: *non* è vero che torna
all'end if!
Esce dalla chiamata per continuare in quella di livello superiore alla riga
successiva (vedi Stack di chiamate).
In fondo è una sub ricorsiva, no? :)
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Quesito...

Ho due textbox in cui se inserisco in una un valore decimale esso me lo
traduce in esadecimale cosi':
Sub text_keypress (keyascii as integer)
if keyascii=13 then
text2.text=hex(val(text1.text))
end if
end sub
come posso convertire il numero in esadecimale inserito in text2 in decimale
per farlo apparire in text1?
Esiste la funzione inversa di HEX?
Grazie

...

Bhe prima di tutto ti consiglio un usa l'evento key press ma usa l'evento
change
if isnumeric(text1.text) then
    text2.text=hex(val(text1.text))
end if
per fare in modo  che le due funzionino contemporaneamente di conviene usare
una variabile booleana se no ti vanno in loop che setti a false quando sei
in text2 e fai
if isnumeric(text1.text)and Decimale then
    esadecimale = False
    text2.text=hex(val(text1.text))
    esadecimale = true
end if
if isnumeric(text2.text)and EsaDecimale then
    decimale = False
    text2.text=hex(val(text1.text))
    decimale = true
end if
nel secondo lo converti prima in decimale che non ricordo se c'e' una
funzione che vede se e' un numero esadecimale.
Luca

Grazie
Bisogna farla!
10d=Ah
20d=14h=1*(16^1)+4*(16^0)
3884=F2Ch=15*(16^2)+2*(16^1)+12*(16^0)
Mi permetto di dire che, almeno per chi programma (anche solo per hobby),
conoscere le rappresentazioni di un numero nelle varie basi (e come si passi
da una base all'altra) sia il minimo... La cosa non richiederebbe poi cosě
tanto tempo.
Ciao Marco

Newsgroup: it.comp.lang.visual-basic
Titolo: Un aiuto sui pulsanti

Ho creato 30 immagini .bmp che ho caricato su 30 diversi pulsanti tramite la
voce 'picture' presente nel menu' 'Aspetto' delle 'Proprieta' di ciascun
pulsante.
Quando eseguo l'applicazione su ogni pulsante che clicco si visualizza un
contorno tratteggiato molto piccolo che rimane sul pulsante fino a quando
non ne clicco un altro.    Il contorno tratteggiato rimane sull'ultimo
pulsante premuto.
Vorrei o eliminarlo o (meglio ancora) non farlo visualizzare mai.
Grazie per l'aiuto.
Stefano.

 wrote in message
7gs0is$720$1...@aquila.tiscalinet.it...


 eventi click dei pulsanti.
Cosi' invece ha funzionato !
Dovro' scrivere qualche riga di programma in piu', pero' il problema e'
risolto.
Se dovesse venirti in mente qualche idea per ottenere lo stesso risultato
tramite le proprieta' del tasto fammi sapere.
Grazie ancora.
Ciao.
Stefano.

> proprietà TabStop dei pulsanti perché scompaia.

Newsgroup: it.comp.lang.visual-basic
Titolo: colore intermedio

avendo 2 colori (RGB o Long č uguale) dovrei ottenere il colore intermedio
come si calcola
č come se dovessi fare la sfumatura tra i due pixel, solo che devo sapere il
valore dell'unico pixel intermedio
--
ciao
- Xaero -
(sostituisci nospam.x con 
inwind.it
 per rispondere)
"Un'idea che non sia pericolosa non
merita affatto di essere chiamata idea"
                Oscar Wilde

 
Bhe, se hai i valori RGB potresti calcolare il punto medio delle singole
componenti.
Per esempio supponi che il colore 1 abbia Red=100 ed il colore 2 Red=200
il punto medio sarà 150. E così via anche per le altre 2 componenti.
Se invece hai un long puoi ricavarne le componenti. Per farlo ti riporto
quanto gentilmente è stato postato ad una mia req da HellBoy:
è sufficiente tenere presente che RGB impacchetta i valori di R, G, B
secondo il seguente formato esadecimale:
    &H00BBGGRR
    00 = non utilizzato
    BB = blue (da 00 a FF esadecimale)
    GG = verde
    RR = rosso
quindi eccoti le funzioni inverse
Function Blue(ByVal rgbRef As Long) As Byte
    Blue = CByte((rgbRef And &HFF0000) \ &H10000)
End Function
Function Green(ByVal rgbRef As Long) As Byte
    Green = CByte((rgbRef And &HFF00&) \ &H100&)
End Function
Function Red(ByVal rgbRef As Long) As Byte
    Red = CByte(rgbRef And &HFF&)
End Function

Newsgroup: it.comp.lang.visual-basic
Titolo: [n3wbie][Variabli] Inserimento in una variabile in una certa posizione

Salve a tutti,
Sto scrivendo un programmino che fra le altre cose deve prendere dei dati da 
un database e scriverli in un file di testo. Fin qui tutto bene tranne per il 
fatto che deve andare a scrivere i dati in una certa posizione. Mi spiego 
meglio. Abbiamo due campi "Nome" e "Cognome" che contengono rispettivamente 
"Mario" e "Rossi". Il mio file di testo deve contenere nella posizione 1 il 
nome, quindi "Mario" e nella posizione 15 il cognome quindi "Rossi". Allora 
il tracciato record del file txt sarà:
"Mario          Rossi". 
Io avevo pensato di mettere tutto in una variabile e poi andarla a scrivere 
in un file di testo. Senonchè non so come risolvere questo problema delle 
posizioni. Qualcuno ha qualche idea?
Grazie.
M:

Ciao,
Option Explicit
Enum DS
    Destra = 0
    Sinistra = 1
End Enum
Private Sub Command1_Click()
    Dim Variabile As String
    Variabile = Formatta("Rossi", 14, " ")
    Variabile = Variabile & Formatta("Mario", 14, " ")
    Variabile = Variabile & Formatta("24", 5, "0", Destra)
    Text1 = Variabile
End Sub
Function Formatta(Testo As String, Dimensione As Integer, Carattere As
String, Optional Allineamento As DS = Sinistra) As String
    If Dimensione <= Len(Testo) Then Formatta = Left$(Testo, Dimensione)
    Select Case Allineamento
        Case Destra
            Formatta = String$(Dimensione - Len(Testo), Carattere) & Testo
        Case Else
            Formatta = Testo & String$(Dimensione - Len(Testo), Carattere)
    End Select
End Function
beppe
-----------------------------------------------------------
Visita il sito del WWF AltoFerrarese
http://www.comune.cento.fe.it/wwfaf
-----------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: abilitare controlli

In una form ho messo all'inizio 2 radio button ( si  e  no ) .
Vorrei che optando per il no , si abilitassero i successivi
campi di inserimento dati, mentre optando per il si questi
campi rimangano grigi .
Non mi funziona il codice...che ho copiato , perchè non so programmare !!
I controlli seguenti son sempre accessibili , anche optando per il si ...:-(
Qualcuno sa aiutarmi ?
Saluti!

posta il codice .. cosi è difficile che qualcuno ti dia una mano ..
(consiglio che mi fu dato anche a me a suo tempo)
[t]Eo
--
|| TORNO SUBITO ||
" .. Sono fuori di testa. Tornerò tra cinque minuti .."

Ciao!
Dunque se non ho capito male, il codice dovrebbe essere cosě:
Innanzitutto crei una matrice di option, inserisci i 2 option in un frame.
Ti crei una Sub che richiami al click dell'option.
Esempio
Sub Controlla
If Opt(0).Value = True Then ' se č selezionato l' option del si, allora la
text1 č disabilitata
    Text1.Enabled = True
ElseIf Opt(1).Value = True Then ' se č selezionato l'option del no, allora
la text1 č abilitata
    Text1.Enabled = False
End If
end sub
e poi la richiami nell'evento del click della matrice degli option, cosě:
Private Sub Opt_Click(Index As Integer)
   Controlla
End Sub
Prova se cosě va bene....
Ciao...Ciao, Kleila
--------------------------------
Inviato via 
http://usenet.libero.it

Fabio Orlandini ha scritto:

for each c in me.controls
    select case 
c.name
        case "opt_si","op_no","pinco","pallo"    '... e tutti quelli da non
toccare (occhio al maiuscolo/minuscolo)
        case else
            c.enabled=iif(opt_no,1,0)
    end select
next c

 ElseIf Opt(1).Value = True Then ' se č selezionato l'option del si, allora


 ha scritto

metti gli altri controlli in un frame.
attenzione, devi tagliarli dal form e incollarli nel frame, non
spostarli solamente.
chiama il frame "frameControlli".
il codice al click sugli option sara' piu' o meno:
    frameControlli.enabled = optNo.value
vedi tu come testarlo e ottimizzarlo.
in questo modo puoi dis/abilitare vari controlli con una sola riga di
codice.
ciao

Inizierň con il  provare la tua soluzione.
Un'ultima domanda: nel codice in che sequenza metto il richiamo alla Sub,
prima o dopo il  suo codice  ?
Dopo come hai scritto tu nel post ?
ciao e grazie e tutti.

 Dopo come hai scritto tu nel post ?
La sub devi richiamarla nell'evento click della matrice option.
Per un maggiore ordine nel codice, puoi prima richiamarla e sotto scrivi la
procedura.
Cmq č uguale se scrivi prima la sub e poi la richiami nell'evento click.
L'importante č una volta creata, richiamarla nell'evento click della matrice
option.
Spero di essere stata chiara! :)
Fammi poi sapere...
Ciao...Ciao!


 codice.
Vero e giusto, ... ma non diventano grigi... e l'occhio (dell'operatore)
vuole la sua parte ... ;-)

 vuole la sua parte ... ;-)
    Static b As Boolean
    b = Not b
    Frame2.Visible = b
seno' forse lavorando sul .container e/o .backcolor dei controlli, ma
si fa lunga.
Newsgroup: it.comp.lang.visual-basic
Titolo: Costanti dei controlli, a che servono????

Consultando l'help del VB4 ho visto che tutti i controlli posseggono
un gran numero di costanti che si riferiscono ad  alcune
caratteristiche dei controlli stessi  (es. allineamento del testo
all'interno, ecc.) che non sono impostabili  con le proprietą
dell'oggetto. Ma, visto che nell'help non ho trovato nulla di preciso
in proposito, mi chiedo (e vi chiedo...): č possibile usare queste
costanti per modificare le carattersitiche a cui fanno riferimento
utilizzandole nel codice? e se č possibile, come si fa?
Grazie a tutti in anticipo.
----------
Stefano

utilizzandole nel codice? e se è possibile, come si fa?
[...]
In alcuni casi le costanti sono tremendamente comode.
Ad esempio per i colori, invece di usare
Text1.BackColor = &H000000FF&
puoi usare
Text1.BackColor = vbRed
che permette un più immediata interpretazione del codice.
Altro esempio è l'allineamento di una picture in un form:
usare
Picture1.Align = vbAlignLeft
è più leggibile che usare il suo valore
Picture1.Align = 3
Ciao
--
-
MIX (VB5SP3)
post...@yahoo.com
110 links ai siti VB
http://www.tempolibero.com/user/mix/
 (consigliato)
http://space.tin.it/computer/gaais
  (alternativo)
-

Newsgroup: it.comp.lang.visual-basic
Titolo: Piu' icone associate ad un applicazione

Ciao a tutti,
volevo sapere come si fa ad associare piu' icone ad un'applicazione
utilizzando VB.
Le icone si selezionano puntando il mouse sull'applicazione (.exe) e
premendo il tasto dx per andare nelle proprieta' e quindi premendo il tasto
"cambia icona". Un esempio puo' essere visto con winzip.exe che contiene
almeno 10 icone diverse.
Qualcuno mi ha parlato di utilizzare il file di risorse ma questa soluzione
mi sembra non applicabile al VB ed e' poi "arcaica".
Mi fate sapere come si fa con VB?
Vi ringrazio in anticipo e vi saluto
Ciao
Marius

mi sembra non applicabile al VB ed e' poi "arcaica".
La soluzione _e'_ applicabile da VB e _non_ e' per niente arcaica, ma
un procedimento standard nelle applicazioni windows serie.
Q194409 - SAMPLE: RESFILE.EXE Stores Any File Type in a Resource  file
support.microsoft.com/support/
 kb/articles/Q194/4/09.ASP 
-- 
hth, hal

 mi sembra non applicabile al VB ed e' poi "arcaica".
Arcaica?
Ma hai provato?
ti sei documentato?
intanto guardati su MSDN
loadresstring
loadrespicture
loadresdata

 ha scritto nel messaggio
news:Db0p9.9873$%M1.2...@twister2.libero.it...


 ha scritto nel messaggio
news:ao23fe$i9iik$1...@ID-56381.news.dfncis.de...

a cercare resfile.exe in
http://download.microsoft.com/
si scopre che hanno gia' aggiornato il tutto:
http://www.microsoft.com/downloads/release.asp?ReleaseID=40741&area=se
arch&ordinal=1
--
ciao, j.

arch&ordinal=1
doh!
-- 
ciao, hal

 
http://www.microsoft.com/downloads/release.asp?ReleaseID=40741&area=se
Cioè davvero, non ho ancora visionato, ma me l'immagino già, dovrò
prepararmi ad un'altra puntata di microzoz, l'azienda del circo equestre.
Newsgroup: it.comp.lang.visual-basic
Titolo: Aggiornamento a .NET

Ho trovato questa promozione...
http://www.microsoft.com/italy/msdn/vstudio/promo/default.asp
Non ho in scheduling il passaggio a .NET ... ma prima o poi ... 
Cosa ne pensate ?
PS non lavoro per loro :) sono solo indeciso se fare l'upgrade del pacchetto
subito o no

 
http://www.microsoft.com/italy/msdn/vstudio/promo/default.asp
L'avevo letto.... anche io non so per ora. Diciamo che sto riscrivendo 
ora le mie applicazioni col vb 6 datoc he tra vb4 e vb7 il passo era 
troppo grosso ed il tempo non e' dalla mia parte.
Sto riscrivendo il tutto attenendomi alle senglaazioni per l'upgrade a 
vb.net
.
Poi quello che ci sara' da modificare si vedrà.
Saluti
-- 
Vincent
VB6+SP5 Windows 2000 SP3
MSDE 7

 
vb.net
.
"Upgrade" per il passaggio da VB6 a NET mi sembra decisamente un parolone.
Rassegnatevi a dover riscrivere da zero tutte le vostre applicazioni.
Ciao

Rassegnatevi a dover riscrivere da zero tutte le vostre applicazioni.
Forse e' Microsoft che si deve rassegnare ad aspettare che maturino i
tempi per applicazioni totalmente nuove (ma quanto? nihil sub sole
novi * ). Eventuali restrizioni di budget da parte dei committenti
certo non aiutano.
-- 
ciao, hal
* = no, non vuol dire che ci sono nuvole solo a Novi :-P

Newsgroup: it.comp.lang.visual-basic
Titolo: Modicare campi con relazioni attive

Vorrei modifcare le proprietą di un campo di un database access tramite ado, 
ma tale campo ha delle relazioni che lo legano. E' possibile disabilitare le 
relazioni e poi riabilitarle?
Verrei farlo da codice.
Per la modifica del campo uso il seguente comando
ADB.Execute ("ALTER TABLE CLIENTI ALTER COLUMN id_cli CHAR (4)")
Come potrei fare?

 Vorrei modifcare le proprietà di un campo di un database access tramite

ho affrontato il problema, una volta.....un vero casino....
l'unico modo, anche via ADO, è quello di smontare le relazioni, modificare
il campo, e poi di rimontarle....
in pratica (e molto, molto, ma molto superficialmente) usavo una collection
pieni di oggetti Relation. popolavo la collection con tutte le relation che
dovevo cancellare, poi le cancellavo fisicamente, modificavo il campo, e poi
usavo la collection per rimettere in piedi le relazioni.
occhio che l'oggetto Relation di ADO è un oggetto complesso: ti serve
memorizzare tutte le proprietà per riallacciare la relazione......
avevo una funzione pronta, ma quando l'ho scritta ero in un'altra società e
non ho più il codice a disposizione.
-- 
Alletun
---
"May the Force be with you..."

 società e non ho più il codice a disposizione.
Argh..... Farò a mano!
Grazie comunque
Newsgroup: it.comp.lang.visual-basic
Titolo: Anteprima di stampa

Cerco qualche soluzione ( veloce ) per implementare l'anteprima di stampe
fatte usando l'oggetto PRINTER, senza usare cristal report o componenti dal
dubbio funzionamento.
Qualcuno ha qualche suggerimento??
Grazie
						Peppe

Nel sito comune puoi trovare la mia libreria.
http://www.murialdo.it/it_lang_vb
Non so se sia di dubbio funzionamento, ma il la uso ogni volta che devo
stampare.
Con anteprima (zoomabile), stampa di immagini, ecc.
In pratica la uso per qualsiasi tipo di stampa.
Ha qualche limite, ma è solo codice e può essere modificata a piacere.
Si chiama PrnPrv3 (la trovi anche da me).
http://www.chiappori.net
ciaooooooooooooo
--
;) G. Chiappori (ICQ 30904878)
webm...@chiappori.net

Newsgroup: it.comp.lang.visual-basic
Titolo: nome Window

se ho aperto tante finestre, come posso individuare una singola finestra?
Forse con l'API FindWindow?
Come faccio a sapere il nome della finestra?
Grazie.

 ha scritto nel messaggio
news:9vpkb6$831$1...@nreada.inwind.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: ADO DATA CONTROL e ACCESS (ADODC1)

Mi dite dove poter trovare un esempio di questo controllo activex (ado
data control) ...completo ,cioč:
Dovrei collegarmi ad un db access visualizzare i campi in text-box( e
fin qui tutto ok) ma poi anche
aggiungere,cancellare
 
e  spostarmi tra i record senza che il tutto si pianti (come fa ora)
Grazzie a tutti quelli che mi risponderanno  
buon ferragosto a tutti tutti
Ciao
g...@tim.it
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

se vuoi ti mando il sorgente di un buon programma che lavora con ADODC,
E' semplice e si capisce molto, se vuoi te lo mando, ok?
ciao e buone vacanze a tutti (se c'andate a differenza mia)

saresti gentilissimo....lo aspetto.....
grazzzzzzie


 grazzzzzzie
anche io lo aspetto , ma quando arriva sto eurostar delle 13?
:p
Newsgroup: it.comp.lang.visual-basic
Titolo: IMPORTANTE: Timer

Ho bisogno urgente di trovare un sistema per far apparire sul mio pc un
messaggio, o un suono, ogni tot minuti, ad esempio ogni quarto d'ora.
Voi direte che basterebbe creare una piccola applicazione. Io però ho
bisogno di qualcosa di "sicuro": Per meglio capirci sul pc in cui ho
bisogno di avere questo "timer" non posso installare nessun programma.
Quindi mi sevrirebbe un timer che faccia già parte del sistema operativo
oppure una qualche macro per word, ad esempio.
Spero che abbiate compreso il mio problema e che possiate aiutarmi.
Saluti,
Stefano.

 oppure una qualche macro per word, ad esempio.
puoi usare le operazioni pianificate.
Sotto NT (non so sotto 9x) esiste anche il comando dos AT sicuramente
presente per settare le operazioni pianificate di sistema.
Ciao

 ha lasciato detto:


Ho provato con operazione pianificate sul mio windows 98 ma posso
settare solo il giorno, non l'ora. Ma su NT è forse diverso? 
Grazie e a buon rendere,
BelthaZor
--
"Virus: qualcosa di gratuito che si diffonde velocemente e fa' funzionare male i Computer; 
Prodotti Microsoft: qualcosa di costoso che si diffonde velocemente e fa' funzionare male i Computer"

 settare solo il giorno, non l'ora. Ma su NT è forse diverso?
Questo non è il NG adatto, comunque mi risulta che si possa settare anche
l'ora e il minuto per le operazioni pianificate.
Sicuro di aver controllato bene?
Ciao

Se puoi scrivere una macro di Word allora il gioco è fatto attraverso le
funzioni API SetTimer e KillTimer
Dopo aver definito le funzioni con le opportune dichiarazioni puoi scriver
un codice come segue:
        Sub StartCount()
            Dim R as Long
            Const MY_INTERVAL = 900000
            R = SetTimer(hWnd, 1, MY_INTERVAL, AddressOf TimerProc)
        End Sub
        Sub StopCount()
            Dim R as Long
            R = KillTimer(hWnd, 1)
        End Sub
        Sub TimerProc()
            ' Inserisci qui il codice
            ' che deve essere eseguito ogni volta
            ' che scade il timer
        End Sub
Ricorda che la funzione TimerProc deve essere definita pubblica su un modulo
esterno.
Tutto ciò può essere tranquillamente fatto in Word proprio come in VB.
Prova!!!
Gemini.
Newsgroup: it.comp.lang.visual-basic
Titolo: leggi file su e giu

ciao a tutti, ho necessità di aprire un file csv e poterlo scorrerlo in giu
ed in su identificando la specifica riga.
cosa mi consigliate?
apro il file con una open lo memorizzo in un array e poi lo chiudo ?
carico il file in un controllo rtf (ma come mi scorro le righe?) ?
cos'altro ?
grazie.

 wrote in message
4Yy57.137091$cd.7...@news1.tin.it...

apri il file in input, leggi una riga alla volta con "line input"
e la metti su un controllo listbox.
CIAO!

 cosa mi consigliate?
guarda la funzione seek sulla guida
dovrebbe fare al caso tuo
Ciao
Enrico

 wrote in message
news:4Yy57.137091$cd.7...@news1.tin.it...


 cos'altro ?
Nulla :)
Dato che potenzialmente devi leggertelo tutto ti conviene probabilmente
metterlo in memoria; se invece e' molto grande puoi aprirlo form binary e
scorrerlo ogni volta, ma solo se devi fare pochi accessi altrimenti il primo
metodo e' di nuovo il migliore.
Ciaotutti,
*

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] maskedit ed evento validate

Secondo voi è un baco il fatto che l'evento validate di un controllo
MaskEdit non viene invocato se nell'evento keyup scrivo
AltroControllo.setFocus.
Premetto che se inceve di dare il focus ad un altro controllo tramite codice
ci faccio click l'evento validate viene invocato.
Ho provato anche a cambiare il focus con sendmessage pensando di riprodurre
fedelmente il click del mouse ma niente.
Per favore datemi una spiegazione.
Ciao e grazie

 Per favore datemi una spiegazione.
Non ti do' una spiegazione, ma un consiglio:
non usare MaskEdit, lascialo perdere, usa una textbox.
	Lore.

 AltroControllo.setFocus.
Infatto come riporta anche Francesco Balena che ha scritto -il principe- dei
manuali di VB (tra l'altro indiscrezioni lo danno in edizione super
economica a 10K lire!)
Validate non viene generato in questo casi... Non ti rimane che richiamare
la funzione controllo_Validate quando fai la setfocus... :(
        Ciao
                Allanon

 > Secondo voi č un baco il fatto che l'evento validate di un controllo


 soluzioni, ciň non toglie che sia un baco del controllo.......
Mentre la guida ufficiale di Microsoft scritta da Balena... dice che
occurre... ma non se passi ad altri controlli con setfocus... :)
            Ciao
                    Allanon

Newsgroup: it.comp.lang.visual-basic
Titolo: Esportazione in formato MAV

Ciao a tutti.
Qualcuno ha esperienze in merito all'esportazione di dati in formato MAV per 
le banche?
Ho il tracciato record ed ho già eseguito il software di esportazione, ma ho 
un dubbio relativo al record di tipo 59 (riferimenti al debito).
C'è qualcuno in grado di aiutarmi?
Grazie.
--
Skysurfer 

 ha scritto nel messaggio 
news:rbtii.54708$%k.18...@twister2.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: join

Come bisogna usare il comando join per collegare due tabelle di un
database, in modo che le modifiche apportate ad una vengano automaticamente
apportate sull'altra e viceversa. Le due tabelle hanno gli stessi campi.
Grazie.

Tiziana Magellano ha scritto nel messaggio
<01bdb599$0bc49be0$6ac1d8d4@default>...

Se riesci a spiegare un po' meglio quello che devi fare...
Cosi' non e' molto chiaro.
Comunque il JOIN serve per unire due tabelle "in orizzontale", ossia
SELECT A.*, B.*
FROM A INNER JOIN B ON (
A.ID
 = 
B.ID
);
da' come risultato una tabella con tracciato record = campi di A e campi di
B
(INNER JOIN -> prende tutti i record di A e B dove 
A.ID
 = 
B.ID
)
La JOIN non serve per ripetere le modifiche da una tabella ad un'altra...
Se queste cose le sapevi gia', scusa, ma non mi e' chiaro il tuo problema...
P.S. "Le due tabelle hanno gli stessi campi."
E' una struttura voluta cosi'? Perche' sono uguali? Potrebbe essere un
difetto concettuale nella strutturazione del database...
--
Roal Zanazzi
z...@iol.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Nascondere un programma dalla barra

Come si puo' fare ? Dovrei utilizzare le funzioni getwindow e showwindow ?
Purtroppo non riesco .. qualcuno puo' aiutarmi ?

 Purtroppo non riesco .. qualcuno puo' aiutarmi ?
se per 'barra' intendi quella del menu avvio basta che imposti, da
progettazione, la proprietą ShowInTaskBar del form a False
Ciao
Faber

Newsgroup: it.comp.lang.visual-basic
Titolo: SEMPRE RIGUARDO INTERNET!!!

E' possibile sapere o meglio esiste un'istruzione che mi indichi i byte
ricevuti dalla connessione?
Se qualcuno lo sa ne sarei immensamente GRATO!
--
E-Mail: 
mar...@libero.it
ICQ: 94557753
Internet:
Qui la tua classifica -->
http://www.geocities.com/SiliconValley/Network/7129/index.html
Qui i trucchi --> 
http://utenti.tripod.it/dj_punk/index.html
Qui le soluzioni --> 
http://digilander.iol.it/DjPunk/sol.html
Qui la home page --> 
http://digilander.iol.it/DjPunk/index.html
Qui il vostro contributo --> 
http://digilander.iol.it/DjPunk/rich.html
Qui le News --> 
http://digilander.iol.it/DjPunk/news.html
__________________________________________________________
Qui puoi provare a guadagnare il sito è tutto in italiano
ed il guadagno non è poi cosi male!!!!
Se volete PROVATELO:
http://www.intelliad.com/?2A18123F
__________________________________________________________

ricevuti dalla connessione?
La risposta la trovi assieme a quelle dell'altro post....
Consiglio: 1 unico post, + domande.
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
---------------------------------------------------------------------------