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

La variabile  ( testo ) contiene un racconto di varie righe in cui è
presente più volte il nome ( Mario Rossi )
Volevo sapere se esiste una funzione che provvede a sostituire dove è
presente tale nome ( Mario Rossi ) con ( Luigi Bianchi )

 presente tale nome ( Mario Rossi ) con ( Luigi Bianchi )
In vb6 Replace e F1

Mi scrivi la funzione considerando che io lavoro con il VB di excel 2003 ?
"Andrea [Work]" <nos...@invalid.invalid> ha scritto nel messaggio
news:vdipuu6eubbz$.1dlhtzmo6vh2v.dlg@40tude.net...


 Mi scrivi la funzione considerando che io lavoro con il VB di excel 2003 ?
La stavo scrivendo, ma ho poi ho visto che in excel se scrivi replace e fai
F1 ti dice tutto.
Descrizione
Restituisce una stringa in cui la sottostringa specificata è stata
sostituita con un'altra sottostringa per il numero di volte indicato.
Sintassi
Replace(expression, find, replace[, start[, count[, compare]]])
La sintassi della funzione Replace è composta dai seguenti argomenti 

"Andrea [Work]" <nos...@invalid.invalid> ha scritto nel messaggio
news:1csqbgpk49pbz.16w8pjaisd6mw$.dlg@40tude.net...

Ho provato cosi ma non effetua la sostituzione:
Riga = "ciao mario rossi"
Riga2 = Replace(Riga, mario, antonio)
Cells(2, 5).Value = Riga2
Mentre injserendo gli altri campi mi dà errore che non trova il separatore:
Riga2 = Replace(Riga, mario, antonio [,1 [ ,-1  [  ,1 ]]])

 Cells(2, 5).Value = Riga2
Se usassi Option Explicit, forse tante cose ti sarebbero piu' chiare... ;-)
Cmq. prova cosi':
Dim Riga    As String
Dim Riga2   As String
Riga = "ciao mario rossi"
Riga2 = Replace(Riga, "mario", "antonio")
Cells(2, 5).Value = Riga2
Ciao!
    Alex

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

salve son Mimmo,
avrrei bisogno di un piccolo aiutino.
Dovrei importare una fototessera e salvarla su dbaccess tramite vb6.
grazie.

 ha scritto

se e' una, guarda l'esempio img_db sul mio sito.
www.sundaysw.com
e' con vb5/acc97, ma dovrebbe andare.
se sono parecchie guarda l'altra mia risposta e pensaci su prima di postare
per la terza volta, per favore. anche sul subject.
j.non.so.come.ho.l'impressione.che.oggi.sia.la.giornata.dei.sordi.-.almeno.3
.al.momento.e.sono.le.10.e.mezza,,,

Newsgroup: it.comp.lang.visual-basic
Titolo: FOCUS dell'oggetto figlio

?Con GetForegroundWindow mi viene restituito l'hwnd della finestra parente
attiva
come faccio a sapere l'hwnd dell'oggetto figlio attivo.
Con EnumChildWindows mi da tutte quelle figlie ma a me interessa solo quella
attiva.
Da notare che SPY è capace di farlo evidentemente vi è un'API che non
conosco.

Usa GetActiveWindow che ti restituisce la finestra attiva....
-----------
Ciao
Sabba

GetFocus() se non sbaglio

Newsgroup: it.comp.lang.visual-basic
Titolo: Controllare se DSN esiste

Ho creato il codice che mi permette di creare un DSN di sistema per il
collegamento ad un DB presente nel server.
Questo codice viene richiamato all'apertura del programma.
Devo impostare che prima di eseguire il codice controlli che quel dsn di
sistema non esista.
Come posso fare?
Ciao
--
----|----|----|----|----|----|----|----|----|----|----|----|----|----|--
Vuoi vedere il mondo a 360°?
www.360net.it

Come posso fare?
Dipende dal codice che hai usato ;-)
-- 
ciao, hal

> Dipende dal codice che hai usato ;-)
Private Sub PulsanteOK_Click()
    Dim ODBCSTRING As String
    Dim RISULTATO As Long
        ODBCSTRING = "DSN= Mio DSN" & vbNullChar
        ODBCSTRING = ODBCSTRING & "DBQ=" & CommonDialog1.FileName &
vbNullChar
        ODBCSTRING = ODBCSTRING & "DESCRIPTION= Mio Database" & vbNullChar
        ODBCSTRING = ODBCSTRING & "PWD= frama" & vbNullChar
        ODBCSTRING = ODBCSTRING & vbNullChar
            RISULTATO = SQLConfigDataSource(ByVal 0&, ODBC_ADD_SYS_DSN,
"Microsoft Access Driver (*.mdb)", ODBCSTRING)
    If RISULTATO <> 0 Then
        MsgBox "Creazione DSN riuscita!", vbInformation + vbOKOnly, "Crea
DSN"
    Else
        MsgBox "Creazione DSN fallita!", vbCritical + vbOKOnly, "Crea DSN"
    End If
    Unload Me
End Sub
Il codice è questo.
Ciao

 "Microsoft Access Driver (*.mdb)", ODBCSTRING)
Potresti tentare di modificare il dsn con il flag ODBC_CONFIG_SYS_DSN: se la
chiamata
fallisce e' molto probabile che il dsn non esista.
In alternativa c'e'
Private Declare Function SQLValidDSN Lib "odbccp32.dll" _
   (ByVal lpszDSN As String) As Long
che restituisce TRUE se il dsn e' valido, altrimenti FALSE in caso di
fallimento.
--
hth, hal
--------------------------------
Inviato via 
http://usenet.libero.it

 fallimento.
Valido in che senso? Io ho messo:
Dim Verifica As Boolean
Verifica = SQLValidDSN("MIODSN")
Text1.Text = Verifica
Mi restituisce sempre vero anche se elimino il DSN.
A me serve che verifichi che quel DSN sia stato già inserito in modo che
all'apertura del programma non mi faccia partire la routine di
configurazione del DSN che ho inserito.
Ciao

 Mi restituisce sempre vero anche se elimino il DSN.
Ed hai ragione, ho fatto la mia quotidiana porca figura :-PP
SQLValidDSN verifica la _validita'_ del nome, non
se esista gia' il DSN.
Sono andato a ripescare un mio vecchio programma
ed ho visto che li' avevo usato l'accesso al registro di configurazione
per sapere quali dsn erano installati.
In pratica, va cercato il dsn sotto
HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\.
Per l'accesso al registry, se non hai codice, dovresti trovare esempi
su msdn e sul sito comune (
http://www.it-lang-vb.net
).
Eventualmente riposta ;-)

Newsgroup: it.comp.lang.visual-basic
Titolo: MTS e WIN2000

