mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: caricare NOTEPAD col file .txt

Da un'applicazione vorrei poter richiamare NOTEPAD o altro EDITOR di
semplice lettura ASCII senza problemi di "out buffer o simili" se
relativamente maggiore di 32kb, facendo in modo che mi legga direttamente la
path di un file pippo.txt appunto da editare e salvare al volo.
Qualche consiglio?
Grazie
Franco

 ha scritto

ho mandato via oggi un mail riguardo write.
te lo accludo. facci gli adattamenti del caso.
nb: il limite di notepad dovrebbe essere (in win9) 64k.
ciao, a.
--------------------
apri un nuovo vbp. in form1 incolla il codice in calce a questo mail.
command1 -> caption = shell. command2 -> shellexecute.
metti un prova.rtf (magari piccolo, cosi' non ci mette troppo ad aprirlo)
nella stessa directory.
con 1 apre write. con 2 l'exe associato all'rtf, che da me e' word. se da te
e' write avrai lo stesso risultato.
in pratica con shell devi ricostruire la linea come se la scrivessi al
prompt:
    c:\>write.exe c:\percorso\prova.rtf
quindi dopo "write.exe" ci va uno spazio. cfr il codice sotto.
--------------------
Option Explicit
Private Declare Function ShellExecute Lib _
    "shell32.dll" Alias "ShellExecuteA" _
    (ByVal hwnd As Long, ByVal lpOperation As String, _
    ByVal lpFile As String, ByVal lpParameters As String, _
    ByVal lpDirectory As String, ByVal nShowCmd As Long) _
    As Long
Const SW_SHOWNORMAL As Long = 1
Const SW_SHOWMAXIMIZED As Long = 3
Const SW_SHOWDEFAULT As Long = 10
Private Sub Command1_Click()
    Dim lRet As Long, fName As String
    fName = App.Path & "\prova.rtf"
    lRet = Shell("write.exe " & fName, vbNormalFocus)
End Sub
Private Sub Command2_Click()
    Dim lRet As Long, fName As String
    fName = App.Path & "\prova.rtf"
    lRet = ShellExecute(Me.hwnd, vbNullString, _
        fName, vbNullString, CurDir, 1)
End Sub

Newsgroup: it.comp.lang.visual-basic
Titolo: Query a campi incrociati

Salve a tutti.
Vorrei sapere come realizzare query a campi incrociati con sql server 7.
ho provato la sintassi di access 2000 ma non funziona.
dove posso trovare info?
Grazie. ciao :-))

Devi studiarti Data Warehousing.
E' una mazzata ma, se devi usarle spesso, il risultato ripaga la fatica.

 wrote in message
95e8fe$1vc$1...@fe2.cs.interbusiness.it...


Non lo so in rete, io ho fatto un corso e mi hanno dato un libro ("Microsoft
sql 7 Data Warehousing Training", Microsoft Press), ben fatto

 wrote in message
95edeu$s9$1...@fe1.cs.interbusiness.it...


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

..perchč estraendo una porzione di un'immagine a 8 bit da una PictureClip il
controllo mi restituisce un'immagine a 16 bit?
Grazie ciao

...

Azzardo...  Forse xche' hai il video impostato a 16 bit?
Prova a impostarlo a 8 e riprova...
Ciao
By -MES-   Maronese Ettore
http://www.maronese.com/mes
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://www.murialdo.it/it_lang_vb
Newsgroup: it.comp.lang.visual-basic
Titolo: Card shuffler

I am a student working in a VB class. i would like to make a card
game. In order to do this, I need a way to make a deck of cards by
picking the cards from a database that is entered seperatly and then
those cards shuffled to make a random deck. Any ideas?
Thanks
si...@qx.net

those cards shuffled to make a random deck. Any ideas?
Potrebbe esserti di aiuto consultare la guida in linea su:
Randomize e Rnd.
hth, hal

 ehm, non ho capito cosa devi fare :(
direi tipo tarocchi.
ha un db con carta e descrizione.
ne avevo fatto uno con l'i ching.


ne avevo fatto uno con l'i ching.
grande java, allora e' vero che run everywhere !
ciao, hal
p.s.
sara', ma mi fido ancora poco di .net: per adesso
mi sono teleportato tutto 
java.sun.com
 ;-)

 mi sono teleportato tutto 
java.sun.com
 ;-)
oppela'. stazza in gb ?
qui siamo sul java.rain.mud :)
ciao, j.
--
jav...@libero.it
http://digilander.iol.it/javalab

qui siamo sul java.rain.mud :)
oh, se e' per questo poche ore fa qui era vbThunder :)
ciao, h
p.s.
avevo proprio voglia di firmarmi anch'io con una lettera sola, 
anche se Asterix ci ha messo fuori combattimento tutti quanti :-P


Pal --> uzi --> j  ...   darwin o lamark?
:-P
ciao
ugo

 :-P
ah, ecco il topic della chat che non capivo... direi:
uzi lamarck
j darwin
perche' sono ottimista
ma sto lavorando al progetto genuzi
:)

 ha scritto nel messaggio
news:9n4qvk$592lk$1...@ID-51318.news.dfncis.de...

beh, potremmo ampliare l'opera e postare al progetto leonardo il:
GenUzi.vbp
:P
ciao
ugo
p.s. se ti consola, sto meditando di postare "certi" thread come "faina"...

 p.s. se ti consola, sto meditando di postare "certi" thread come
"faina"...
pollaio, attenzione !

Newsgroup: it.comp.lang.visual-basic
Titolo: [Semi - OT] Differenze DB

Esiste un programmino free che è in grado di
gestire le differenze di versione tra i Database (SQL2K) della mia
applicazione VB,
o devo continuare manualmente ?
Mi spiego meglio.
Aggiungo un campo in una tabella xkè un cliente mi ha chiesto una funzione
in più.
Se volessi riportare questa funzionalità da altri clienti sono costretto
anche ad aggiornare la base dati. Adesso tutto questo lo faccio a mano.
Servirebbe uno strumento in grado di capire le differenze tra 2 DB e
allinearne il contenuto (almeno a livello di tabella !), senza però doversi
portare dietro il DB originario ...
Strumenti come ErWin (della logic works) fanno già questo ... ma qualcosa di
più semplice esiste ?
ciao

 o devo continuare manualmente ?
www.embarcadero.com
Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto conversione file Hex

