mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Contare i record di un recordset Forward-Only

Se chiamo la proprietą Recordcount di un recordset Forward Only a sola
lettura, mi torna sempre -1
C'č modo di sapere da quanti record č effettivamente composto questo tipo di
recordset?
Grazie
Skysurfer

 wrote in message
97du46$l12$1...@serv1.iunet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Screen Shot Schermo....

Io Vorrei salvare su un file (.BMP) una porzione dello schermo (non tutto).
Sapete in che modo (quali Api?) posso farlo?
Grazie per l'aiuto!!!Emas

Mi rispondo da solo:
   hbitmapDesktop = CreateCompatibleBitmap(hdcdesktop, 1024, 768)
   SelectObject hdcdesktop, hbitmapDesktop
   Picture1.Width = 400 'Dimensione della immagine da Copiare
   Picture1.Height = 400 'Dimensione della immagine da Copiare
   BitBlt Picture1.hdc, 0, 0, 400, 400, hdcdesktop, x, y, vbSrcCopy  'x,y
sono le cooerdinate del 1 punto da copiare
   Picture1.Refresh
   Sleep 2000 ' solo per i Pc un po lenti ( 2 sec di attesa)
        SavePicture Picture1.Image, "d:\prova.bmp"
   DeleteObject hbitmapDesktop
   DeleteDC hdcdesktop
la Picture di appoggio deve essere con autoredraw impostato a true!
Newsgroup: it.comp.lang.visual-basic
Titolo: Bitmap

Salve a tutti,
avrei necessita' di leggere l' header di una immagine .BMP in visual basic, non
so da che parte cominciare :-((
C'e' qualcuno che mi puo' aiutare??
Grazie a tutti
Gianni
--
Posted from 
mta13-acc.tin.it
 [212.216.176.44] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Gianni:
  Se e' da un file che vuoi ottenere le informazioni puoi fare cosi'.
Definisci prima le due strutture di BITMAPFILEHEADER e BITMAPINFOHEADER:
'
Private Type BITMAPFILEHEADER_Type
    bfType          As String * 2   ' The string “BM” (hex value &H424D)
    bfSize          As Long         ' The size of the file, measured in bytes
    bfReserved1     As Integer      ' Not used, set to zero
    bfReserved2     As Integer      ' Not used, set to zero
    bfOffBits       As Long         ' The start offset of the bitmap data in the file
End Type
Dim BITMAPFILEHEADER As BITMAPFILEHEADER_Type
'
Private Type BITMAPINFOHEADER_Type
    biSize          As Long         ' 40 (the size of this structure).
    biWidth         As Long         ' The width of the bitmap in pixels.
    biHeight        As Long         ' The height of the bitmap in pixels.
    biPlanes        As Integer      ' 1 (DIBs always have one plane).
    biBitCount      As Integer      ' 1 for monochrome, 4 for 16 colors,
                                    ' 8 for 256 color, 16 for 16-bit RGB color,
                                    ' 24 for 24-bit RGB color, and 32 for 32-bit RGB color.
    biCompression   As Long
    biSizeImage     As Long         ' The size of the image in bytes.
                                    ' May be zero if biCompression is BI_RGB.
    biXPelsPerMeter As Long         ' Number of horizontal pixels per meter for
                                    ' which this DIB was designed.
    biYPelsPerMeter As Long         ' Number of vertical pixels per meter for
                                    ' which this DIB was designed.
    biClrUsed       As Long         ' Number of entries in the DIB color table
                                    ' that are actually used. Zero if all are used.
                                    ' Must be zero or the actual color table size
                                    ' for packed DIBs
    biClrImportant  As Long         ' Number of entries in the DIB color table that
                                    ' are important. Zero to specify all colors.
End Type
Dim BITMAPINFOHEADER As BITMAPINFOHEADER_Type
e poi:
'
    Open "Folder & Nome del tuo File" For Binary As #1
    Get #1, , BITMAPFILEHEADER
    Get #1, , BITMAPINFOHEADER
    Close (1)
A questo punto, nelle variabili delle tue strutture, avrai i valori che ti interessano.
Se invece li vuoi ricavare da un' immagine di (e.g.) un PictureBox, scrivimi che ti
mando il codice necessario.
Ciao e se ci sono problemi fatti sentire.
Franco


 ...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Controllo per visualizzare pagine web...quale?

Salve,
come da subject mi chiedevo se esiste un controllino, una
finestrella o qualunque cosa che mi consente di caricare una pagina web.
Avete presente il mini browser che c'è in winamp? Io vorrei una cosa molto
simile, si carica la pagina web e si clicca sui links...sotto qualche
bottone basilare come lo stop, il reload, back o forward.
Non ho mai usato
una cosa del genere, non so ne che usare e ne come usarlo. Qualcuno ha
qualche dritta da darmi?
Saluti...
--------------------------------
Inviato via 
http://usenet.iol.it

qualche dritta da darmi?
C'č il controllo WebBrowser in VB6... (MS Internet Controls)
Non č complesso da usare: su MSDN ci sono un paio di esempi e se non erro anche recentemente
qualcuno sul NG ha postato qualche esempio un po' piů completo...
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.msvbsite.net
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.it-lang-vb.net
---------------------------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: listbox: generazione evento

Allora, ho una  label e una listbox con 3 elementi 
pippo
pluto 
paperino
come faccio a far si che la label mi visualizzi la riga della 
listbox selezionata?
ho provato agganciando all'evento doppioclik sulla listbox
ma se la riga la seleziono con il tasto cursore non mi parte 
l'evento doppio click... esiste un evento
che mi dice che e' cambiata la riga attiva?
grazie.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 grazie.
nella click:
If List1.SelCount > 0 Then
   Label1.Caption = List1.List(List1.ListIndex)
End If
ciaociao

 nella click:
e se modifico la selezione con il tasto freccia (come chiedeva l'op)?
(e due ;-) )
--
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo

 (e due ;-) )
errore clamoroso!!
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vb98/html/v
bevtclick.asp
funziona anche con i tasti freccia


 grazie.
Allora...
Quando fai click, già basta per selezionare un elemento. Il click
corrisponde sia al semplice click col mouse che allo spostamento nella lista
con le frecce. Quello che devi guardare è una proprietà chiamata ListIndex
che ti identifica la posizione della selezione. Il numero corrisponde sempre
alla posizione dell'elemento - 1 (okkio a questo, eh!)
Inserisci questo codice nel doppioclick!
If List1.ListCount > 0 Then Label1.Caption = "La riga selezionata è la n° "
& List1.Listindex
Spero di non aver detto una minkiata e di essere stato d'aiuto
^_^

 > grazie.
 
Addirittura l'evento click parte anche al caricamento della form mi sembra
.. e' possibile?


 funziona anche con i tasti freccia
eheheheh......1 pari

 sembra .. e' possibile?
dipende da cosa fai al caricamento ;-)
ciaociao

 .. e' possibile?