Ho installato N DLL su DCOM+ di Windows 2000.
Come faccio ad esportare il pacchetto su macchine Windows98?
Ho esportato ma non riesco a far partire l'installazione sul cliente.

 Ho esportato ma non riesco a far partire l'installazione sul cliente.
Quando esporti un'Application (ex Package per chi conosce MTS ;-)) viene
generato un file .MSI contenente tutti i componenti con i relativi settaggi
dell'applicazione stessa. Questo ti permette di reinstallarla su una seconda
macchina che deve ospitare COM+. Di conseguenza NON è possibile installare
un'Application in Win 9x in quanto su questa piattaforma non è (per il
momento) prevista un'implementazione di COM+.
HTH,
--
Lorenzo Benaglia
24 Ore Personal Finance S.p.A.
Milano
Italy

Newsgroup: it.comp.lang.visual-basic
Titolo: Crystal report 4.5

Ho Inserito nel mio database access una password. Il mio applicativo riesce
ad entrare ma quando mando in stampa il report mi dice che i parametri
inseriti non sono validi..... Qualcuno ha qulche rimedio????

 ha scritto nel messaggio
news:b3Hca.15336$7y3.4...@twister1.libero.it...


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

Ci sono in giro guide cartacee o indirizzi www per reperire informazioni
sull'utilizzo di questo prodotto ??
    Grazie

 wrote in message
wFnR3.10248$yQ.1...@typhoon.libero.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: problema con ocx

posso vedere il codice di un ocx ?
ciao e grazie

 ha scritto nel messaggio
news:39CF66AD...@libero.it...



Se hai i sorgenti, si...
La maggior parte degli ocx sviluppati sono scritti in VC++
-- 
Sidewinder  
---------------------------------------------------------------------
F.S. Fitzgerald to Hemingway:
	"Ernest, the rich are different from us."
Hemingway:
	"Yes.  They have more money."
---------------------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: Routin di ricerca per lotto troppo lenta

Salve ragazzi vi  espongo subito il mio problema:
mi sotto fatto un programmino per il lotto per uso privato , questo deve
ricercarmi ambi terni ecc piu' frequenti in un certo numero di estrazioni
es: voglio ottenere l'ambo su due numeri piu' frequente in 10 estrazioni
allora sviluppo tutti gli ambi e poi li provo uno alla volta sulle
estrazioni (che si trovano in un array)
Quello che volevo sapere e' : non c'e' un modo piu' veloce o metodo
migliore?
perche se uso questo metodo per ricercare la cinquina per ambo piu'
frequente posso anche lasciare il computer acceso e andare in ferie
Grazie per le eventuali risposte
--
Roberto"deko o muteking" Teboni
de...@netbusiness.it
Vuoi guadagnare navigando?
Arruolati in marina

Grazie per le eventuali risposte
a parte il fatto che non so cosa significhi "ricercare la cinquina per ambo
più frequente", credo che tu debba rovesciare l'approccio: anzichè generare
tutti gli ambi possibili e poi cercare quali sono usciti, ti conviene
memorizzare tutti gli ambi usciti in una singola estrazione (con 5 numeri mi
pare che gli ambi siano 10), incrementare un contatore nel caso si
prensentino più volte nelle estrazioni successive, e poi scegliere l'ambo
col contatore che ha il valore più alto. Per le cinquine la cosa è molto più
semplice, dato che per ogni estrazione c'è solo una cinquina realizzatasi:
se ad es. hai 100 estrazioni ti basta controllare che le 100 cinquine siano
tutte diverse o ce n'è qualcuna ripetuta (tempo sprecato...)

Newsgroup: it.comp.lang.visual-basic
Titolo: elenco controlli VB

esiste un sito dove si possono trovare
tutti i controlli esistenti di VB?
grazie Laura

 tutti i controlli esistenti di VB?
tutti ? oppela' !
nei vblinks ne ho elencati un migliaio (di siti, non di controlli).
cerca "ocx".
ciao, a.
--
andrea dot palazzi at tin dot it
free vb/sw: 
http://www.comune.modena.it/cittadini/apal/html/
Newsgroup: it.comp.lang.visual-basic
Titolo: Campi indentità con DAO e SQLServer

Ho un problema contorto proverò a spiegare rapidamente (sperando che
qualcuno ci capisca!).
Non riesco a reperire correttamente i valore dei campi identità nelle
tabelle collegate con ODBC in un mdb.
In un recordset ho un campo identità chiamato ID.
Quando faccio la addnew il campo id non assume un valore ma lo assume, come
peraltro ritengo più corretto, solo dopo la update.
Purtoppo però, dopo la update, il recordset da cui devo reperire il valore
del campo identità mi porta come record attivo il record che
avevo attivo prima della addnew e non riesco a capire come fare ad
individuare quale sia il record che ho appena aggiunto con l'addnew.
Normalmente l'ultimo risulta quello inserito ma se il recordset non è ancora
caricato fino alla fine (con una movelast) e un altro processo
esegue una ulteriore addnew l'ultimo record che verrà caricato dovrebbe
essere quello inserito dall'altro processo e non il mio.
Faccio un esempio:
in access su di una tabella del database, il seguente codice funziona bene
(non è il massimo ma va...):
rs1.addnew
rs2.addnew
rs2!IDRef=rs1!ID
rs1.update
rs2.update
dove rs1 e rs2 sono due oggetti recordset di DAO;
su di una tabella collegata, il precedente codice non funziona perche in
rs1!ID c'è un valore NULL che non mi interessa.
Se scrivo:
rs1.addnew
rs1.update
lID=rs1!ID
in lID trovo il valore del record che avevo attivo prima della addnew.
Aggiungo un po codice di debug per chiarire e indico a lato l'output:
debug.print rs1!ID            -> 100
rs!addnew
rs1.update
debug.print rs1!ID            -> 100
rs1.movelast
debug.print rs1!ID            -> 101
Non sono molto esperto ma anche con ADO ottengo lo stesso risultato.
Boh!

 individuare quale sia il record che ho appena aggiunto con l'addnew.
[cut]
non so se ho capito bene.. ma hai dato un'occhiata alla proprietà
LastModified del recordset?
Ciao
 valter

 essere quello inserito dall'altro processo e non il mio.
[CUT]
No credo che sia come dici tu perche realmente l'inserimento di un nuovo
registro non muove il cursore dal registro attivo ,potresti per esempio
trovarti nel primo registro e inserire un nuovo che viene inserito in forma
"Default" al finale della base dato e eseguento un movenext di ritrovi nel
secondo registro ,per altro non sei obligato ad caricariti un tavola per
inserire un registro quindi e giusto che il cursore non si muova, inoltre e
sempre conveniete aggiornare la tavola dopo un inserimento per poter
ottenere (legessi caricare in memoria ) tutti i nuovi registri inseriti
incluso le modifiche.
Spero che questo ti possa aiutare e se mi sono sbagliato nel concetto che
qualcuno mi tiri le orecchie (Piano)  =|:o)
Ciao L'Oriundo

 ha scritto nel messaggio