Ciao a tutti ho una serie di file contenenti dei dati, sono riuscito a 
vederli, ma non riesco a fare una conversione giusta, vi faccio un esempio.
Il formato è così:
Ora
1° dato
2° dato
L'ora è un numero che parte da mezzanotte e ogni minuto incrementa di 60
0.00.00 = 0
8.00.00 = 28800
8.01.00 = 28860
ecc.
Come faccio a convertirlo in ore?
il 1° dato se lo ricavo con LONG mi risulta giusto es. 4060, ma se il dato è 
con la virgola: 793515 invece dovrebbe essere 7935,15
il 2° dato è giusto LONG perchè non sarà mai con la virgola.
Per il primo dato ho provato a sostituire LONG con SINGLE, ma è sbagliato il 
risultato.
Abbiate pazienza ma non ci capisco niente.
Con un editor Hex ho notato che i dati vengono registrati sul file così
D30F0000 = 4051
D10F0000 = 4049
Vi ringrazio qualsiasi idea è ben accetta.
David 

 David
Bye
Raf
-----------------------------------------------------
Funk: cooler than the other side of the pillow.
Newsgroup: it.comp.lang.visual-basic
Titolo: VB6 - controllo flexgrid

Non riesco a scrivere nelle celle del controllo. Vorrei che l'utente avesse 
la possibilita' di inserire del testo. Vorrei usare il controllo senza 
associarlo a
nessun database.
Qualcuno sa come fare,
Grazie.. 

 Non riesco a scrivere nelle celle del controllo. 
Tu come fai a scrivere?
f.row=3
f.col=4
f.text= "ciao"
va bene

 ha scritto nel messaggio 
news:edr7rs$2h8$1...@area.cu.mi.it...

mi sono spiegato male.
cosi' si scrive da codice.
Io vorrei la griglia libera e che l'utente finale fosse libero di inserire 
da tastiera del testo libero nelle varie celle.
Mi hanno detto di usare una textbox da spostare di volta in volta sulle 
celle in modo che l'utente avesse l'impressione di scrivere effettivamente 
nel controllo flexgrid.

 nel controllo flexgrid.
Sì, è l'unica.
Ora non ricordo di preciso come, ma dovrebbero esserci delle proprietà che 
indicano la posizione e la dimensione della cella ettiva e quindi ci piazzi 
sopra la textbox (almeno sulla HyerarchicalFlexGrid).
Altrimenti prova usando una DataGrid che se non sbaglio lo fa in automatico 
(anche se ci devi attaccare un recordset, anche fasullo, per farla andare).
Ciao 

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

 wrote in message
news:jM8Mg.99498$_
J1.8...@twister2.libero.it

E' semplicissimo!!!
Devi utilizzare l'evento KeyPress(KeyAscii As Integer).
Aggiungi poche righe di codice e puoi anche controllare e filtrare tutti
i caratteri che vengono digitati.
Puoi decidere se accettare solo numeri, se convertire determinati
caratteri in altri o altro ancora.
Con qualche riga in più puoi anche gestire i tasti di correzione, le
frecce direzionali, il tasto INS .......
Alessandro.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio 
news:354c614772c1c17ef99...@mygate.mailgate.org...

Ho risolto grazie alla tua email.
Qui di seguito e' riportato il codice:
Qui di seguito e' riportato una porzione di codice
Private Sub MSFlexGrid1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then
  'L'utente preme il tasto invio
   If MSFlexGrid1.Col = MSFlexGrid1.Cols - 1 Then
     'L'utente ha premuto il tasto invio sull'ultima colonna
      If MSFlexGrid1.Row = MSFlexGrid1.Rows - 1 Then
        'L'utente ha premuto il tasto invio sull'ultima colonna dell'ultima 
riga
         MSFlexGrid1.AddItem ""
      End If
      MSFlexGrid1.Col = 0                   ' Posizionamento prima colonna
      MSFlexGrid1.Row = MSFlexGrid1.Row + 1 ' Posizionamento riga successiva
   Else
     'L' utente ha premuto il tasto invio su una colonna qualsiasi
      MSFlexGrid1.Col = MSFlexGrid1.Col + 1
   End If
Else
  'L'utente ha premuto qualsiasi altro tasto
   MSFlexGrid1.Text = MSFlexGrid1.Text & Chr(KeyCode)
End If
End Sub
Grazie ancora.
Colgo l'occasione per ringraziare tutti quelli che mi hanno risposto...
Newsgroup: it.comp.lang.visual-basic
Titolo: Invio Mail in HTML da VB con le API Windows

Non riesco ad inviare della mail da VB...
Dove posso trovare le API Corrette oppure il protocollo SMTP preciso con le
istruzioni di come dovrei utilizzarlo?
Ho provato ma mi restituisce sempre un errore nell'invio dal server di
posta.
Grazie. MAX

posta.
Quale errore ricevi?
-- 
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: DAO e Access2000

Allora:
*scaricati ed installati MDAC 2.1 e 2.5 (fatte prove prima con il 2.1 e poi
col 2.5)
*inserito come riferimento il DAO 3.6
..... ma VB di aprire tramite il DAO un db in formato Access2000 non ne
vuole sapere !!!!!
Che ho da fa?
Giuseppe

 wrote in message
8aju6g$8r1$1...@news.flashnet.it...


 wrote in message
2kmz4.27994$O3.3...@news.infostrada.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Si può rinominare un indice da vb db access?

E' possibile cambiare il nome ad un indice da
codice di un db access?
Ciao Enzo
www.scozzaro.it

 codice di un db access?
Probabilmente devi cambiare il nome di un campo (che e' anche indice). Devi eliminare il
vecchio ed inserire il nuovo.

 ha scritto nel messaggio
news:swZJ7.5048$A6.1...@news2.tin.it...


 il campo deve rimanere invariato.
Usi ADO o DAO?
Cmq, non ho a portata di mano gli strumenti per risponderti. Prova a cercare tra i
vecchi post, e sul sito comune cerca adotutorial.
------------------------------------------------------------------------
Come risolvere un problema? Dove trovare informazioni?
1) Per prima cosa consultate la guida in linea.
*  Premere il tasto [F1] in alto a sinistra sulla vostra tastiera.
2) Seconda fonte di informazione: l'MSDN online.
*  
http://msdn.microsoft.com/vbasic/
3) Terza fonte di informazione: cercate tra i vecchi post di questo
newsgroup: quasi tutti i temi sono stati già ampiamente trattati e risolti.
*  
http://groups.google.com/groups?group=it.comp.lang.visual-basic
4) Quarta fonte di informazione: il Sito Comune(SC) di questo NewsGroup.
*  
http://www.it-lang-vb.net/
5) Quinta fonte di informazione: cercate tra i sorgenti già scritti e pronti che al 99%
risolvono quello su cui state lavorando e con minime modifiche.
*  
http://www.it-lang-vb.net/
  (Sezione sorgenti)
*  
http://www.planet-source-code.com/vb/
6) Per ultima, se non avete ancora trovato nulla: chiedete al newsgroup.
*  Ricordatevi di leggere il Manifesto di questo Gruppo di Discussione:
 