Dipende da quello che fai durante il caricamento; in effetti il nome "Click"
e' improprio per questo evento (e non a caso e' stato cambiato in 
VB.NET
) in
quanto a tutti gli effetti e' l'evento di notifica per quando la selezione
in lista cambia, compreso il caso in cui la selezione diventa nulla, ovvero
quando la property ListIndex vale -1
Ciao
-- 
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

 .. e' possibile?
prova a mettere un'option-button, e a gestire l'evento Click di questo
option-button.
poi sul Form_Load metti option-button.Value = True, vedrai che si scatena
l'evento Click.
In effetti, come hanno già detto altri, il Click non è tanto l'evento stesso
del mouse, quanto il cambiamento della selezione su una listbox o la combo,
ad esempio......
good coding!!!
-- 
Damiani Liborio Igor
http://www.igordamiani.it
Nella finestra Debug di VB:
Nome="igor":? Nome & Chr$(64) & Nome & "damiani" & Chr$(46) & "it"
Che tu sia maledetto, SWEN...

 quando la property ListIndex vale -1
Giusto infatti per scatenare l'eventoclick setto la listindex a 0 al load
della form
e tutto il codice lo inserisco nell'evento click
thanks.
ps. il casino era dato appunto dal nome click che sembrerebbe 
scatenato da un clicckaggio  :-))

Newsgroup: it.comp.lang.visual-basic
Titolo: Problemino con VBA e AutoCAD

End Sub

...
Scusami ma non so rispondere al tuo problema. Vorrei solamente chiederti
se saresti cosě gentile da indicarmi qualche fonte di informazione da cui
partire per iniziare a programmare VBA-AutoCad. Tu cosa ne pensi?
Potrebbe diventare utile dal punto di vista professionale??
Grazie Raffa73 Visual Basic Programmers


   La fonte primaria e' l'help in linea di autocad14 (ActiveX
Automation). Io ho iniziato da li', ma devo aggiungere che conoscevo
gia il Visual Basic for Application di Excel, quindi il passaggio e'
stato rapido.
   Se usato in combinazione con Excel, che io uso sia per lanciare le
macro, sia per far leggere i dati numerici da passare ad Autocad, il
visual basic diventa un strumento molto potente. Autocad14 implementa
per la prima volta il visual basic, per cui c'e' da aspettarsi la
presenza di un bel po di bugs. Si tratta solo di avere pazienza,
comunque.
   Ciao.

Newsgroup: it.comp.lang.visual-basic
Titolo: visual basic 6 e connessioni ado

mi connetto ad un database in msde2000
sto cercand di capire il BOF.
il controllo adodc funziona bene.
Ma se non voglio usare adodc, il BOF e l'EOF non stanno dove dovrebbero stare.
il BOF ad esempio sta prima del primo record e di conseguenza se visualizzo quel record mi da un errore.

 visualizzo quel record mi da un errore.
bah, non mi funziona più il quotefix... comunque:
Il bof è true quando sei "prima del primo record" e l' eof è quando sei
"dopo l'ultimo record", quindi quando sei in condizione di bof o eof non hai
un record corrente.
Non so quale fosse la tua convinzione in merito, ma la realta è questa: il
bof non è sul primo record e l'eof non è sull'ultimo.
Salutoni
Sergio


http://makeashorterlink.com/?H3E321545

 bof non è sul primo record e l'eof non è sull'ultimo.
ok. grazie

 
http://makeashorterlink.com/?H3E321545
interessante discussione.
in pratica mando indietro e poi controllo se č BOF (ed č meglio controllare
anche EOF che non ci siano 0 records), in tal caso se non č EOF mando al
primo record :)
grazie.

 primo record :)
Arghhhh, capisco che la discussione sia lunga, pignola e tediosa, ma non
l'hai letta con attenzione.
BOF _e_ EOF, su un recordset con records, non sono mai veri insieme!
La regola è sempre la stessa:
-Appena aperto il rs, testare se BOF _e_ EOF sono entrambi veri. Se sì, non
ci sono records, quindi chiudere e basta.
-Dopo _ogni_ movimento (Move-eccetera) testare BOF oppure EOF. Se anche uno
solo (e sarà uno solo se il rs ha records!) dei due è vero, non siamo
all'interno del recordset (non esiste record corrente), quindi muoversi
(Move<First Last>) in modo da mettersi su un record che sarà il corrente

 ci sono records, quindi chiudere e basta.
uff.. allora leggimi meglio e capiscimi :o)

 primo record :)
in effetti ho scritto una cavolata...
controllo BOF EOF :o)
poi faccio eventualmente tutto il resto mediante i metodi discussi..

 Come no?? In assenza di record!
Cazzo, sta li sopra!

 uff.. allora leggimi meglio e capiscimi :o)
Ti ho letto, ma non t'ho capito.

 Ti ho letto, ma non t'ho capito.
leggi il mio post delle 9.40 va...
non mi sono capito neppure io :)))
Newsgroup: it.comp.lang.visual-basic
Titolo: VB6 - FTP

Come si utilizza ftp con vb6?
Grazie.

 Come si utilizza ftp con vb6?
Internet Transfert Control
-- 
Salutoni
Sergio
La vita è un lungo apprendistato per imparare ad essere giovani
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Come si utilizza ftp con vb6?
Col winsock.
Bye,
-- 
Carmine ( 
pikachu...@gmail.com
 (Togli la scritta NOSPAM) )
Webmaster di The Total Site 4 : 
http://www.thetotalsite.it
My Blog: 
http://www.thetotalsite.it/blog
MariokartDS Codice Amico: 532639027909 - CarmineC in MarioKartDS
"Un problema non č un problema se puņ essere risolto" 

 Come si utilizza ftp con vb6?
Ecco un piccolo esempio:
http://www.vbsimple.net/
 (scegli Client/Server e scarica il tutorial per 
  FTP)
Oppure guarda su 
www.it-lang-vb.net
 che è il sito comune di questo 