news:a8vdnt$c82$1...@newsreader1.mclink.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Compilazione disabilitata

Odio il Lunedi'...
Oggi il VB (VB6 SP5) aveva la voce di menu' "crea <progetto>.exe"
disabilitata. č andata a posto solo dopo aver disinstallato e poi
reinstallato completamente. Mi e' capitato di tutto con il VB, ma questo mi
mancava...
A qualcuno č capitata una cosa simile ? Quali potrebbero essere le cause ?
Nel  caso si ripetesse c'e' un workaround meno traumatico ?
Grazie

io non ne ho idea, perň proverei a compilare il progetto da linea di
comando.....
(si puň fare in vb?....spero di sě!!!)
l'exe in ogni caso parte e in caso di problemi dovrebbe *SEMPRE* dirti
qualcosa......
good coding!!!
--
Damiani Liborio Igor
ig...@igordamiani.it
 - 
dam...@italiainfiera.it
 - 
idam...@hotmail.com
http://www.igordamiani.it
ICQ : 11847262

 Grazie
A me è capitato qualche volta di recente.
Ho risolto in questo modo:
Menù Visualizza / Barre degli strumenti / Personalizza
Nel Tab Comandi, Categoria File, seleziono nella lista dei comandi la voce
"Crea <progetto>..." e la trascino sul menù File nella posizione adeguata.
Poi tolgo dal menù File la voce "Crea <progetto>..." che era già esistente.
Usi per caso Mz-Tools o Smart-Indenter?
Io ho cominciato ad avere questo tipo di problema dopo che ho installato
queste due cose.
Ciao.
Skysurfer

 Skysurfer
Ciao, grazie

 qualcosa......
inguaribile ottimista :)
cmq si trattava della nuova release di un pacchetto oramai in vendita da 3
anni, quindi ero convinto che, qualora fossi riuscito a compilarlo, non mi
avrebbe dato problemi.
grazie

Newsgroup: it.comp.lang.visual-basic
Titolo: Come ci si collega a SQL Server da VB6?

Come da oggetto se qualcuno me lo puň spiegare grazie, eventualmente avrei
bisogno di un esempio pratico che invii un comando sql al database e catturi
la risposta.
Gentilmente se qualcuno puň aiutarmi mandandomi un esempio pratico completo.
GRAZIE 1000
--
Posted from [195.103.102.67]
via Mailgate.ORG Server - 
http://www.mailgate.org

 wrote in message
news:AE8DE151606FD311914D00104B71D96608CE7E@ANTARES...


Newsgroup: it.comp.lang.visual-basic
Titolo: copiare matrici

Visto che non posso assegnare il valore di una marice statica ad un'altra
(es: marice1=matrice2), mi tocca ciclare all'interno di ogni singolo
elemento e quindi procedere all'assegnazione:
dim matrice1(1 to 100) as integer
dim matrice2(1 to 100) as integer
'popola matrice1 con i dati.....snip
dim i
For i= lbound(matrice1) to ubound(matrice1)
    matrice2(i)=matrice1(i)
next i
Ma se ho una matrice bella grossa(chesso' un 100.000 elementi o piu'), non
sarebbe meglio usare un CopyMemory? non farei prima?sarebbe piu' veloce il
programma secondo voi?
Grazie(1000)!
Flippo

 programma secondo voi?
Sicuramente.
Ma un buon compromesso sarebbe dichiarare le matrici dinamiche, farci un
redim e copiarle semplicemente come una qualsiasi altra variabile:
dim matrice1() as integer
dim matrice2() as integer
Redim matrice1(1 to 100)
Redim matrice2(1 to 100)
matrice2 = matrice1
Ciao
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] aggiunta menù

Scusate la domanda stupida, ma come si fa ad aggiungere una voce di menù in
fase di esecuzione? So che bisogna creare la prima voce con indice 0 in fase
di progettazione, ma non sono riuscito a trovare un metodo add per
aggiungere le voci successive. La guida mi dice che è possibile farlo, ma
non mi dice come!
Grazie.

 wrote in message
news:8rk1am$439$1...@newsserver.cilea.it...


 non mi dice come!
Prova con:
Dim i As Integer
For i = 1 To 5
    Load mnuTest(i)
    mnuTest(i).Caption = "Test " & i
Next
Ciao
--
Luca Dormio
luca....@tin.it
luca....@sig-la.com

 di progettazione...
Esatto, il primo Subitem lo devi creare a designtime con Index = 0
utilizzando il Menu Editor e per aggiungere gli items successivi basta
utilizzare lo statement Load, incrementando di 1 l'indice dell'array:
    Load mnuSubItem(mnuSubItem.UBound + 1)
HTH,
--
Lorenzo Benaglia
24 Ore Personal Finance S.p.A.
Milano
Italy

 wrote in message
news:8rk4ns$882$1...@fe1.cs.interbusiness.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: [!] marioh : graph ecc.

http://welcome.to/fastlib
--
********************************************************
* This message transmitted on 100% recycled electrons  *
********************************************************

 --
che bello!! qualcuno che mi dedica delle attenzioni...::)))))))
anf anf... sono appena tornato dal seggio elettorale... ero entrato alle
17... ::)))))
allora, vediamo un po'. questo tuo post capita a fagiolo e puo essere utile
a tanti, ovviamente e non solo a me.
se non sbaglio si parla della stessa fastlib che è uscita da un numero di Io
Programmo, è così?
qualcuno sa per caso quanto costa? io ho scritto in questo momento a Fast,
ma magari qualcuno gia lo sa. ovviamente si tratterà di uno di quei
controlli per i quali, una volta pagato il prezzo, puoi distribuirlo con le
tue applicazioni senza pagare piu nessuna percentuale. si chiamano
royalty-free o sbaglio?
cmq fastlib ha una serie di funzioni veramente interessanti. devo trovare
qualche cliente-pollo che me lo compri... ::))))))
forse ho trovato il cliente-pollo che mi compra il treeview multicolonna
della GreenTree... ihihihihihihih... si vede che ho molto rispetto per
quelli che mi pagano??????
ciao
MarioH

Newsgroup: it.comp.lang.visual-basic
Titolo: Info su Microsoft Forms 2.0 ...