http://www.it-lang-vb.net/docs/Manifesto.txt
--- Links per approfondire... -------------------------------------------
Sommario:
¯¯¯¯¯¯¯¯
[API]
[SOCKET]
[DATABASE]
[SOFTWARE DI INSTALLAZIONE]
Contenuto:
¯¯¯¯¯¯¯¯¯
[API]
*  
http://www.allapi.net/
[SOCKET]
*  
http://www.vbip.com
*  
http://www.socketwrench.com
[DATABASE]
*  
http://www.microsoft.com/data/download.htm
[SOFTWARE DI INSTALLAZIONE]
*  
http://www.ginstall.com/
Newsgroup: it.comp.lang.visual-basic
Titolo: Scrivere in un file di testo

[.NET]
Salve a tutti,
come mai usando il metodo writeline o write della classe StreamWriter a fine 
della riga scritta (per writeline) e a fine della parola (usando write) 
viene inserito un carattere (di terminazione??) che assomiglia ad un 
quadratino ?
E' possibile evitare ciň?
saluti
alberto 

Se usi writeline ovviamente alla fine della stringa viene posto 
automaticamente il terminatore di riga.
Non mi risulta che succeda la stessa cosa con write.
E' da verificare che non sia la chiusura del file ad apporre il terminatore 
di riga automaticamente.
-- 
-----------------------------------------------------------------
Bastianello Luciano - MBS CP Development
Software Consultant - Apprentice Sorcerer
MSN: 
cte...@hotmail.com
 - ICQ: 209754422
http://community.visual-basic.it/LucianoB/
-----------------------------------------------------------------
"alberto" <nos...@nospam.kk> ha scritto nel messaggio 
news:bCIif.59425$65.16...@twister1.libero.it...



prima di tutto dovresti controllare il codice ascii del carattere
e poi sarà possibile risalire alla causa
13= ritorno carrello
10= terminatore di riga
12= terminatore di pagina
26= carattere di fine file (non obbligatorio)

 terminatore di riga automaticamente.
Ciao,
il problema sembra + complesso. Il write e il writeline appongono il 
carattere di ritorno a capo ("\r") alla fine di ogni scrittura nel file. Il 
writeline oltre al ritorno a capo appone anche il carattere di escape di 
nuova linea ("\n").
La mia semplice applicazioncina doveva prima leggere un file di testo, 
visualizzarlo in un datagrid ed eventualmente  salvare dal dataset sempre 
nel file di testo le eventuali modifiche. Dopo aver salvato le modifiche mi 
ritrovo tanti ritorno a capo ("\r") (quadrettini dietro l'ultimo carattere 
della riga) quanti sono stati i salvataggi!!
E io che credevo di levarmi di c... il tutto in un paio di sedute!
ciao
alberto 

 26= carattere di fine file (non obbligatorio)
Si.. esatto 13= ritorno carrello. E' il carattere che viene apposto alla 
fine di ogni riga.
E ho necessita di salvare il file senza questo carattere.
saluti
alberto 

"alberto" <nos...@nospam.kk> ha scritto nel messaggio news:aS0jf.60958$65.17...@twister1.libero.it...

si, allora devi aprire il file in binario, perche' se lo apri in formato testo
aggiunge automaticamente il carattere di fine riga che e'
13+10
in altri ambienti e' solo il 10 o solo il 13

Newsgroup: it.comp.lang.visual-basic
Titolo: scheda video

salve a tutti.
e' possibile con vb6 far eseguire un programma utilizzando la seconda scheda 
video?
grazie 

nico wrote:

Uhm... cosa intendi?
Vuoi usare due monitor?
O un secondo monitor connesso ad un'altra scheda video?
Nel secondo caso non ho idea di come si faccia (francamente non so 
nemmeno se due diverse schede video possano "collaborare" all'interno 
della stessa sessione di windows!).
Nel primo, invece, si può fare, ma ci vuole un uso piuttosto intenso di GDI:
 
http://msdn.microsoft.com/en-us/library/ms534609(VS.85).aspx
S.
Newsgroup: it.comp.lang.visual-basic
Titolo: Visual studio 2017 filtro file in una cartella

Ciao,
per estrarre un elenco di file in una cartella uso questo codice:
 
Private Sub BtnCercaFlowChartMacinaRG_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnCercaFlowChartMacinaRG.Click
 
 
        tbPercorso.Text = "MioPercorso"
 
        cklbSelezionaFlowChart.Items.Clear()
 
        Dim CartellaMacina As New IO.DirectoryInfo(tbPercorso.Text)
        Dim FileNuove() As IO.FileInfo
        Dim FileInCartellaNuove As IO.FileInfo
 
        FileNuove = CartellaMacina.GetFiles("AAA*.pdf")
 
        For Each FileInCartellaNuove In FileNuove
            cklbSelezionaFlowChart.Items.Add(FileInCartellaNuove)
        Next
 
    End Sub
 
con un solo filtro >> "AAA*.pdf" funziona tutto..
avrei ora la necessità di mettere più filtri, ho provato in diversi modi ma non funziona... Mi serve qualcosa tipo:
 
AAA*.pdf and BBB*pdf and CCC*.pdf
 
qual è la sintassi corretta?
grazie
Marco
 

Marco75 ha scritto:

FileNuove = CartellaMacina.GetFiles("*.pdf")
o addirittura
FileNuove = CartellaMacina.GetFiles("*.*")
poi filtri l'array FileNuove() come ti pare, magari
con più passaggi.
 
Bye, G.

Risolto, grazie 1000
Marco

Newsgroup: it.comp.lang.visual-basic
Titolo: Utilizzare un prg con VB4

Salve a tutti,
dovrei fare un'applicazione in VB4  che all'interno contenga una specie di
Paintbrush: allora mi (vi) domando: posso aggiungere direttamente (un po'
come un controllo esterno) direttamente l'applicazione Paintbrush?
Come posso fare altrimenti?
Grazie per l'aiuto.
Claudio


wrote:

Basta mettere nel form una control OLE. In esecuzione basta un doppio
click per richiamare Paintbrush, e chiudendolo, l'immagine si
trasferisce al form
Roberto Bava
Newsgroup: it.comp.lang.visual-basic
Titolo: Rilevare ip pubblico

Salve a tutti,
vorrei sapere se esiste qualche funzione, comando o quant'altro che mi
consenta di rilevare l'ip pubblico del mio pc ad ogni connesisone ad
internet?
Attualmente riesco a rilevare il mio ip della lan partendo dal nome del pc,
ma vorrei rilevare l'ip che mi assegna il provider.
Grazie per l'aiuto.
Andrea.

 ha scritto nel messaggio
news:_NYj9.4327$e31....@twister2.libero.it...


 ha scritto nel messaggio
news:_NYj9.4327$e31....@twister2.libero.it...

Qualche tempo fa ho salvato questo post (non so di chi sia, sennò gli
renderei omaggio); vedi se fa al caso tuo.
Private Type IP_ADDR_STRING
  Next As Long
  IpAddress As String * 16
  IpMask As String * 16
  Context As Long