newsgroup.
In alternativa c'è 
planetsourcecode.com
E ricorda... google è tuo amico :)
bey

 ha scritto nel messaggio
news:TCJ1g.89871$A83.2...@twister1.libero.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: ? Proprietà di tipo lista in OCX

Come posso aggiungere una proprietà di tipo List in un controllo ActiveX?
Grazie
Fabrizio

Cerca su Dejanews i messaggi di qualche tempo fa (una settimana): il thread è "OCX e proprietà complesse" e c'è una
risposta di Alex che mi è stata di grandissimo aiuto a risolvere un problema analogo.
Ciao,
Moreno
#sirri#@
morenosoft.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
Home Page - 
http://www.geocities.com/SiliconValley/Bridge/1414/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------


Trovato, grazie...
Adesso provo, faccio anche delle prove sulla WriteProperties che in effetti
era quello che mi serviva.
Avrai mie notizie in caso di esito positivo.
Fabrizio
Newsgroup: it.comp.lang.visual-basic
Titolo: Comprare VB6

Qualcuno conosce dei siti dove si può comprare VB6 (eventualmente che
accettano pagamenti in contrassegno o con bollettino postale) oppure dei
negozi dove si può comprare ad un prezzo non da estorsione?
(ho visto su alcuni siti che vendevano Vb6 (non tutto il visual studio) in
versione professional a 2.999.000 e francamente mi sembra che ci stanno
mangiando sopra un bel pò.
Quando dovrebbe costare solo il Vb6? (a me non interessa quella interprise
ma la licenza minima che mi permetterebbe di distribuire un programma, e
quindi non quella studenti, anche perchè non studio :-) ).
Paradossalmente mi basterebbe la licenza anche senza i dischi perchè per
lavorare già uso VB ma non è mio, ma della mia società (e qui riapro una
piccola parentesi sul messaggio postato due giorni fà al quale nessuno ha
risposto, possibile che nessuno sà se è possibile distribuire un programma
compilato con un vb di cui la licenza non appartiene a me, ma alla mia
società?)
Gianni Moretti

| Paradossalmente mi basterebbe la licenza anche senza i dischi perchè per
| lavorare già uso VB ma non è mio, ma della mia società (e qui riapro una
| piccola parentesi sul messaggio postato due giorni fà al quale nessuno ha
| risposto, possibile che nessuno sà se è possibile distribuire un programma
| compilato con un vb di cui la licenza non appartiene a me, ma alla mia
| società?)
|
| Gianni Moretti
|
è la tua società? sei proprietario?
altrimenti mettiti nei panni della tua azienda che fa SW, pensi che sarebbe
contenta di dare gratis l'uso della sua licenza dopo averla pagata cara ,al
primo che gli chiede se può guadagnare qualcosa senza avere nessuna
responsabilità sui danni che potrebbe fare e rischiare con i soldi e i
permessi altrui?mah!

 società?)
è ovvio che non puoi.
MarioH

Ok, quindi domanda 2...dove posso comprare VB6 ad un prezzo decente? E
sopratutto quale prezzo può considerarsi decente per la versione
Professional?
Gianni Moretti

 wrote in message
news:9fsdqn$5sqgg$1...@ID-77941.news.dfncis.de...


 ha scritto nel messaggio
news:9fsdqn$5sqgg$1...@ID-77941.news.dfncis.de...


Professional?
Ti compri la Learning (250.000).
La provi, e se non ti basta (è un po' limitata, e _credo_ tu non possa
vendere i tuoi programmi) fai l'upgrade a PRO (700.000).
Lo so, sono soldi, ma sempre meno del milione e mezzo della PRO Full.
Ciao

 Professional?
oggi qno lo offriva a 650, mi semrba buono.
seno'
http://www.emsps.com/oldtools/msvb.htm
Newsgroup: it.comp.lang.visual-basic
Titolo: Excel - celle protette