Utilizzo VB6 con SP5 Non ho mai utilizzato i controlli presenti nella
libreria FM20.DLL (quelli relativi alla MS Forms 2.0) e vorrei sapere se
possono essere utilizzati senza problemi, in pratica se con una regolare
licenza VB possono essere inseriti nei propri progetti. Inoltre non ho
trovato documentazione su questi oggetti e vorrei sapere se causano
problemi o se possono essere utilizzati tranquillamente. Ciao e grazie.

mi sembra di no......non so darti una spiegazione valida, ma mi sembra di
aver letto che i Forms 2.0 non sono ridistribuibili, fanno parte di Office,
se non mi sbaglio......
magari attendi lumi da qualcun'altro.....
good coding!!!
--
Igor Damiani
ig...@igordamiani.it
http://www.igordamiani.it
ICQ : 11847262

 ha scritto

Newsgroup: it.comp.lang.visual-basic
Titolo: Opzioni dei vostri programmi

Come da oggetto dove le mettete?
Utilizzate il registro di windows, le inserite in un file apposito (testo o
binario), nel caso di un programma che fa uso di un database utilizzate una
apposita tabella o cosa?
Cosa consiglia la vostra esperienza?
Ciao!
dan...@hotmail.com
pro...@iol.it

...

Se i parametri da memorizzare non sono molti, le opzioni le inserisco nel
registro utilizzando le funzioni del VB, altrimenti utilizzo un file ini
sfruttando le chiamate api per la lettura e scrittura di un file ini. Per
maggiori informazioni sull'utilizzo di quest'ultime, dai un'occhiata al sito
comune 
http://www.murialdo.it/it_lang_vb
Ciao Marco

Dipende molto anche da quello he deve fare l'applicazione e fino a che
punto l'utente puň interagire con l'applicazione. Se vuoi che possa
facilmente caambiare le impostazioni del prog ti conviene usare un file
INI gestendolo attraverso le Api. Se invece le impostazioni devono stare
fuori dalla portata dei meno sapienti mettile nel registro, che
perlomeno č un "pň" piů "difficile" da raggiungere (si fa per dire...)
-- 
May
---------------------------------------------------------
MaySist...@lycosmail.com
Togliere MAYBE
ICQ_UIN: 27234690
---------------------------------------------------------

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

Ciao Raga,
qualcuno sa come si puo' modificare il colore del testo in un controllo
RichTextBox (l'unico colore sulle properties e' quello di background).
In pratica voglio fare un notepad "personalizzabile", ma se posso cambiare
solamente lo sfondo e non il testo il risultato non e' troppo intelligente.
ciao e grazie
Gipo

 wrote in message
8gdfhq$rgu$1...@unlisys.unlisys.net...

prova a cercare nella guida la proprieta' "SelColor"
Ciao
--
Luca Dormio
luca....@tin.it
luca....@sig-la.com

 wrote in message
news:8gdkgh$seo$1...@fe2.cs.interbusiness.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Scrivere JPG e GIF.?

Come fare a salvare file grafici in formato GIF e JPG...
visto che i normali controlli salvano solo in TIF e BMP?
Mi sembra una limitazione notevole per un linguaggio evoluto come Visual
basic....
Evidentemente e' colpa mia.  (eppure le ho provate tutte..controlli Kodak
inclusi..)
Grazie per l'eventuale risposta.
Ezio.
--
Posted from 
pop09-acc.tin.it
 [212.216.176.72]
via Mailgate.ORG Server - 
http://www.mailgate.org

 wrote





 wrote in message


 inoltre i gif e jpg sono compressi e quality-loss
I gif sono quality-loss? Confermi?
Ciao.
Maurizio

No. Solo i J-PEG... i gif sono se,plicemente compressi con algoritmo
LZH.
Ciao!
Luca Menegotto.


 wrote in message
388ffadb...@news.nettuno.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO PASSWORD SU DB ACCESS

Ciao a tutti
come faccio ad aprire una connessione con ADO su un database Access con psw
di protezione, utilizzando il provider Microsoft.Jet.OLEDB.4.0
Vi ringrazio anticipatamente

Vi ringrazio anticipatamente
pas de quoi :-)
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] risoluzione e colori del video

Vorrei sapere se esistone delle librerie per conoscere la risoluzione del
video e i colori di sistema (256, 64K, ...)
Grazie per l'interessamento. bye

video e i colori di sistema (256, 64K, ...)
dai un'occhiata al sito comune
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

Grazie per l'interessamento. bye
Function GetDeviceColorCount(ByVal hdc As Long) As Long
Const PLANES = 14
Const BITSPIXEL = 12
    GetDeviceColorCount = GetDeviceCaps(hdc, PLANES) * 2 ^
GetDeviceCaps(hdc, BITSPIXEL)
End Function
GetDeviceCaps č un'APE (con la "E", singolare!)
Ciao



Inanzitutto ti ringrazio, ma il parametro hdc da passare a
GetDeviceColorCount cosa e'?
Scusa la mia ignoranza!!!
ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: clipboard per i più tosti...

ho questo problema:
ho creato un'applicazione vb che sfrutta terminal server
per far dialogare tramite la clipboard server e client remoto (scambio file
dati compressi tipo zip)
fin qui tutto ok solo che su i client win95 non mi funziona bene, infatti i
file dati (binari) vengono modificati (alcuni byte vengono sostituiti da
altri).
qualcuno ha già affrontato il problema?
se si, vi ringrazio anticipatamente
ciao
p.s. se non sono stato chiaro ditemelo

se si, vi ringrazio anticipatamente
Perchè devi utilizzare la clipboard per lo scambio ?
Come riesci a risolvere il problema della sincronizzazione utilizzando
la clipboard ?

Newsgroup: it.comp.lang.visual-basic
Titolo: Setup Help Me!!!!!

Ho un piccolo problema di installazione della mia applicazione creata con
VB6. Il problema è che quando lancio il setup creato da vb6 dopo aver
copiato i file di vb6 mi viene segnalato che impossibile procedere con
l'istallazione perche' alcuni file di sistema sono in uso ed altri non sono
stati aggiornati...percio' mi consiglia di riavviare il pc o uscire
dall'installazzione.
Cosa posso fare?.......premetto che cerco di istallare il tutto su Windows
2000
Grazie Mille

 ha scritto nel messaggio
news:9crfdu$r5k$1...@sun250.unimi.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Un aiuto esperto per Image

Dim mImg As Image
Dim mNewImg As Image
Dim mStre As Stream
mStre = File.Open("C:\PM\TempTransito\Canon\portrait.jpg",
FileMode.OpenOrCreate)
mImg = Image.FromStream(mStre)
mNewImg = mImg.GetThumbnailImage(mImg.Width / 5, mImg.Height / 5, Nothing,
IntPtr.Zero)
mNewImg.Save("c:\tempdel\miniature\foto.jpg")
Quest'ultima riga mi restituisce un errore,
non c'č nient'altro nel codice.
Dov'č l'errore?
Grazie
Ciao
P.

 Dov'č l'errore?