End Type
Private Type IP_ADAPTER_INFO
  Next As Long
  ComboIndex As Long
  AdapterName As String * 260
  Description As String * 132
  AddressLength As Long
  Address(7) As Byte
  Index As Long
  Type As Long
  DhcpEnabled As Long
  CurrentIpAddress As Long
  IpAddressList As IP_ADDR_STRING
  GatewayList As IP_ADDR_STRING
  DhcpServer As IP_ADDR_STRING
  HaveWins As Boolean
  PrimaryWinsServer As IP_ADDR_STRING
  SecondaryWinsServer As IP_ADDR_STRING
  LeaseObtained As Long
  LeaseExpires As Long
End Type
Private Declare Function GetAdaptersInfo Lib "IPHlpApi" (IpAdapterInfo As
Any, pOutBufLen As Long) As Long
Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory"
(Destination As Any, Source As Any, ByVal Length As Long)
Public Function GetIPAddress() As String
  Dim error As Long
  Dim AdapterInfoSize As Long
  Dim AdapterInfo As IP_ADAPTER_INFO
  Dim pAdapt As Long
  Dim Buffer2 As IP_ADAPTER_INFO
  Dim AdapterInfoBuffer() As Byte
  AdapterInfoSize = 0
  error = GetAdaptersInfo(ByVal 0&, AdapterInfoSize)
  If error <> 0 And error <> 111 Then
    Exit Function
  End If
  ReDim AdapterInfoBuffer(AdapterInfoSize - 1)
  error = GetAdaptersInfo(AdapterInfoBuffer(0), AdapterInfoSize)
  If error <> 0 Then
    Exit Function
  End If
  CopyMemory AdapterInfo, AdapterInfoBuffer(0), Len(AdapterInfo)
  pAdapt = AdapterInfo.Next
  Do While pAdapt <> 0
    CopyMemory Buffer2, AdapterInfo, Len(Buffer2)
    If InStr(UCase(Buffer2.Description), "PPP") <> 0 Then
      ip = Buffer2.IpAddressList.IpAddress
      pos = InStr(ip, Chr(0))
      If pos > 0 Then ip = Left(ip, pos - 1)
      If ip <> "" And ip <> "0.0.0.0" Then
        GetIPAddress = ip
        Exit Function
      End If
    End If
    pAdapt = Buffer2.Next
    If pAdapt <> 0 Then
      CopyMemory AdapterInfo, ByVal pAdapt, Len(AdapterInfo)
    End If
  Loop
  GetIPAddress = ""
End Function

 ha scritto nel messaggio
news:_NYj9.4327$e31....@twister2.libero.it...
| Salve a tutti,
| vorrei sapere se esiste qualche funzione, comando o quant'altro che mi
| consenta di rilevare l'ip pubblico del mio pc ad ogni connesisone ad
| internet?
prova a vedere l'oggetto winsock
Newsgroup: it.comp.lang.visual-basic
Titolo: Perche' visual basic?

Perche' imparare visual basic?
E' sbagliato iniziare a studiare un linguaggio partendo da visual basic?
e se iniziassi dal Pascal?
Arisponnetemi!!!!
ciao!

 e se iniziassi dal Pascal?
Piccola osservazione: la domanda è un po' mal posta (che altro linguaggio
vuoi imparare iniziando da VB??? :-))
OK, forse vuoi iniziare ad imparare a programmare e devi scegliere il
linguaggio di programmazione...
...inoltre, un linguaggio per quale scopo?...
In generale ti consiglio di puntare più sulla qualità della programmazione
in astratto (i linguaggi diversi poi si imparano "facilmente"). Impara ad
utilizzare i paradigmi della programmazione strutturata e magari OOP.
Chiaramente è difficile programmare sulla carta :-) (anche se quelli che
hanno studiato informatica da lì hanno iniziato...), quindi inizia pure con
VB che ti darà subito soddisfazioni (per poi tradirti + avanti..scherzo..).
Se proprio ti è indifferente potresti però anche utilizzare il mitico Pascal
(Delphi).
Ciao e buon lavoro
Franco

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

Salve a tutti,
sto progettando alcuni reports di stampa con DataReport di VB6 ma ho un
problema:
sembra che nella struttura del report non sia possibile mettere una TextBox
nell'intestazione di pagina.
L'unica sezione nella quale posso mettere delle textBox č il corpo
(dettaglio) del report.
Spero che qualcuno possa chiarirmi questa cosa, xchč se č effettivamente
cosě
prendo VB 6 e lo butto nel cesso.
Arrivederci a tutti
e grazie in anticipo.
NINO

Sto facendo un report per la stampa delle Bolle, ed ho delle difficoltà a
stampare informazioni prese da tante tabelle relazionate per codice nella
stessa sezione del report.
spero qualcuno mi dia suggerimenti
Ciao a tutti
--
G.L.F. Consulenza Informatica
di La Fragola Gaetano
Via C.Amati 12/F - Monza
E-Mail  
GLA...@TIN.IT
Newsgroup: it.comp.lang.visual-basic
Titolo: DAO - Record modificato diventa capoccione

Salve a tutti,
io ho un form con dei text box che mostrano i valori del record appena
letto. Quando modifico un record, la volta successiva che scorro tutto il
recordset al punto del rec. modificato devo clikkare due volte sul tasto
"successivo" per leggere effettivamente il successivo.Perche' al primo click
il record letto mi rimane lo stesso, invece al secondo va avanti.
Credevo fosse un errore di codice, ma il fatto e' che ho la stessa
situazione con il Visual Data Manager, e il record non e' duplicato perche'
il numero progressivo del record non cambia.
Come mai?
Non uso ADO, perche' ancora non ne sono pratico, la tabella ha un indice
(magari non centra niente pero' la do come informazione in piu').
grazie
Capellone

 "successivo" per leggere effettivamente il successivo.
Il codice dell'evento Click del tasto?

 wrote in message
b5savu$2c9uag$1...@ID-174464.news.dfncis.de...

Lo posto quando torno a casa, ora non ce l'ho.
Comunque c'e' una if per vedere se devo eseguire l'istruzione rs.movenext o
rs.findnext qry.
Forse devo in qualche modo refreshare il recordset, ma anche se rilancio il
programma ho lo stesso risultato.
Pero' non trovi strano che con Visual data manager ho lo stesso problema?
ciao
Cap.

 Pero' non trovi strano che con Visual data manager ho lo stesso problema?
Assolutamente sì e i casi sono solo due: O c'è un duplicato che viene
regolarmente caricato (ma appare, proprio perchè identico, ancora il
precedente) o s'è trovato un buco...
PS: Non ho capito come tu possa riprodurre da VisData quel che fai da
codice... specialmente per quel che riguarda la FindNext.
Posta il codice anche di costruzione/filtro del recordset oltre che quello
di scorrimento

 precedente) o s'è trovato un buco...