Ciao a tutti...
Due belle domande per voi su vba di excel...
E' possibile impedire che venga visualizzata la finestra che dice di
sproteggere la cella quando
si preme un tasto su una cella protetta?
E' possibile intercettare la pressione di un tasto prima che venga "letto"
da excel?
(in questo modo potrei controllare prima se la cella e' a sola lettura...)
Grazie.
Max

> Max:

Il codice seguente impedisce l'immissione in celle protette. Anche quando il
foglio non e` protetto!
Pero` e` lento, non testato, non ottimizzato e... puo` darsi che non sia ne'
il modo migliore ne' il piu` furbo di fare cio` che chiedi.
Se ne cavi fuori qualcosa di decente potresti essere cosi` gentile da
informare il ng? Lo stesso dicasi nel caso tu trovi una soluzione migliore.
Grazie.
ThisWorkbook:
Option Explicit
Private Sub Workbook_SheetSelectionChange( _
  ByVal Sh As Object _
, ByVal Target As Range _
)
  Const strProcNoInput As String = "NoInput"
  Dim i As Integer
  With Target
    If .Locked Then
      For i = 32 To 255
        On Error Resume Next
        Excel.Application _
          .OnKey Key:=Chr$(i), Procedure:=strProcNoInput
        If Err.Number Then Excel.Application _
          .OnKey Key:="{" & Chr$(i) & "}", Procedure:=strProcNoInput
        On Error GoTo 0
      Next
    Else
      For i = 32 To 255
        On Error Resume Next
        Excel.Application _
          .OnKey Key:=Chr$(i)
        If Err.Number Then Excel.Application _
          .OnKey Key:="{" & Chr$(i) & "}"
        On Error GoTo 0
      Next
    End If
  End With
End Sub
Modulo1:
Option Explicit
Public Sub NoInput( _
)
  Beep
End Sub
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

 wrote in message 8tvji1$m3t$1...@nslave2.tin.it...
: Ciao a tutti...

:
:
:
:
Newsgroup: it.comp.lang.visual-basic
Titolo: Accesso Database

Scusate la mia enorme ignoranza. Ho iniziato a programmare con VB e ho
inizato a fare programmi che richiedono l'accesso ai dati di access. Se non
volessi usare il controolo approrpiato, potete darmi delle dritte su come
usare, credo si chiamino, "recordset".
Cioè come faccio ad aprire e chiudere DB, come faccio a leggere record, etc,
magari se esiste anche un programmino d'esempio.
Grazie anticipatamente a quanti vorrano aiutarmi.

 magari se esiste anche un programmino d'esempio.
Da me c'è un esempietto che usa un db access...
http://www.gbcweb.com/free/vbsamples/samples_print_EtichetteDatabaseListview.zip
Apre, legge, scrive, elenca...
Fa un po' tutto quello che si dovrebbe fare con un db, a parte la
creazione che è in un altro esempio.
-> GbC|
www.gbcweb.com

[*Tpollkjjd* = 
olk...@jayo.com
 in news:9bOlb.34703$
e5.12...@news1.tin.it
]
ha scritto:

Vedi ESP0DAMA sul Sito Comune

Newsgroup: it.comp.lang.visual-basic
Titolo: in preda ad un esaurimento nervoso...

Ciao, chi mi aiuta a risolvere questo problema???
Parlerň degli oggetti ADO di Visual Basic
Allora:
1) mi creo la mia bella connection
2) mi creo un command che chiamo CICCIO sql cosě fatto:
SELECT KA, DESCRIZIONE, CODICE FROM Articoli WHERE (KA = @p1)
dove p1 č un parametro
3) associo ad una mshflexgrid questa cosa qui:
dim numero as integer
DataEnvironment1.CICCIO (numero)
Set MSHFlexGrid1.Recordset = DataEnvironment1.rsciccio
4) funziona
Ora facciamo il giochetto piů difficile:
1) mi creo la mia bella connection
2) mi creo un command che chiamo CICCIO sql cosě fatto:
SELECT KA, DESCRIZIONE, CODICE FROM Articoli WHERE (KA = @p1) AND
(DESCRIZIONE = @p2)  dove p1 č un parametro e p2 č un altro.
3) associo ad una mshflexgrid questa cosa qui:
dim numero as integer
dim numero2 as integer
numero= ...lo trovo da qualche parte
numero2= ...lo trovo da qualche parte
DataEnvironment1.CICCIO (numero,numero2)
Set MSHFlexGrid1.Recordset = DataEnvironment1.rsciccio
4) NON FUNZIONA. Ma perchč cavolo allora quando digito e apro la parentesi
dopo CICCIO accetta solo un parametro e se provo a mettercene due mi dice
che č errato SE E' LUI CHE MI RICORDA CHE l'SQL CE NE HA DUE??????
Grazie, gia mi sento meglio...
Buon Natale, e fatemelo sto regalo :-)
Ciao, Massimo
Newsgroup: it.comp.lang.visual-basic
Titolo: Avviso nel cancellare record nel dataGrid

Salve a tutti
ho un problema con un messaggio quando cancello le righe di un data grid. Ho 
usato questo codice:
Private Sub grdDataGrid_BeforeDelete(Cancel As Integer)
Cancel = MsgBox("Vuoi cancellare il record selezionato?", vbYesNo + 
vbDefaultButton2 + vbExclamation) = vbNo
End Sub
Quando clicco su SI mi cancella il record tranquillamente, quando invece 
dico di annullare l'operazione di cancellazione, mi compare un altro avviso 
del componente stesso, che mi avverte che è stata annullata l'operazione.... 
come posso eliminare quest'ultimo messaggio?

 ha scritto nel messaggio 
news:4414a45c$0$29721$4faf...@reader2.news.tin.it...

Vai a vedere l'evento Error generato dalla griglia stessa.
Basterà impostare il parametro response =0
Fammi sapere se è questo quello che volevi ottenere.
Umbe 


Si si...era proprio questo.
grazie mille

Newsgroup: it.comp.lang.visual-basic
Titolo: SYSTEM ERROR &h480004002 - HELP!!!!!

Salve a tutti,
Quando provo a caricare gli OCX (CTRL T) ricevo questo errore : 
SYSTEM ERROR &h480004002 
(-2147467262
)
INTERFACCIA NON SUPPORTATA
Ho dis-installato e re-installato Visual Basic, ma
non c'e' niente da fare.
Ogni suggerimento e' ben accetto.
Grazie
Ciao
Luca
______________________________________________________
Get Your Private, Free Email at 
http://www.hotmail.com
--
Posted from [155.208.254.100] by way of 
f65.hotmail.com
 [207.82.251.205]
via Mailgate.ORG Server - 
http://www.mailgate.org

 
Tu ultimamente cosa hai installato?
io:
- OCX per gif animate
- xara webstyle
Altro non ricordo...
Ho provato a ripulire a mano il registry ma non e' cambiato un tubo :-((
-- 
Hi, Ciao
Ettore                 By -MES-
http://freeweb.aspide.it/freeweb/ilmes
 
(con OCX per stampare i Recordset)
Il sito comune di programmatori VB
http://members.xoom.com/it_lang_vb

Ho provato a ripulire a mano il registry ma non e' cambiato un tubo :-((
Nel CD del VB ci sono due files.REG... li ho avviati e in quel momento tutto
riprese nella normalità...
(Pero' erano i controlli SOLO di VB a darmi errore...)
Ciao e spero di esser stato utile...

 Ciao e spero di esser stato utile...
:-(((
Non ha funzionato!!
E io sono qui che non posso usare il VB5 che sta sulla mia macchina!.
Altri consigli?


> riprese nella normalitą...


Altri consigli?
Per risolvere il problema devi reistallare la versione corretta di
comcat.dll.
copia il file comcat.dll, versione 4.71 (22k), dalla directory
..\DevStudio\VB\Setupkit\kitfil32\sys32 o dal tuo CD di Visual
Basic nella directory Windows\System o WinNT\System32.
Usa REGSVR32.EXE per registrare COMCAT.DLL.
      regsvr32 comcat.dll
Ciao
	Fabrizio
Fabrizio Lucidi               | System Administrator
E-mail: 
f.lu...@cline.it
     | UmbriaNet s.r.l. 
http://www.cline.it
ICQ #: 9254716                | Internet Services Provider
PGP Fingerprint: FC47 D742 CBF9 A732 9AF3 09C4 DA2A D810 4BA2 E13B
Newsgroup: it.comp.lang.visual-basic
Titolo: passare parametri alla line adi comando

Mi chiamo Carlo Cardella, ed abito in provincia di Parma.
Con VB 6.0 ho creato una piccola utility, che divide un file di testo di
grandi dimensioni, in file piů piccoli, in modo da essere visualizzati piů
facilmente da una procedura esterna.
Per il momento, la scelta del file da dividere viene effettuata tramite
"CommonDialog.FileName", ma perchč tutto funzioni correttamente, devo
passare al programma (ad una variabile di tipo stringa) il nome del file
dalla linea di comando (sia di Windows 9x che NT).
Attualmente, se il file č piů piccolo di 10000 byte, compare un MsgBox che
informa che non č necessario "dividere" il file. Quindi vi chiedo:
1. Come faccio a passare tale parametro?
2. Come posso farmi restituire un messaggio del genere, che venga
visualizzato solamente alla linea di comando?
Grazie a tutti coloro che sapreanno darmi anche un semplice suggerimento.
ccar...@altavista.net

 wrote in message
BpS64.18976$m62.1...@news.infostrada.it...


Per restituire parametri puoi usare errorlevel, restituisci 0 se non deve
visualizzare nulla e 1 se deve visualizzare il comando.
Credo ci sia un esempio sul sito comune.
Newsgroup: it.comp.lang.visual-basic
Titolo: [?]durata di un wav.

Come posso trovare la durata di un file wav
grazie amici!
pica...@labnet.it

...

















------------
Ciao!
Per trovare la durata di un file WAVE, devi utilizzare l'interfaccia MCI.
Ecco la dichiarazione:
Private Declare Function mciSendString Lib "Winmm.dll" Alias
"mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As
String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
Con il seguente codice, ottieni la durata del file "Tada.wav", fornito di
default con Windows. Ovviamente, al posto di questo, puoi specificare
qualsiasi altro file WAV:
    Dim Ret As Long
    Dim ReturnString As String
    Dim Durata As Long
    Dim TipoDurata As String
    ReturnString = Space(127)
    'Apre il file
    Ret = mciSendString("open C:\Windows\Media\Tada.wav alias MMFile",
ReturnString, 127, 0)
    'Recupera la durata del file.
    Ret = mciSendString("status MMFile length", ReturnString, 127, 0)
    Durata = ReturnString
    'Recupera il formato della durata.
    Ret = mciSendString("status MMFile time format", ReturnString, 127, 0)
    TipoDurata = ReturnString
    'Chiude il file.
    Ret = mciSendString("close MMFile", ReturnString, 127, 0)
    'Visualizza la durata del file.
    MsgBox "Durata del file: " & Durata & " " & TipoDurata & ".",
vbInformation
Al termine dell'esecuzione, le variabili "Durata" e "TipoDurata"
conterranno, rispettivamente, la durata del file e il tipo di durata
(minuti, secondi, millisecondi, ecc.). ATTENZIONE: se specifichi un nome con
degli spazi, devi inserirlo tra virgolette. Mi spiego. Se vuoi ottenere la
durata del file "The Microsoft Sound.wav", al posto di:
    Ret = mciSendString("open C:\Windows\Media\Tada.wav alias MMFile",
ReturnString, 127, 0)
Devi inserire l'istruzione:
    Ret = mciSendString("open " & Chr$(34) & "C:\Windows\Media\The Microsoft
Sound.wav" & Chr$(34) & " alias MMFile", ReturnString, 127, 0)
Spero di essere stato il più chiaro possibile; se ci fossero altri problemi,
fatti sentire
Per adesso, ciao
Marco Minerva
http://www.geocities.com/SiliconValley/Foothills/7260/
http://www.armaditaggia.com/marco

Newsgroup: it.comp.lang.visual-basic
Titolo: domandina su listview

Ciao, il mio problema è il seguente:
sul form ho una listview e più textbox, seleziono una riga della listview e
poi clicco su uno dei controlli textbox... così facendo la selezione sulla
listview sparisce e non so più visivamente su quale voce mi trovavo.
non è possibile dare il fuoco ad un altro controllo lasciando però visibile
sulla listview la selezione?
grazie per l'aiuto
max

 sulla listview la selezione?
Proprieta' HideSelection = False
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!
Newsgroup: it.comp.lang.visual-basic
Titolo: Programmare un piccolo sever ftp

Da dove iniziare? Qualcuno conosce un buon tutorial?

 writes:
TT> Da dove iniziare? Qualcuno conosce un buon tutorial?
Le RFC  del protocollo  ? Non è  banale da  fare, occhio, e  rischi di
aprire la porta a ravanate mostruose...
--
Gian Uberto| main(){printf(&unix["\021%six\012\0"],(unix)["have"]+"fun"-0x60);}
Lauri      |                        David Korn, 1987 ioccc best one liner 
(aka saint)|-------------------------------------------------------------------
em@ail: 
sa...@eng.it
 ( vedere X-nospam nello header - see X-nospam in header )

http://www.vbtimes.net
Puoi iniziare da qui... C'é un piccolo esempio... Spero che sia valido io
non l'ho ancora guardato (prima aspetto l'arrivo di FastWeb a casa mia...
:))
        Ciao
                Allanon

Newsgroup: it.comp.lang.visual-basic
Titolo: Controllo porta seriale

Ciao a tutti,
devo scrivere una applicazione che trasmette/riceve dati sulla porta
seriale.
Esiste un controllo free per la sua gestione.
Esiste uno Microsoft? Dove č? Non l'ho trovato nei componenti.
Grazie
Mauro

 ha scritto nel messaggio
news:k3Z57.368$NZ6....@news.infostrada.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Sono tornato ! E chissa' qui cosa e' successo...

Per le faq, per tutte le beghe che c'erano, alla fine e' venuto fuori
qualcosa ? Nessuno pu farmi un riassunto veloce ? Pieta',ero in
vacanza........................................................................................
Ciao !
°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°
 -----------Federico Emanuele Galli----------
 ----------Visual Basic's Programmer---------
 
 Sideralis Programs (Visual-Basic and Delphi)
 
http://www.geocities.com/colosseum/loge/2151
°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°
                 Trust no ONE.
Per rispondermi via E-Mail togli STOPSPAMMERS.
Guarda la RFD per it.comp.prog.collaborazione !

 
Come tutti, io sono tornato oggi... :-((
Ne riparliamo i primi di settembre, quando ci siamo tutti.
-- 
Hi, Ciao
Ettore                 By -MES-
http://freeweb.aspide.it/freeweb/ilmes
Il sito comune di programmatori VB
http://members.xoom.com/it_lang_vb

Newsgroup: it.comp.lang.visual-basic
Titolo: Verifica Codice Fiscale

Avrei bisogno di una funzione generica di controllo della validita' del
codice fiscale e della partita iva. Qualcuno sa dove posso trovarla ?
Grazie
    Giuseppe

 wrote in message
8toudt$j4j$1...@news.flashnet.it...



Sul sito comune!
Le risposte alle tue domande le trovi sul Sito Comune di questo
NewsGroup:
 
http://www.murialdo.it/it_lang_vb
 
federic...@planet.it
Eliminare NOSPAM dall'indirizzo! Delete NOSPAM from address!
Newsgroup: it.comp.lang.visual-basic
Titolo: Listbox e immagini...

Sapete se č possibile ed in quale modo inserire davanti ad ogni
elemento della lista una immagine (tipo l'icona che caratterizza i
file in gestione risorse)?
Grazie e ciaOOOO! :-)
               --Please also reply via E-Mail--
                      4169522043485253

...


Grazie, purtroppo questa soluzione la conoscevo...
Il problema è che ho bisogno di assemblare un progetto non superiore
ai 2 MB e quasi li ho già raggiunti.
Gli ocx della Ms mi porterebbero ad oltrepassare la soglia che mi
hanno imposto!
Grazie ugualmente e ciaOO! :-)


Newsgroup: it.comp.lang.visual-basic
Titolo: Penna ottica

Salve a tutti,
vorrei creare una applicazione per leggere i codici a barre mediante
penna ottica. Chi di voi puo' indicarmi il controllo da dover utilizzare
?
Premetto che il software e' per uso  personale.
Grazie
--
Posted from [195.223.72.130]
via Mailgate.ORG Server - 
http://www.mailgate.org

 wrote in message
news:37E6BAC2...@acsys.it...


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

ciao a tutti, sto creando un programma e mi serve una mano: dovrei stampare
un normale file di testo (*.txt) direttamente dal programma.
potete aiutarmi?
per favore nn mi dite di visualzzare la guida in linea perchè nn ce l'ho.
grazie a tutti.
hellflame


Senza guida in linea non si va avanti... E' indispensabile
Ciao,
Mattia

 l'ho. grazie a tutti.
non puoi farlo, mi spiace !

è veramente impossibile stampare un file da un programma? O___O

 č veramente impossibile stampare un file da un programma? O___O
Si per uno che non ha la guida si !

 č veramente impossibile stampare un file da un programma? O___O
Senza guida, sě. Assolutamente impossibile.

č veramente impossibile stampare un file da un programma? O___O
No č possibilissimo!!!... basta AVERE la guida.
Andrea.

 Andrea.

Parte Descrizione
Cito da Eula.txt di msdn Luglio 2001 (l'ultima di vb6)
MASTER END-USER LICENSE AGREEMENT
MSDN, THE MICROSOFT DEVELOPER NETWORK
SUBSCRIPTION:
5.2    MSDN Library-Additional Rights and Restrictions.
 a.    Documentation. For the MSDN Library, Microsoft grants you a
 worldwide, nonexclusive, nontransferable, royalty-free right to
 make, use, and install an unlimited number of copies of the MSDN
 Library solely for internal use by an unlimited number of end
 users so long as: 
(i) such end users are persons who are
 generally granted access to your internal network; 
(ii) such
 copies shall be used only for internal purposes and are not to be
 republished or distributed (either in hard copy or electronic
 form) beyond your premises; 
-- 
Tanto mi sembrava doveroso,
hal
Newsgroup: it.comp.lang.visual-basic
Titolo: CRYSTAL REPORT - CHE GRAN BEL PROGRAMMA ... BLEH...

ma e' possibile che modicando i campi del database le stampe sono funzionano
piu'????
Ad esempio, se ho una tabella clienti ed aggingo un campo (es. Estero
(si/no))
la stampa della rubrica non funziona piu' bene a meno che non si effettua
l'aggiornamento del database da crystal report.
vi sembra normale che a noi programmatori ci vendono dei componenti che ci
dovrebbero semplificare la vita con delle "stronzate" cosi' grandi... Oltre
a risolvere i nostri problemi, dobbiamo risolvere anche i loro...
piccolo sfogo...

a risolvere i nostri problemi, dobbiamo risolvere anche i loro...
Infatti e' pere questo che dopo aver provato CR per un a mezz'oretta
ora uso soltanto Printer con soddisfazione ;-)
-- 
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: Programma per Twain

Qualcuno sa di qualche sorgente od ocx per prendere immagini dal driver
twain dello scanner??
grazie 1000
cos...@mediacom.it

...


Probabilmente i controlli della Wang possono fare al caso tuo (dovresti
averli nel tuo pc).
Oppure dai un'occhiata in 
http://eztwain.com
Ciao, Stefano

Newsgroup: it.comp.lang.visual-basic
Titolo: Tendine di transizione

Qualcuno conosce un sistema per porre delle "tendine di transizione" per
far susseguire delle immagini in un form?
In pratica, mettendo una immagine in un controllo picture o image o come
sfondo del form, successivamente ne devo far comparire altre, che "entrino"
con qualche effetto tipo dissolvenza, scorrimento, ecc...
Esiste un sistema, od un controllo per fare cio' (anche di terze parti e/o
all'acquisto) ???
Grazie a chiunque vorra' aiutarmi.
-- 
Gabriele Ponzo
gpo...@wnet.it
http://www.wnet.it/gponzo


Potresti provare il controllo FXImage (degli FXTools).
L'ho usato per fare alcune cose, va bene se hai bisogno solo di un gran
numero di possibili effetti di apertura/transizione e altro (buono per
cataloghi multimediali et similia), va un po' meno bene se devi aprire
diversi formati grafici (Tiff, png, o altro) o se devi lavorare pesantemente
sull'immagine (editing, etc), per queste cose vanno meglio i controlli
LeadTools.
Entrambi sono commerciali e credo che costino un po' :-(
Roal Zanazzi
z...@iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Istruzione FORMAT

Forse qualcuno sa aiutarni:
FORMAT(0.05, "0.###") = "0.05"
FORMAT(0.059, "0.###") = "0.059"
FORMAT(0.0596, "0.###") = "0.06"
Bye by Massimo 8-]

 wrote in message
news:3912A60B...@txt.it...

Cito la guida:
# - Segnaposto di cifra. Visualizza una cifra o non visualizza niente. Se
l'espressione include una cifra nella posizione in cui appare il simbolo di
numero (#) nella stringa di formato tale cifra verrà visualizzata; in caso
contrario in tale posizione non verrà visualizzato niente.
Questo simbolo ha la stessa funzione del segnaposto di cifra 0. La sola
differenza è che gli zeri iniziali e finali non vengono visualizzati se il
numero contiene un numero di cifre uguale o minore rispetto ai caratteri #
presenti a destra o a sinistra del separatore decimale nell'espressione di
formato.
Nel tuo caso:
0.0596 > (0.0596 + 0.0004) Convertito in cifra con 3 decimali con
arrotondamento > 0.0600 > 0.06
Ma tu vorresti per caso che restituisse 0.059?
allora prova così:
    a=0.0596
    a = Int(a*1000)/1000
    Format(a, "0.###") = 0.059
Ciao. A.D.


Avendo dato solo tre spazi per i decimali, il 0.0596 viene
arrotondato: il sei finale (essendo maggiore di 5) porta
all'incremento di una unità del 9, che diventando 10 porta
all'incremento di una unità del 5: risultato 0.06.
Se metti quattro cancelletti, risolvi il problema, ma ti si riproporrà
se utilizzerai decimali di 5 o + cifre.
--
 
federic...@planet.it
Eliminare NOSPAM dall'indirizzo! Delete NOSPAM from address!

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

e' possibile creare una toolbar in VB5 che contenga pulsanti ad elenco
(stile comboBox)??
grazie per l'aiuto,
                                    ALex

con VB5 è possibile se mandi messaggi alla Toolbar con la SendMessage
(prova a cercare sul sito del NG). Con VB6 il nuovo OCX ha tutte le
proprietà necessarie
Ciao
Riccardo


proprietà necessarie
Ciao
            ALex

                                    ALex
Ciao
suppongo che tu abbia già la toolbar con dei bottoni e che tu vogliai aggiungere
una ComboBox alla fine dei bottoni.
Prova a scrivere questo codice:
  ' aggiungo una combobox a run-time
  Dim b As Button
  Set b = Toolbar1.Buttons.Add(, , , tbrSeparator)
  Set b = Toolbar1.Buttons.Add(, "combo1", , tbrPlaceholder)
 
  With Combo1
   .Move Toolbar1.Buttons("combo1").Left, Toolbar1.Buttons("combo1").Top
   .AddItem "rosso"
   .AddItem "verde"
   .AddItem "blu"
   .ListIndex = 0
  End With
Corrado

...


 
Il nuovo ComCtl32.OCX di VB6 ti permette di farlo!
Ciao
Riccardo
Newsgroup: it.comp.lang.visual-basic
Titolo: Auto-sorgenti?

Anni fa esistevano programmi tipo, DBsee, che permettevano, senza conoscere
un linguaggio, di creare applicazioni (DBsee creava applicazioni DBIII) e
credo anche i sorgenti.
Praticamente erano dei wizard dedicati ad un linguaggio particolare.
Esiste qualcosa anche in VB? Ho visto il wizard di VB6 che crea solo la
struttura del programma ma nient'altro.
Grazie a tutti
Sb

 Sb
-- 
regards,
Simon

 ha scritto nel messaggio
news:3DC6B10C...@fru.com...


 ignoro l'utilità.
ti contraddico.....
esistono dei programmi (mi sembra che si chiamino CASE) che fanno
sostanzialmente quel lavoro, e che producono il sorgente in vari linguaggi.
Ho un amico che usa GENEXUS, ma mi pare che costi 10.000 euro e rotti
Salutoni
Sergio

 struttura del programma ma nient'altro.
Sul menu Aggiunte Vb crea parecchie cose *funzionanti* (anche se
complicate!) come inserimento anagrafiche, anche testate-righe...
Non so se può servirti...
Ciao Al3x

Newsgroup: it.comp.lang.visual-basic
Titolo: CReports e RecordSelectionFormula

Ciao a tutti, volevo sapere se da visual basic posso fare una cosa del
genere:
CRpreport.RecordSelectionFormula = "{ANAGRAFE.COGNOME} LIKE '" & txtFiltro &
"%'"
con txtfiltro="GI"
Cioè filtrare tutti i campi che ad es. hanno come cognome GI****
Con l'uguale mi funziona, ma se faccio come sopra, mi fa apparire il report
senza i dati (se invece in txtfiltro scrivo il nome completo tutto
rifunziona come usassi l'uguale).
Grazie a tutti :)

Caro Andrea,
credo che tu confonda la sintassi SQL con quella del CR.
Infatti, per lo meno nella mia versione CR 7, non esiste l'operatore LIKE ma
il suo equivalente StartWith:
CRpreport.RecordSelectionFormula = "{ANAGRAFE.COGNOME} StartsWith "GL""
Non ricordo se si devono inserire gli apici o le virgolette attorno a GL:
verifca tu, per favore.
-- 
Ciao!
Ettore Massimo Albani
(leva ANTISPAMMER dall'indirizzo per inviare messaggi)

 verifca tu, per favore.
Ecco qua la stringa funzionante:
CRpreport.RecordSelectionFormula = "{ANAGRAFE.COGNOME} StartsWith '" &
txtFiltro & "'"
In pratica singolo apice, non ho provato però l'altra, magari va anche lei
:)
Grazie ancora
Newsgroup: it.comp.lang.visual-basic
Titolo: vb6

does anyone have or know where to get the full version of vb6?

 does anyone have or know where to get the full version of vb6?
Yes, from Microsoft Corporation or in every computer shop.
^__^
Zeross

Newsgroup: it.comp.lang.visual-basic
Titolo: !Programmi Personalizzabili per tutti!

Per qualsiasi richiesta di realizzazione programma , rivolgersi privatamente
per E-mail, Sono a vostra completa  disposizione , cono prezzi
bassissimi!!!!
Creazione @Pagine WEB e PROGRAMMI WINDOWS95/98@
pica...@labnet.it
                                                          Progr. Raffaele
Picardi



Newsgroup: it.comp.lang.visual-basic
Titolo: vb.net

non mi č ancora chiaro: ho letto di tutto & di piů, ed ogni mese cambia
qualcosa
vb.net
 č visual basic 7 o č tutt'altro? i miei progettini vb6 potranno
essere migrati in 
vb.net
 senza danni?

 essere migrati in 
vb.net
 senza danni?
Dipende dal progetto... le prove di conversione automatica che ho fatto
finora con la Beta 2 , anche su progetti abbastanza piccoli, non sono
particolarmente incoraggianti; le classi vanno via abbastanza bene,
l'interfaccia un po' meno, non che il Wizard funzioni tanto male ma comunque
sei costretto a rivedere il codice praticamente riga per riga...
Ciao
--
Luca Dormio
luca....@tin.it

 finora con la Beta 2
Visto che ce l'hai:
L'ambiente di sviluppo gira anche su Win98?
E gia' che ci sono:
Il ".NET Framework SDK" e' l'equivalente + o - di Visual Studio? Saro' tardo
ma non ho ben capito cosa intende M$ con questo "Framework SDK" ...

 ma non ho ben capito cosa intende M$ con questo "Framework SDK" ...
Magari non sara' la spiegazione piu' precisa ma diciamo che e' tutta
l'infrastruttura .NET *tranne* l'IDE; quindi include il CLR, 
ASP.NET
, i
compilatori le utilities ecc. mentre l'IDE e' 'Visual Studio .NET'
Tanto e' vero che le beta disponibili sono 2; una solo con l'SDK e una
completa di VS..


La beta2 supporta solo Win2000 e XP.
Ciao
Corrado

Newsgroup: it.comp.lang.visual-basic
Titolo: Help sulle Api

Dove posso trovare un file di Help sulle Api di windows 97 / nt 4.0?
grazie a tutti, Rick

Questa pagina riporta la documentazione completa delle API di windows a 32
bit. E' un bel pacco di 8Mb, ma se hai pazienza...
 
http://home1.swipnet.se/~w-10159/files/win32hlpfiles/

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

ciao a tutti, ho un datagrid generato da un wizard di vb 6.0 che si appoggia
ad un sql server 7 e raccoglie i dati di una tabella.. mi sapreste indicare
delle righe di codice per trovare dei record all'interno di quella tabella?
voglio dire che una volta trovato quel valore alla tot colonna, metta in
display solo il valore (o i valori) corrispondenti al valore di quella riga,
grazie a tutti.. e scusate per la domanda un pņ (un bel pņ) stupida..

 ha scritto nel messaggio
news:%Jb57.128833$cd.7...@news1.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Help per registrazione licenze OCX

Ciao a tutti.
Sono letteralmente perseguitato da maledettissimi messaggi d'errore relativi
ai diritti di licenza sugli OCX Microsoft!
Adesso mi capita con una maledettissima DBGrid32, altre volte mi è capitato
con una MSFlexGrid.
Ho tentato varie volte di reinstallare VB, ma... Niente da fare!
Il fatto è che spostando i miei sorgenti su macchine diverse 'sta cosa mi è
capitata spesso, ('rca Eva!), avendo come unica alternativa quella di
sostituire il controllo con uno simile.
Sono davvero stufo! Non riesco a venire a capo del problema, non riuscendo a
capire cosa lo provochi.
Ditemi, Vi prego, che c'è una strastupida e banalissima soluzione.
In attesa spasmodica (si fa per dire!), ringrazio anticipatamente.
Angelo.

 wrote in message
news:f1HG5.27378$Nz.8...@news.infostrada.it...


 wrote


 wrote in message
8sgsbo$kc009$1...@ID-51318.news.cis.dfn.de...


Newsgroup: it.comp.lang.visual-basic
Titolo: Connessione a due DB con lo stesso applicativo

Magari sto' chiedendo una sciocchezza ma portate pazienza.
E' possibile con la stessa applicazione accedere a due DB diversi ?? Nel mio
caso ORACLE e Lotus Notes
Grazie Beppe

 ha scritto nel messaggio
news:9aejl0$s3c$1...@geronimo.keycomm.it...

Dichiara due oggetti connection differenti.
Se invece indenti eseguire una query composta da tabelle di DB diversi, lo
puoi fare ma non con tutti i DB ...
nel tuo caso non saprei...
Saluti





Ciao Beppe,


 


Se crei due connessioni differenti il problema e 
risolto.


 


Ciao Giuseppe.



>E' possibile con la stessa applicazione accedere a due DB diversi ?? Nel
Certo che puoi farlo:
Private Sub Form_Load()
    Dim Connessione1 as
ADODB.Connection
    Dim Connessione2 as ADODB.Connection
    On Error
GoTo ErrFLoad:
    Set Connessione1 = New ADODB.Connection
    Set
Connessione2 = New ADODB.Connection
Connessione1.ConnectionString = _
"provider=MSDAORA;Password=x;user id=x;Data Source=x"
Connessione1.Open
 
    Connessione2.ConnectionString = _
"provider=MSDAORA;Password=x;user id=x;Data Source=x"
Connessione2.Open
 
    Text1.Text = "Connessioni aperte..."
Exit Sub
 
ErrFLoad:
    Set Connessione1 = Nothing
    Set
Connessione2 = Nothing
 
    Text1.Text = Err.Description
End Sub
Io ho usato due connessioni a due server oracle diversi, se usi l' odbc,
basta dirgli che tipo di provider deve usare ed il gioco č fatto; puoi
allacciarti anche a due db diversi, del resto, se puoi farlo per una sola
connessione, puoi farlo anche per tante.
Saluti...
--------------------------------
Inviato via 
http://usenet.iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Immagini dentro un MDB

Vorrei memorizzare all'interno di una tabella di un DB Access delle
immagini. Ho creato un campo per contenere gli OLE ma non so come inserirci
dentro l'immagine (BMP).
Grazie a chi mi aiuterà
Ciao Franco

Ti conviene memorizzare nella tabella il nome ed il percorso del file, sempre
se non ti crea altri problemi.
Ciao, CarloPro


se non ti crea altri problemi.
Quello già lo faccio ma in questo caso avrei proprio bisogno di inserirle
nella tabella in quanto vorrei evitare, o perlomeno complicare, la gestione
esterna delle mie immagini (sai dopo tanto lavoro!).
Ciao Franco

Newsgroup: it.comp.lang.visual-basic
Titolo: Pager per Maurizio Borrelli

sai che ancora c'e' chi ti ricorda e ti rimpiange, su it.cultura.libri?

 sai che ancora c'e' chi ti ricorda e ti rimpiange, su it.cultura.libri?
Vi piacerebbe riaverlo, eh ? Ora ce l'abbiamo noi e ce lo teniamo stretto.
:-PPPPPPP
Bye, G.

"Paperino" <non...@lo.dico> ha scritto

allora bloccalo stretto.
non vorrei fosse solo un passaggio di sfuggita.
j.spqr(x)

 non vorrei fosse solo un passaggio di sfuggita.
Visto che sono per la libertà personale, proporrei di limitarci
a trattarlo bene.
Mi sa che con un MBorrelli.Locked = True potremmo scatenare
MBorrelli_unLoad.
Bye, G.

 MBorrelli_unLoad.
hmmm.. sa benissimo che puo' essere piu' efficiente
mborrelli.hide
pero' concordo sul .locked=false cosi'
ng.average++