Qual'č l'errore?
Alberto

 Alberto
Eccezione non gestita di tipo
"System.Runtime.InteropServices.ExternalException" in system.drawing.dll
Informazioni aggiuntive: Errore generico in GDI+.
Sono 2 giorni che provo e riprovo senza esito!


La souluzione è sempre le più semplice!
mancava la directory!!
Grazie
Ciao
P.

Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi con paintpicture e bitblt!

Non riesco a risolvere questi due problemi!!!!
Come posso prendere una bmp con sfondo nero e inserirla in una posizione x,y
di un'altra bmp? non voglio inserire lo sfondo della prima bmp (bordo non
rettangolare).
Ho una immagine in scala di grigi che rappresenta una tenda, e voglio
inserire una jpg in modo che risulti colorata ma non voglio perdere le
sfumature di grigio (le pieghe della tenda), come posso fare? La jpg non
deve subire variazioni di colore.
Grazie di tutto!!!

 wrote


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] pixel/twips/centimetri...

ciao
scusate, ma se io lavoro in centimetri su una picturebox, e poi copiassi la
sua area sulla stampante le proporzioni sarebbero mantenute?
Grazie

 sua area sulla stampante le proporzioni sarebbero mantenute?
Se copi il bitmap (DIB) sě, se ci disegni no.

...

Perfetto, avevo paura del contrario. :)
Ciao, grazie

Newsgroup: it.comp.lang.visual-basic
Titolo: Aprire File

Sorry for my ignorance.
Con questo comando apro Word da VB5 e fin qui ci siamo:
Shell ("C:\MSOffice\Winword\WINWORD.EXE"), 1
Ma se io voglio aprire uno specifico documento di Word che si trova sul
disco C, ad esempio il file Scuola il cui percorso č:
C:\Archivio\Scuola
 come dovrei fare ?
Thank you.

Shell ("C:\MSOffice\Winword\WINWORD.EXE C:\Archivio\Scuola.doc"), 1
ciao e buon lavoro

...


Grazie ad entrambi .
Mauro
Newsgroup: it.comp.lang.visual-basic
Titolo: [API] Text Viewer non mi basta

Sapevo che c'era in rete un programma con i testi di milioni e milioni di
api, qualcuno si ricorda per caso il nome e da dove posso scaricarlo?
Mucio

 api, qualcuno si ricorda per caso il nome e da dove posso scaricarlo?
[...]
Beh, milioni e milioni mi sembra un po' eccessivo...
Comunque sul sito comune trovi tutto.
http://www.it-lang-vb.net/
Ciao,
Carlo.

 Comunque sul sito comune trovi tutto.
Tutto mi sembra un po' eccessivo ;)
Mucio

 [...] Tutto mi sembra un po' eccessivo ;) [...]
^___^
Me la sono cercata...
Ho perso volentieri un altro po' di tempo e ho trovato quest'altro link:
http://www.vb2themax.com/FileBank.asp?PageID=FileBank
(cerca API viewer 2001: io non l'ho ancora guardato con attenzione, ma mi
sembra ottimo).
Ciao,
Carlo.

 api, qualcuno si ricorda per caso il nome e da dove posso scaricarlo?
chek 5.4.2001
http://msdn.microsoft.com/library/default.asp?URL=/library/psdk/psdkref/
alphafunc_3bjm.htm
-- ok
http://www.allapi.net/
-- ok
http://members.xoom.it/cesarerizzi
-- ok
http://www.planet-source-code.com
-- ?
http://www.vbcode.com
-- ok
http://www.internetpiu.com/ari/api/api.htm
-- ?
http://www.vbgreatone.8m.com/vb/api.htm
-- now ---> 
http://www.vbg1.com/
 ---> ??
http://www.vb-world.net/api/
-- ok
http://skyscraper.fortunecity.com/transmission/45/api
-- now ---> vbapi
http://www.vbapi.com/
-- no longer updated but great
http://www.rohitab.com/apimonitor/
-- ok
http://www.cs.virginia.edu/~lcc-win32/
-- win32hlp.exe, 13 mb
http://www.activevb-archiv.de/vb/VBapi.shtml
-- ok, german
http://www.relisoft.com/win32/
-- ok
http://www.astentech.com/tutorials/API.html
-- ok
http://www.vbsquare.com/api/
-- ok
http://www.devpride.com/
-- api tutorial
http://www.hallogram.com/menus/Windows_API_Libraries.html
-- ok
http://www.iseran.com/Win32/FAQ/
-- ok
ftp://ftp.borland.com/pub/delphi/techpubs/delphi2/win32.zip
-- ok, 8 mb
http://www.vbexplorer.com/alltutorials.asp
-- ok

Api Viewer di 
http://www.allapi.net/
Ciao SIMO
--
__________________
www.sasim.net
* Vb è relativamente semplice perchè c'è MSDN: Usa F1 !!
* Server IRC : 
irc.azzurranet.org
 --> Canale: #it_lang_vb
* Sito Comune Ng: 
http://www.it-lang-vb.net
* Manifesto del Ng: 
http://www.it-lang-vb.net/docs/Manifesto.txt
* I vecchi messaggi su: 
http://groups.google.com/



wrote:

ROTFL :-)
Ciao,
Moreno
-- 
sirri at morenosoft dot com
Moreno Sirri VB Site - 
http://www.msvbsite.net
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.it-lang-vb.net
---------------------------------------------------------------------------

Newsgroup: it.comp.lang.visual-basic
Titolo: informazioni ado

E' più veloce un "Do until - loop" con una condizione di ricerca, o
un'esecuzione di una query SQL per la ricerca di un dato all'interno di un
database?
Antonio

 ha scritto nel messaggio
news:voAA7.5270$QL2.1...@news2.tin.it...


 Mono male che ci sono le "persone" come te su questo N.G.
Newsgroup: it.comp.lang.visual-basic
Titolo: Script di creazione vista in SQL Server 2000