o va a modificare un campo chiave dell'indice, nel qual caso direi che il db
faccia prima una rilettura per eventualmente riposizionare.
con dao e gli indici attivi succede, con gli sql non mi sembra (fino al
refresh/requery il rs e' stabile).
ciao


 di scorrimento
Ok, lo faro'
thanks
Cap.

 refresh/requery il rs e' stabile).
anche con il requery ho lo stesso problema....per requery intendi dire
aprire il recordset con una query diversa giusto?
ciao
Cap.

 aprire il recordset con una query diversa giusto?
ehm, in sql sono un disastro. l'ho sempre inteso come rieseguire la stessa
query, p.e. dopo avere eliminato/modificato/aggiunto schede.
ciao

 Comunque c'e' una if per vedere se devo eseguire l'istruzione rs.movenext
Sistemato!
E' passato un po' ma ultimamente non ho molto tempo per il VB.
Ho scoperto che l'indice nella tabella non c'era, e creandolo m'ha risolto
il problema.
grazie
Cap.
Newsgroup: it.comp.lang.visual-basic
Titolo: Inserimento Insieme di controlli in un ActiveX

 un insieme di controlli nell' UserControl?

Salve a tutti.
Voglio creare un OCX che abbia una buone parte delle caratteristiche dell'
MSFlexGrid.
Ma sara' causa dell' eta' o a causa delle nottate passate su questo
amato/odiato arnese,che mi trovo a un punto morto: come faccio ad inserire
un insieme di controlli nell' UserControl?
Nei testi e nell'HOL non ho trovato nulla che potesse aiutarmi, o meglio o
trovato alcuni esempi nelle classi generiche senza interfaccia visiva, ma
nulla di esplicito per i componenti.
E' altresi' vero che non ho quasi mai scritto dei moduli di classe
particolarmente evoluti, e in questo ho un' esperienza molto limitata, di
conseguenza qualcuno puo' indicarmi dove reperire esempi di codice che mi
possano risolvere il problema?
        Clayton

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Tempo di connessione

Qualcuno sa di un'API o comunque di un qualche sistema per copiarsi in una
variabile di un programma VB il tempo di connessione misurato
automaticamente da Accesso Remoto?
Grazie.
Leandro

In win95 c'e' una finestra che misura secondo per secondo da quanto tempo
siamo collegati. Si chiama Connessione a.. (segue il nome del nostro
provider, o comunque il nome che abbiamo assegnato a quella connessione.)
Credo che quel valore dovrebbe essere leggibile in qualche maniera finche'
essa e' aperta e magari anche dopo la sua chiusura. Come potrebbe fare un
programma VB per andare a leggere quel tempo in un momento preciso?
Grazie per l'aiuto.

Newsgroup: it.comp.lang.visual-basic
Titolo: Copiare file già in uso.

Ciao a tutti.
Ho un programmino che quando parte, copia un file MDB in una cartella:
    percorso = "C:\originale.mdb"
    destinazione = "C:\copia.mdb"
    filecopy percorso, destinazione
Però c'è un problema, se il file "originale.mdb" è in uso da un altro
programma, non mi permette di fare la copia.
Esiste un modo per arginare il problema? Considerando anche il fatto che il
file utilizzato io lo devo semplicemente copiare e non modificare, credo si
possa fare.
Grazie.

 Perņ c'č un problema, se il file "originale.mdb" č in uso da un altro


 ha scritto nel messaggio
news:9autbu$738or$1...@ID-77234.news.dfncis.de...


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

Vorrei inserire in un progetto una sequenza di brani in formato realaudio;
tutto bene alla partenza per quanto riguarda il primo brano ma quando si
tratta del secondo l'unico modo di farlo partire è premere il tasto play del
controllo RealAudio con il mouse.
Ho utilizzato l'evento (se di evento si tratta)
realaudio.doplay
ma non funziona anzi si blocca tutto (errore di runtime).
Qualcuno mi sa dare delle dritte?
Ringrazio tutti anticipatamente.
Andrea



Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Programma già in esecuzione

Ciao a tutti,
come posso verificare se un programma è già in esecuzione per evitare di
lanciarlo una seconda volta?
Grazie, Fabrizio.

 ha scritto nel messaggio
news:ja4p5.125796$dF5.2...@news.infostrada.it...

    If App.PrevInstance = True Then
        gintRisposta = MsgBox(App.ProductName & ": già in esecuzione",
vbCritical + vbOKOnly, _
        App.ProductName & ": impossibile continuare")
        Unload Me
        Exit Sub
    End If
--
 
federic...@planet.it
Eliminare NOSPAM dall'indirizzo! Delete NOSPAM from address!
Newsgroup: it.comp.lang.visual-basic
Titolo: Probelmi pacchetto installazione.SOLUZIONE TROVATA!!

Beh, instanto come non potrei ringraziare tutti coloro che hanno cercato di
aiutarmi con i loro consigli, senza i quali probabilemte non sarei arrivato
a capo del probelma.
Grazie , grazie ,grazie.
Ora la soluzione (Trovata in uno dei post inviati al Ng che mi è stato
indicato su google)
Rimuovere la stringa "Access2000;" nella proprietà dei controlli data.
Ora il prg funziona anche su XP, dove non ne ha mai saputo di voler andare.
Adesso vado dalla persona che mi ha commisionato il lavoro. Incrociamo le
dita.
Grazie ancora a tutti.

 ha scritto



Eccoti accontentato e ecco accontentati anche tutti coloro che "ci hanno
messo del suo".
Il prg FUNZIONA, al primo tentativo e senza alcun messaggio di errore!!
Funziona su WinXp,Win98SR1 e Win98SR2.
Non ho provato il Win2000 ma a questo punto credo che giri anche li..
Indi per cui, a chiunque dovesse usare i controlli data in concomitanza con
DB Access2000 non posso far altro che consigliare quel che segue:
Caricare MDAC 2.6 o successive (anche se non sono sicuro al 100% che questo
sia indispensabile..)
Caricare Jet40sp3 (Questo si che è fondamentale...)
Eliminare la stringa "Access2000;" nella proprietà Connect di tutti i
controlli Data presenti PRIMA della compialzione e ogni volta che si compila
il prg. (Questo invece non è indispensabile, bensì vitale perchè il prg
funzioni..)
Che altro... In bocca al lupo a tutti coloro che mi hanno aiutato e acnhe a
quelli che non l'hanno fatto
Bye. Alla prossima..

 funzioni..)