Ciao a tutti.
Ho fatto uno script per aggiornare un database di SQL Server 2000 con
l'aggiunta di una vista.
Se eseguo queste istruzioni funziona tutto bene (praticamente verifico
l'esistenza della vista, la elimino se esiste e la ricreo)
if exists (select * from dbo.sysobjects where id =
object_id(N'[dbo].[VW_Prova]') and OBJECTPROPERTY(id, N'IsView') = 1)
DROP VIEW VW_Prova
GO
CREATE VIEW dbo.VW_Prova
AS SELECT * FROM Base
GO
A questo punto volevo modificare lo script per creare la vista solo se non
esiste (senza prima cancellarla). Quindi ho modificato lo script in questo
modo:
if NOT exists (select * from dbo.sysobjects where id =
object_id(N'[dbo].[VW_Prova]') and OBJECTPROPERTY(id, N'IsView') = 1)
CREATE VIEW dbo.VW_Prova
AS SELECT * FROM Base
GO
Ma SQL Server mi risponde con un bel
"Sintassi non corretta in prossimitą della parola chiave 'VIEW'."
Dove sbaglio?
Grazie, ciao!
-- 
Skysurfer

 "Sintassi non corretta in prossimità della parola chiave 'VIEW'."
lo statement CREATE VIEW deve essere necessariamente il primo comando del
batch al quale appartiene, per cui anche
CREATE TABLE dbo.Pippo (
 ID INT NOT NULL
 )
CREATE VIEW dbo.VW_Prova
 AS SELECT * FROM dbo.Pippo
ritorna
Server: Msg 111, Level 15, State 1, Line 4
'CREATE VIEW' must be the first statement in a query batch.
saluti
-- 
Andrea Montanari (Microsoft MVP - SQL Server)
http://www.asql.biz/DbaMgr.shtm
 
http://italy.mvps.org
DbaMgr2k ver 0.8.0  -  DbaMgr ver 0.54.0
(my vb6+sql-dmo little try to provide MS MSDE 1.0 and MSDE 2000 a visual
interface)
--------- remove DMO to reply

 ha scritto nel messaggio
news:2lqddfF...@uni-berlin.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: VB6 e Crystal Report 9

Ciao a tutti,
sto provando a fare dei report con CR 9 ed a lanciarli da VB6
Tutto ok fintanto che il report ed il db sono nella stessa directory.
Infatti da CR setto che il db ed il report sono nella stessa directory
Non riesco a settare a runtime dove si trova il db !!!
Vorrei potergli dire di andarselo a prendere in una certa directory
Mi aiutate ?
Grazie
Francesco

...

In CR 8.5 io faccio cosi' (probabilmente in CR 9 non e' cambiato nulla)
' Variabili Crystal Report
'  - report
Dim Report       As CRAXDRT.Report
'  - tabella (per impostare il DataBaseName)
Dim crxDBT       As CRAXDRT.DatabaseTable
  ' imposto location data base
  For Each crxDBT In Report.Database.Tables
    crxDBT.Location = DbName
  Next
(la variabile DbName contiene il nome del Database, completo di percorso).
Spero ti possa servire.
Ciao

 ha scritto nel messaggio
news:67bc6d38.0409...@posting.google.com...


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

di solito quando si usa una sub main iniziale ?


per esempio quando devi fare un'applicazione senza nessun form
oppure se devi inzializzare delle variabili public prima di lanciare un
form o ancora se devi decidere da programma qual'e' il form iniziale
etc.
ciao superpapio

 wrote in message


Newsgroup: it.comp.lang.visual-basic
Titolo: Scorrere Albero. Urgente

Ciao, ho un treeview e selezionato un nodo, dovrei sapere tutti i figli di
quelo nodo (n livelli).
Mi sapete aiutare ?

 quelo nodo (n livelli).
Credo che l'unico modo sia mediante un ciclo (interrogando Nodo.Parent.Index
o Key o altro).
Ciao,
Carlo.

 quelo nodo (n livelli).
Penso di aver affrontato un caso simile.
Ho costruito una famiglia di nodi,es. per l'ultimo nato:
objNode.Key = "TTT" &  rs!IDChild.
Per leggere i valori dei nodi:
Rileva il numero totale dei nodi
Scorri e fermi dove incontri TTT
Puoi leggere sia il valore Text che Key e il numero di nodo
con il numero di nodo rilevi il padre e puoi leggere sia Key che Text
Rilevi il numero di nodo del nonno che ti permette di leggere sia Key che
Text.
Puoi inserire i dati rilevati in una Flex o in una tabella o ....
giusppeD
Newsgroup: it.comp.lang.visual-basic
Titolo: Spostare un controllo Image con il mouse...

Come si fa a far in modo che quando clicco su un controllo Image
questo mi segua fin quando non rislascio il tasto del mouse?
Il tutto è su di un form.
Non sembra una cosa difficile, ma fatto sta che nn ci sono riuscita.
Grazie in anticipo

 Il tutto è su di un form.
Impostando la proprietà DragMode = 1
--
Dark Hado
This posting is provided "AS IS" with no warranties, and confers no
rights.

 ha scritto

Un Drag&Drop domenicale ... senza Drag&Drop:
'Inserire in una form un controllo Image (Image1) con un'immagine,
'un rettangolo (Shape1) e una Label (Label1) piuttosto ampia
'Incollare il codice che segue
Dim xcorr As Single
Dim ycorr As Single
Dim xiniz As Single
Dim yiniz As Single
Dim xfine As Single
Dim yfine As Single
Dim xinterno As Single
Dim yinterno As Single
Private Sub Form_Load()
    Shape1.Visible = 0
    xcorr = 0
    ycorr = 0
    xiniz = 0
    yiniz = 0
    xfine = 0
    yfine = 0
    xinterno = 0
    yinterno = 0
    Call esponi
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single,
Y As Single)
    xcorr = X
    ycorr = Y
    Call esponi
End Sub
Private Sub Image1_MouseDown(Button As Integer, Shift As Integer, X As
Single, Y As Single)
    Shape1.Height = Image1.Height
    Shape1.Width = Image1.Width
    xiniz = X + Image1.Left
    yiniz = Y + Image1.Top
    xinterno = X
    yinterno = Y
    xfine = 0
    yfine = 0
    Call esponi
    xcorr = xiniz
    ycorr = yiniz
    Shape1.Visible = 1
    Call rettangolo
End Sub
Private Sub Image1_MouseMove(Button As Integer, Shift As Integer, X As
Single, Y As Single)
    xcorr = X + Image1.Left
    ycorr = Y + Image1.Top
    Call esponi
    Call rettangolo
End Sub
Private Sub Image1_MouseUp(Button As Integer, Shift As Integer, X As Single,
Y As Single)
    Shape1.Visible = 0
    xfine = xiniz + (X - xinterno)
    yfine = yiniz + (Y - yinterno)
    Call esponi
    Image1.Left = Image1.Left + (xfine - xiniz)
    Image1.Top = Image1.Top + (yfine - yiniz)
End Sub
Sub esponi()
    Label1.Caption = "Left-Top " & Image1.Left & " - " & Image1.Top & " /
X-Y Corr. " & xcorr & " - " & ycorr & " / X-Y Iniz. " & xiniz & " - " &
yiniz & " / X-Y Fine " & xfine & " - " & yfine
    Label1.Refresh
End Sub
Sub rettangolo()
    Shape1.Left = xcorr - xinterno
    Shape1.Top = ycorr - yinterno
End Sub

 Grazie in anticipo
Prego!
GoodBye By Ged
Newsgroup: it.comp.lang.visual-basic
Titolo: Copia di tabelle

Salve a tutti,
ho creato un db in Access 97 composta da due tabelle, ho poi utilizzato
il controllo data per l'associazione dei dati.
Desidererei sapere se è possibile copiare alcuni record di una tabella in
una terza tabella
se si Come ?
La terza tabella però dovrei crearla solo se si verifica una condizione
tale da determinarne
la necessità. Come posso crearla dinamicamente?
Un pò contorta eh?
Spero di esermi spiegata.
Vi ringrazio anticipatamente e ringrazio tutti coloro che hanno risposto ai
miei precedenti S.O.S.
Anna Maria -
aia...@tin.it
--
Posted from 
mta03-acc.tin.it
 [212.216.176.34]
via Mailgate.ORG Server - 
http://www.mailgate.org

Ciao, spero di aver capito bene....
prendiamo come sorgenti le tabelle: 'Tab1' e 'Tab2' del database 'Db1', associate rispettivamente ai controlli 'Data1' e
'Data2'.
Ora, se si verifica la condizione (cond=True) vuoi creare la tabella 'Tab3' nello stesso database, composta da (per
esempio) due campi, di cui uno proveniente da 'Tab1' e l'altro da 'Tab2':
Esempio:
'Tab1' è formata dai campi 'CampoA' e 'CampoB'
'Tab2' è formata dai campi 'Campo1' e 'Campo2'
La 'Tab3' verrà creata con i campi 'CampoA' e 'Campo2'
Allora prova a far così:
'Nella sezione dichiarazioni inserisci:
Dim dbase As Database
Dim rst As TableDef
Dim rst1 As Recordset
If cond = True Then
 
    Set dbase = OpenDatabase("c:\db1.mdb")	'Apre il DB
    Set rst = dbase.CreateTableDef("Tab3")	'Crea la Tabella
    With rst
        .Fields.Append .CreateField("CampoA", dbText)	'Aggiunge i campi (in questo caso di Testo). Nota che potevi
        .Fields.Append .CreateField("Campo2", dbText)	'anche cambiare il loro nome...
    End With
 
    dbase.TableDefs.Append rst		'Aggiunge la tabella al DB
 
    Set rst1 = dbase.OpenRecordset("Tab3")	'Apre la tabella
 
    Data1.Recordset.MoveFirst	'Nel tuo caso spostati al record che devi copiare
    Data2.Recordset.MoveFirst	'Nel tuo caso spostati al record che devi copiare
 
    rst1.AddNew
        rst1("CampoA") = Data1.Recordset("CampoA")	'Aggiunge il record in base al valore del campo corrente
        rst1("Campo2") = Data2.Recordset("Campo2")	'dei due controlli Data
    rst1.Update
 
End If
'Eventualmente, per eliminare la tabella creata usa_
dbase.TableDefs.Delete "Tab3"
Era quello che volevi?
Ciao,
#sirri#@
tin.it
(togliete "#" dall'indirizzo)
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] dove trovo una chat per i programmatori VB

Dove la trovo ? ma sopratutto accetterebbero di dialogare con un
programmatore dell'era paleozoica che arriva da VB 3.0 !!! ?

 wrote in message
jwQz5.10155$3R6.1...@news.infostrada.it...


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

Ciao a tutti.
Qualcuno sa come si possono inserire GIF animate in un form VB.
Grazie.
OO-------------------------------------------------------OO
ce...@mail2.dex-net.com
www.freeweb.org/motori/Moto-Vere
OO-------------------------------------------------------OO

Credo cisia qualche cosa sul sito comune.
Oppure cerca in 
www.activex.com
Ciao
CERE ha scritto:

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Dir Size

Ciao a tutti,
qualcuno sa se e' possibile (tramite API o comando), ricavare la dimensione
di una directory, senza dover iterare su tutti i suoi file ?
La funzione FileLen ritorna 0 per una directory!
Grazie a tutti
ciao
Gipo
gi...@fantastic.ch

 ha scritto nel messaggio
news:8fe8br$9qk$1...@unlisys.unlisys.net...


 wrote in message
news:%ZxS4.204$535....@news.infostrada.it...


 ha scritto


 ha scritto


codice window in questione -- traduzione di un programma in c++ (mi dispiace
non lo conosco)
sub calcoladimdirectoryfilesystem(dir() as string) as long
whait()            '//Questo permette di aggiornare.....
for i=1 to mediafiledir()            '//calcola la media dei file che ci
sono nel sistema per ogni direcoy (velocissima....)
    if fileexist(dir) then
        dim=dim+unpo()+arrotondaeccesso()        '//Sta sul prudenziale
        whait()        '//Questo permette di aggiornare Gestione Risorse
    end if
next
calcoladimdirectoryfilesystem=dim
if dim >10000 then makeGPF()        '//Per stare sul sicuro
end sub
I commenti sono stati aggiunti per errore da un programmatore ubriaco che
non se ne era accorto..
---------
Ciao
Sabba

 ha scritto nel messaggio
news:38510...@news.megasys.it...


 ha scritto

Newsgroup: it.comp.lang.visual-basic
Titolo: VB6.SP6 come controllare righe di stampa in una pagina

VB6.SP6
Non sono bravo in materia.
domando:
se e com'� possibile controllare il numero di righe da stampare in una 
pagina ?
Grazie per l'aiuto.
Cordiali saluti a tutti
giap

 pagina ?
Se stai parlando di stampare con i metodi base "Printer.Print" ecc...
devi gestire tu la cosa, se non ti vanno bene i salti di pagina
automatici (quindi calcolando in base alle coordinate correnti, alla
dimensione complessiva della pagina, a quelle del font che vai a
stampare di volta in volta ecc...)
Se pari invece di oggetti di terze parti, Crystal Report e compagnia
bella, specifica meglio...

 ha scritto nel messaggio 
news:56b5ebfb-749c-43a9...@s31g2000yqs.googlegroups.com...


 ha scritto nel messaggio 
news:4b18f4d5$0$8855$4faf...@reader5.news.tin.it...