Questa non mi è chiara, e secondo me meriterebbe un approfondimento.
Non è pensabile che a ogni compilazione si debba rimettere mano a tutto il
progetto.
Come non mi è chiaro perchè rimuovere "Access2000": questa è indispensabile
per far capire al Jet a che tipo di database connettersi (una faq su "mi da
errore di tipo di DB non riconosciuto con access2000" ha appunto risposta
in: installare SP5 e mettere Connect = "Access2000").
Ciao


Beh, sinceramente non l'ho trovata un asoluzione molto professionale anch'io
se devo essere sincero ma, almeno nel mio caso, e, per quanto io abbia
potuto capire, anche in altri analoghi, ha risolto egregiamente il problema.
A dire il vero nella KB della M$ ho trovato delle risposte al problema
"Errore 3170" alquanto strane e soprattutto molto inefficaci..
Allora davanti ad un'applicazione che non ne vuole saper di installarsi hai
due scelte:
a) non l'installi prorpio perchè chi ha fatto l'IDE e tutto il resto non sa
aiutarti
b) perdi un po' di tempo in più ( ovviamente dipende dall'applicazione
quanto tempo...) e installi in prg.
A te l'ardua sentenza..
Cmq fondamentalmente sono concorde cone te..  Non è chiara...
Bye bye..

 A te l'ardua sentenza..
c) Capire perchč non va (il vero motivo) e risparmiare tempo e notti insonni
per i prossimi 10 anni.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: word.appl e excel.appl

Ciao.
Per "aprire" files word 97 ed excel 97 aggiungo Microsoft Word 8.0 Object
Library (msword8.olb)
 e Microsoft Excel 8.0 Object Library (msexcel8.olb).
Gli stessi riferimenti funzionano anche per i files Office 95.
Sapete se funzionano anche per word e excel di OFFICE 2000?
grazie.

 Sapete se funzionano anche per word e excel di OFFICE 2000?
credo di no.
oppure, se funzionano, non puoi accedere ovviamente alle nuove funzioni di
excel 2000.
MarioH

 ha scritto nel messaggio
news:97j2fa$pnu14$1...@ID-77234.news.dfncis.de...

Per utilizzare le versioni di Office 2000 devi usare EXCEL9.OLB e
MSWORD9.OLB
Ciao VB
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema su ComboBox

Salve,
sto lavorando in vb6 su winxp sp2.
Ho il seguente problema:
permetto all'utente di caricare valori sulla cmb attraverso un form e una 
volta uscito dal form il valore della combo sarà l'ultimo inserito 
dall'utente.
''''''''''''''''''''
    tot = dettaglilibri.lstautori.ListCount
    dettaglilibri.lstautori.ListIndex = tot - 1
'''''''''''''''''''''''''''''''''''
Fino a qui va tutto bene, ma se, l'utente per sbaglio inserisce il valore X 
già presente nella combo in questo caso si dovrà visualizzare X della combo.
l'unica cosa che sono riuscito a fare è far visualizzare all'utente il 
valore che ha inserito sulla combo
'''''
        dettaglilibri.lstautori.Text = autore
''''''
ma in questo modo il listindex della cmb rimane a -1 e quindi quando salvo 
la scheda quel valore non verrà salvato..
Spero di essere stato chiaro e di trovare qualcuno che possa darmi una mano.
Grazie 

 ha scritto nel messaggio 
news:457ec470$0$4258$4faf...@reader1.news.tin.it...

ogni volta che l'utente aggiunge un valore nella combo mediante il form
dovresti controllare se all'interno del combo esiste gia un valore uguale..
in caso esista gia allora lo selezioni e lo mostri
se no lo aggiungi e lo mostri!
cmq funzionalità di questo tipo ho trovato molto utile gli ImageCombo
componenti aggiuntivi di VB6.
ciao 

 ha scritto nel messaggio 
news:pTzfh.77527$Fk1.2...@twister2.libero.it...


> Si, ma come lo seleziono?
For i = 0 To lstautori.ListCount - 1
    If frmInserisciRoba.txtControlloIncuiInserireValori.Text = lstautori(i).Text
Then
        lstautori.ListIndex = i
        Exit For
    End If
Next i
Faccio però un commento:
qs. approccio è piuttosto lento, perché lo dovresti mettere nell'evento
Change della textbox di inserimento, e ciò significa che ad ogni pressione
di un tasto nella textbox vengono riesaminati uno per uno tutti gli elementi
della combo (... a proposito, perché si chiama lstautori, se è una
combo?...).
L'istruzione Exit For interrompe il ciclo ma è un palliativo.
Un approccio più efficiente consisterebbe nel mettere tutti gli elementi
della combo in una matrice, e ciclare la matrice. Infatti, essendo un
insieme puro di locazioni di memoria, il ciclo sulla matrice è più veloce di
quello su un controllo.
Oppure potresti utilizzare una collection: le collection sono ancora più
veloci delle matrici.
Spero ti sia utile. Ciao.
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 ha scritto nel messaggio 
news:84Z220Z102Z8Y1...@usenet.libero.it...


 impostando la proprieta style della cmb a 2.
Beh, avevo capito che cercavi un'altra cosa.


Newsgroup: it.comp.lang.visual-basic
Titolo: Eseguibile VB

E' possibile creare con Visual Basic un file eseguibile unico oppure un file
di istallazione unico?

 ha scritto nel messaggio
news:jASr5.34176$Wi7.4...@news.infostrada.it...


 di istallazione unico?
cn vb no.
con pezze esterne si': cerca "fusion" in 
www.deja.com
 nel ng iclvb, c'e'
stato un lunghissimo thrread in agosto.
Newsgroup: it.comp.lang.visual-basic
Titolo: Far suonare un Wav

Ciao a tutti.
Sono alle prime armi col VB.
Sto realizzando un programmino dove vorrei inserire un file WAV che vada
in play premendo un button senza far comparire il player.
Come si fa a caricare l'oggetto MCI nel VB 4.0???
Grazie a tutti.
CIAO

...

----------------
Ciao!
Per riprodurre un file WAV, puoi utilizzare le API di Windows; è molto più
veloce e fa molto più
"professionista".  Ecco la dichiarazione:
Public Declare Function sndPlaySound Lib "Winmm.dll" Alias "sndPlaySoundA"
(ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
- lpszSoundName deve contenere il nome ed il percorso completo del file da
riprodurre;
- uFlags contiene i parametri da passare alla funzione; di solito va posto
uguale a 1.
Supponendo di avere un file di nome "Suono.wav" nella cartella "C:\Prova",
il codice per avviare la riproduzione è il seguente:
    Dim Esegui As Long
    Esegui = sndPlaySound("C:\Prova\Suono.wav", 1)
Se la funzione ha esisto corretto, il valore di "Esegui" sarà diverso da 0.
Spero di non aver trascurato nulla. Ciao
Marco Minerva
http://www.geocities.com/SiliconValley/Foothills/7260
http://www.armaditaggia.com/marco

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

Devo disegnare un poligono sulla mia form con la chiamata API Polygon.
Il mio problema č che non riesco a disegnarlo dove voglio.
La funzione richiede: hdc, vettore di POINTAPI ,numero di vertici.
POINTAPI č una struttura dove vengono memorizzate le coordinate di un
punto.
 
Se per esempio ho nell'evento load della mia form1:
form1_load
 me.scale (0,100)-(100,0)
end
mi aspetto che quando imposto le coordinate di un vertice (50,50), questo
mi venga disegnato al centro della mia form...cosě non č. Quale
trasformazione mi manca?
Ciao Marco.
 
-- 
Remove xxx from E-mail.

Marco Rodriquez ha scritto nel messaggio
<01bdfdc9$ea115460$LocalHost@rodry>...

Il 98% delle API grafiche funzionano a pixel, non in twips, gnaps o burps, e
le API della famiglia Polygon non fanno eccezione.
Se il problema č solo il posizionamento probabilmente la soluzione č questa.
Ciao.

Remove xxx from E-mail.
Le API GDi volgiono le coordinate in Pixel, dunque devi impostare
lo scalemode a Pixel.

Il fatto è che devo disegnare un percorso: ho un sistema di assi cartesiani
dove in ascissa ho i chilometri ed in ordinata l'altezza. Per maggiore
semplicità (viene anche gestito il resize) ho impostato scalemode su user.
Ora volendo disegnare delle bandierine rosse lungo il percorso sono
costretto ad utilizzare le chiamate API che funzionano con le coordinate
espresse in unità logiche. Ho scoperto che ci vogliono all'incirca una
decina di chiamate API per gestire la mia bandierina. 
Ciao Marco 


Beh, credo sia semplice impostare un paio di funzioni di
scalatura in pixel dei tuoi valori. E poi per disegnare bandierine
potresti usare la funzione API di disegno di icone che vuole
naturalmente le coordinate del top e left in pixel. Se non
erro e' la funzione drawicon.....

E' quello che ho fatto. Grazie lo stesso.
Ciao Marco.

Newsgroup: it.comp.lang.visual-basic
Titolo: Per esperti (OUTLOOK)

[Acc97]
Ho realizzato un "programmino"  in access che interagisce con Outlook98.
Il mio problema è questo:
Creo un messaggio di posta e dopo una serie di azioni lo porto a video (es.
myItem.display)
Come faccio ad intercettare la chiusura dell'inspector?
Oppure:
come faccio a contare i messaggi attualmente aperti?
C'è un insieme, una cartella particolare, un attributo dei messaggi che
rivela che sono aperti?
ARRRRGGHHHHH !!!
AAIIIIIIUUUUUTTTTTOOOOOO!!
.... e grazie in anticipo!
Ciao
Stefano CONTARDI
-- 
Posted from 
relay2.ssi.enel.it
 [146.133.224.4] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 C'è un insieme, una cartella particolare, un attributo dei messaggi che
rivela che sono aperti?
Intendi qualcosa del genere?
Option Explicit
Sub Prova()
  Dim olInspector As Outlook.Inspector
  With Outlook.Application
    For Each olInspector In .Inspectors
      With olInspector
        Debug.Print .Caption
      End With: Set olInspector = Nothing
    Next
  End With
End Sub
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

 * 
contardi...@enel.it
 


 infatti la routine che mi hai scritto dą errore.
Il tuo newsreader moltiplica il "Re:", cosi` il mio Outlook Express non
capisce e non appende la tua risposta al thread. (O viceversa? Boh?!)
Non "quoti" nemmeno parte del post al quale replichi, cosi` la tua risposta
e` nel vento...
Nel tuo post parlavi di interazione con Outlook 98. Immagino quindi che tu
abbia la libreria degli oggetti di tale applicazione fra i riferimenti del
progetto. Potrebbe essere, a questo punto, che Outlook 98 non esponga
l'insieme "Inspectors" ma non posso verificarlo perche' ho installato
Outlook 2000, mi spiace.


Newsgroup: it.comp.lang.visual-basic
Titolo: ocx x scaricare pagine html

per il re togliere xxx
Sto lavorando per una società che dovrebbe integrare all'interno del
suo programma lo scarico delle pagine html , o meglio di poter
gesttire lo scarico diu una o più pagine tipo "teleport" dato che
questa è una funzione molto marginale del programma volevano
acquistare un lavoro già pronto tipo ocx o simili (io non sono un
programmatore mi occupo dell'ufficio acquisti scusate per le eventuali
imprecisioni) mi potete aiutare???? ciao e grazie. 
per la risposta togliere le x

 imprecisioni) mi potete aiutare????
per gestire i socket potete usare SocketWrench (freeware, lo trovate su
http://www.socketwrench.com/
), per scaricare le pagine linkate dovete creare
un parser (non so se ce n'è uno già fatto per le vostre esigenze)
Ciao
Faber

 eventuali imprecisioni) mi potete aiutare???? ciao e grazie. 
wget

 wrote in message
news:1kp7tt0as7e4lfsbt...@4ax.com...


Newsgroup: it.comp.lang.visual-basic
Titolo: Access 2000 e ODBC ??!!???!?!?!?

Qualcuno mi sa dire se con DB creati con access2000 bisogna aggiornare la
versione di ODBC.
Ho distribuito un'applicazione su un pc con ODBC di access97 e mi da un
errore di run-time dicendo che il database e sconosciuto. Il Db è stato
convertito in Access 2000.
grazie comunque
ciao IvanS

errore di run-time dicendo che il database e sconosciuto. Il Db č stato

Newsgroup: it.comp.lang.visual-basic
Titolo: picture box, scaleheight e maximize

e' una cosa in cui mi imbatto spesso.
se in un form c'e' un picture che contiene oggetti, se il form viene portato 
a maximzed, il picture non sente il ridimensionamento, per cui eventuali 
resize al suo interno si perdono.
p.e., qui un picture e' ancorato a sinistra, l'altro in alto. ciascun pic 
contiene un command
Private Sub Form_Resize()
    If WindowState = 1 Then Exit Sub
'    Command1.Top = (Picture1.Height - Command1.Height) \ 2
'    Command1.Left = (Picture1.Width - Command1.Width) \ 2
'    Command2.Top = (Picture2.Height - Command2.Height) \ 2
'    Command2.Left = (Picture2.Width - Command2.Width) \ 2
    Command1.Top = (Picture1.ScaleHeight - Command1.Height) \ 2
    Command1.Left = (Picture1.ScaleWidth - Command1.Width) \ 2
    Command2.Top = (Picture2.ScaleHeight - Command2.Height) \ 2
    Command2.Left = (Picture2.ScaleWidth - Command2.Width) \ 2
End Sub
(usare la parte commentata o quella no, non cambia).
tutto e' ok, finche' non si porta windowstate a 2.
c'e' una soluzione pulita?
grazie, a.


Fammi capire: come fanno a variare ScaleWidth e ScaleHeight della Picture
nell'evento *Form*_Resize?
Raf
-----------------------------------------------------
Funk: cooler than the other side of the pillow.

 nell'evento *Form*_Resize?
i pic sono ancorati (align). se aumenta l'h del form, aumenta anche quella 
del pic align=left. e se aumenta h, aumenta anche sh.
ecc.
tant'e' che se incolli il codice in un vbp, funziona perfettamente.
salvo quando fai 2clic sulla barra del titolo.
imho e' un piccolo bug, non so se anchor in net l'ha risolto.
ciao, a.

 ciao, a.
Non è un bug, ma è così by design. Evidentemente l'evento Form_Resize si innesca
prima che le picture box siano state ridimensionate automaticamente grazie
all'align.
Devi spostare il relativo codice nell'evento Resize delle due picture.
Ad es. per la prima:
Private Sub Picture1_Resize()
    If WindowState = vbMinimized Then Exit Sub
    Command1.Move (Picture1.ScaleWidth - Command1.Width) \ 2,
(Picture1.ScaleHeight - Command1.Height) \ 2
End Sub
Bye


 Devi spostare il relativo codice nell'evento Resize delle due picture.
grazie :)
mi tocca frammentare routine abbastanza incasinate (e che non mi dispiaceva 
vedere in un solo colpo d'occhio), ma funziona.
ciao, a.


Puoi sempre inventarti una routine all-in-one parametrica:
Private Sub ResizeChildControls(Container As PictureBox)
    If Container Is Picture1 Then
        ...
    ElseIf Container Is Picture2 Then
        ...
    End If
End Sub
Private Sub Picture1_Resize()
    ResizeChildControls Picture1
End Sub
etc. etc..


 End Sub
ecco dove si vede il professionista :)
rigrazie, ciao, a.
Newsgroup: it.comp.lang.visual-basic
Titolo: aiuto su CB_SHOWDROPDOWN

scusate, mi sto avvicinando alle Api sui messaggi (sendmessage & co.) e
volevo provare il messaggio in oggetto.
ma il primo parametro di sendmessage, deve essere l'handle DI CHE COSA??????
del form su cui si trova il combobox? del combobox stesso? come devo fare?
mi sembra strano che non sia l'handle del combobox, infatti se ce ne sta piu
di uno sul form... come si fa? forse devo inserire il codice con sendmessage
in qualche evento del combobox desiderato?
help...
mario

 wrote in message 8sfau8$si6$1...@nslave2.tin.it...


help...
Quando le API chiedono un hWnd è SEMPRE dell'oggetto a cui il messaggio è
indirizzato, per cui del combobox (Combo1.hWnd).
Però avresti almeno potuto fare due (2) prove prima di postare...
Dove inserirlo è affar tuo.
Ciao

... della finestra che effettua la chiamata.
Questa me la spiegherai... :)
Se tu chiedi a uno "hei, dov'è Mario?" non credo che lui risponda "Guarda
che tu sei qui..." (a meno che tu non ti chiami Mario)
Ciao


allora, confesso... ho postato appena ho letto che l'api andava trovando
l'handle della window... poi mi sono sconnesso, ho fatto la prova scrivendo
proprio combo1.hwnd e ha funzinoato... ma poi mi sono rotto di
ricollegarmi... ::))))
cmq effettivamente era la soluzione piu logica, anzi, l'unica...
ciao
mario

Newsgroup: it.comp.lang.visual-basic
Titolo: Quale Report?

quale programma posso usare per creare dei report?
- il datareport di vb č un po limitato (no subreport e devo legarlo ad un
data environment)
- il CR6 ha dei problemi con la posizione fisica del db
- entrambi hanno il problema che se aggiungi un campo al db devi ricalcolare
il report, nel primo caso ti cancella tutta la struttura e nel secondo ti fa
del casino con la stampa
Conoscete qualche altro prodotto piů flessibile e stabile?


Non intendo fare Spam, nč advertise.
Ho usato con soddisfazione ActiveReports, un flessibilissimo ocx
della DataDynamics ( 
http://www.datadynamics.com
  area Downloads).
Gestisce Reports con dati Bound ed Unbound, ed č soprattutto
con questi ultimi che giganteggia.
Io, lo ho utilizzato, ad esempio, per creare Reports dai dati nelle
ListView, da recordset dinamici, da Stored Procedure.
Č possibile scaricare una versione Share di prova.
Ha un Help esaustivo.
HTH
Adriano

 ha scritto nel messaggio
news:6Nd37.30332$rh.6...@news6.giganews.com...

Di quali problemi parli riguardo CR6 ?
Premesso che anch'io non vendo (e non voglio vendere) nulla, sto usando CR
da 3 anni ormai e non ho MAI avuto particolari problemi, anche con reports
complessi.....
Cmq ho sentito parlare bene anche di ActiveReports (mai provato
personalmente pero'....)
Ciao.
Lorenzo
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Adattare una bitmap al foglio

Salve a tutti.
Ho bisogno di stampare una bitmap, aquisita da scanner alla risoluzione di
300dpi sulla stampante predefinita dal sistema con VB. Ho provato cosě:
'------
Shell "C:\PROGRAMMI\ACCESSORI\MSPAINT.EXE /P C:\FOTOCOPIA.BMP"
'------
ma la bitmap viene stampata su 10-11 pagine. Come faccio ad adattarla al
foglio?
Grazie in anticipo.
Rosario

"Attila85" <non...@lo.dico> wrote in message
news:8v69ja$f59$1...@nread2.inwind.it...

Prova a caricarti la bitmap in una picturebox o in una image, quindi chiama
il metodo PaintPicture dell' oggetto Printer, che ti permette di fare lo
stretching dell' immagine.
Ciao
Aldo

Newsgroup: it.comp.lang.visual-basic
Titolo: Controllo MsComm

Salve a tutti, ho un problema ke giro a tutta la newsgroup:
voglio fare un programmache mi avverta kuando il modem è in uso. dovrei
usare il controllo MsComm credo, e non avrei problemi, tranne per il fatto
che il mio modem è un winmodem interno e non so come dirglielo a mscomm che
non uso una porta seriale HELP

mi sembra che anche i modem interni in realtà lavorino sempre sulla porta
COM, solo che non è la COM1 o la COM2, che sono quelle esterne, ma sulla
COM3 o 4.
Ti conviene vedere le proprietà del modem e capire su quale porta lo usi, a
quel punto sai che tipo di porta devi gestire!
good coding!!!
--
Damiani Liborio Igor
ig...@igordamiani.it
 - 
dam...@italiainfiera.it
 - 
idam...@hotmail.com
http://www.igordamiani.it
ICQ : 11847262