Una soluzione per organizzare la stampa con l'oggetto "Printer",
� impostare la propriet� ScaleMode in mm, poi utilizzare le
propriet� CurrentY e CurrentX per scegliere il punto della pagina
dove stampare i record sia in colonne o spazi liberi.
Sicuramente per ogni pagina ci sar� il titolo, il numero di pagina,
e le etichette dei record da stampare che saranno contenuti in
una routine da richiamare ad ogni cambio di pagina.
Quindi fatte le debite prove salteranno fuori il numero di
righe per pagina che nel ciclo di stampa dovr� provocare il
cambio di pagina.
Naturalmente, � necessario che gli spazi di stampa dei record
siano proporzionati, altrimenti si creano delle sovrapposizioni
o salti di riga.
Questo � quanto espresso in modo sintetico
Saluti
JS 

 Grazie dell'aiuto.
Mettili in un file di testo tabulazione, csv, excel o simili e poi dovresti
poter usare un software di reportistica configurando come datasource il tuo
file.
Nel tuo caso farei un file testo e tabulazione come .xls, lo aprirei con
shellexecute (excel o Calc) e lo farei stampare poi al cliente, che magari
si customizza come vuole.

Newsgroup: it.comp.lang.visual-basic
Titolo: accesso ai file

chi mi potrebbe spiegare come faccio da VB ad accedere ad un file e a
modificarlo?
mi basta sapere come trovare le spiegazioni sulla guida in linea, ma forse
sono talmente impedito che non ci riesco, eventualmente se ci fosse un sito
con un esempio già fatto sarebbe il massimo.
io devo modificare un file di access, ma non so da che parte iniziare, mi
potete consigliare?
se mi dite dove posso trovare delle info è meglio, così non rompo troppo le
scatole, grazie mille per il prezioso aiuto
-------
@le§§i°
-------

Per modificare un file MDB devi usare i controlli di VB DataControl.
C'e' un po' di lavoretto da fare non e' immediato.

grazie, mi potresti dare due dritte? Oppure esite da qualche parte qualche
cosa di già fatto per darci un'occhiata, almeno per avere una vaga idea su
come procedere, poi per gli approfindimenti me l'arrangio da me.
grazie per la risposta
-------
@le§§i°
-------

Newsgroup: it.comp.lang.visual-basic
Titolo: potete aiutarmi nell'uso della griglia ?

Ciao a tutti,
                      premetto che sono principiante nella programmazione e
mi scuso se chiedo cose che per voi sono semplici:
Quando utilizzo una griglia tipo exel in VB (per esempio mettendo una
griglia msflexgrid che fa parte degli activex presenti nel pacchetto di VB)
riesco a scrivere nelle caselle con il codice, ma vorrei che quando parte il
programma ogni casella fosse editabile con il programma in funzione
direttamente dall'utente, più o meno come in excel, invece pare che le
caselle siano modificabili solo dal programma e non dall'utente: potete per
favore suggerirmi una strada per risolvere il problema?    Grazie

direttamente dall'utente, piů o meno come in excel, invece pare che le


Newsgroup: it.comp.lang.visual-basic
Titolo: Crystal Reports.

Come si crea la connessione al database MSDE ?

 Come si crea la connessione al database MSDE ?
dimenticavo: uso crystal reports 7

oltre alla connessione a cr7, dovrei preparare anche una stampa di codici su fogli di etichette.
tipo: da 00000001 a 00000100
i codici non sono nel db, ma verranno aggiunti via via si utilizzano i codici stampati.
come procedere?
si può creare un report senza collegarlo a nessuna fonte di dati e dirgli di stampare una sequenza di codici numerici?
in questo momento non ci sto riuscendo.
spero in un aiuto da parte vostra. nel frattempo torno a cercare la soluzione.
se avete altre proposte tipo word, ecc.. sono ben accette.
pensavo pure di fare una stampa da pagina html generata in automatico dal programma..
però devo stampare il codice a barre del testo, quindi l'idea è scartata :o)

Newsgroup: it.comp.lang.visual-basic
Titolo: Ripara database

Salve a tutti
Esiste un metodo per riparare un database (.mdb '97) utilizzando una
procedura diversa da
"DBEngine.RepairDatabase".
Grazie

esiste un tool su m$ che esegue la riparazione del DB e dovrebbe essere piu'
lasco nel prendere i dati del compact

lasco nel prendere i dati del compact
Possiede qualche informazione piů precisa ?
Grazie
Newsgroup: it.comp.lang.visual-basic
Titolo: risorse di rete

Ciao,
    con VB6 vorrei mettere i nomi dei pc in rete su una listbox. Come fare?
    sò che c'è un comando da prompt di comandi (net user) che ritorna tutti
i nomi ma come posso richiamarla in VB6? con shell non funziona perchè non
ritorna niente. sapete voi?
grazie

"-- El Cifi --" <mioCo...@mioDominio.miaNazione> ha scritto nel messaggio
news:bspamm$7cp$1...@lacerta.tiscalinet.it...

Se non sbaglio, il comando per vedere i nomi dei pc di una rete è "net view"
Puoi ricorrere ad una cosa del genere:
Esegui Shell passandogli il comando Net View > c:\RisorseRete.txt
Dopodichè:
Open "c:\RisorseRete.txt" For Input As #1
Do While Not EOF(1)
    Line Input #1, RigaFile
    If Mid(RigaFile,1,2) = "\\" Then
        ListBox.AddItem Trim(Mid(RigaFile,3))
    End if
Loop
Close #1
Spero di essere stato chiaro.
Ciao, Vincenzo

ti ringrazio, cmq ho trovato una funzioncina che usa le API che butta i nomi
di tutti gli utenti su una listbox.
Proprio fatta apposta per me.
il sito è fatto molto bene e c'è parecchio codice in vb. il sito è
http://www.mvps.org/vbnet/index.html
 io ho guardato solo la sezione
riguardante il networking.
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Problemino di un principiante!

Salve,
chi mi sa dire come fare per aprire una file .exe in un progetto vb?
Grazie
--
run...@adria.it
www.pianeta.com/-/Antonello

Intendi dire eseguirlo?
Dai un'occhiata alla funzione Shell nella guida in linea.
Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)

...


Allora scrivi:
Shell("Mioprogramma.Exe", parametro)
dove parametro è uno dei seguenti valori:
vbHide			Esegui con finestra nascosta
vbNormalFocus		Esegui con finestra normale avente il fuoco
vbMinimizedFocus	Esegui minimizzata
vbMaximizedFocus	Esegui ingrandita
vbNormalNoFocus	Esegui normale senza fuoco (l'applicazione corrente resta attiva)
vbMinimizedNoFocus	Esegui ridotta a icona senza fuoco.


...


vbNormalFocus) ???
Perchè Shell è una funzione, cioè rende un valore.
var=Shell("explorer.exe \",vbNormalFocus)

Grazie ci sono riuscito!
--
run...@adria.it
www.pianeta.com/-/Antonello
