mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Ordinare item nella ListView

Come faccio ad ordinare gli item della ListView sopra e sotto con il
semplice trascinamento del mouse?
Ho scaricato LVSample.zip dal Sito Comune ... ma non c'è niente di quello
che cercavo .... e non mi da nessuna proprietà "reorder" da poter mettere a
true come suggeriva Cesare.
GRAZIE MILLE.

Scusa...ma non c'è SORT? (boh..forse mi sbaglio)
--
__________________
www.sasim.net
Vb è relativamente semplice perchè c'è MSDN!
Sito Comune Ng: 
http://www.it-lang-vb.net
Manifesto del Ng: 
http://www.it-lang-vb.net/docs/Manifesto.txt


 che cercavo .... e non mi da nessuna proprietą "reorder" da poter mettere


 > che cercavo .... e non mi da nessuna proprietà "reorder" da poter


 semplice trascinamento del mouse?
[SNIP]
Prova cosi'
Private Sub ListView1_MouseMove(Button As Integer, Shift As Integer _
    , x As Single, y As Single)
If Button = vbLeftButton And (Not ListView1.SelectedItem Is Nothing) Then
    'Se c'e' un item selezionato e il tasto sinistro e' premuto
    'avviamo il Drag&Drop
    ListView1.Drag vbBeginDrag
    'facciamo generare un'icona di trascinamento direttamente al ListView;
    'puo' essere sostituita con una immagine a piacere...
    ListView1.DragIcon = ListView1.SelectedItem.CreateDragImage
End If
End Sub
Private Sub ListView1_DragOver(Source As Control, _
    x As Single, y As Single, State As Integer)
'Evidenziamo gli item mano a mano che passiamo sopra con il mouse,
'questo ci dara' il riferimento per sapere dove spostare l'item
'trascinato.
Set ListView1.DropHighlight = ListView1.HitTest(x, y)
End Sub
Private Sub ListView1_DragDrop(Source As Control, x As Single, y As Single)
Dim DropItem As ListItem
With ListView1
    If .DropHighlight Is Nothing Then
        MsgBox "Spostamento annullato."
    Else
        'salviamo un riferimento all'item selezionato, lo rimuoviamo dalla
lista
        'e lo riaggiungiamo *prima* dell'elemento evidenziato nel DragOver
        Set DropItem = .SelectedItem
        .ListItems.Remove DropItem.Key
        .ListItems.Add .DropHighlight.Index, DropItem.Key, DropItem.Text
        'Reimpostaimo le selezioni
        Set .DropHighlight = Nothing
        Set .SelectedItem = .ListItems(DropItem.Key)
        'terminiamo l'operazione di Drag&Drop
        .Drag vbEndDrag
    End If
End With
End Sub
cerca sulla guida per i dettagli deigli eventi/metodi usati.
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett Brown
Newsgroup: it.comp.lang.visual-basic
Titolo: Inserimento dati via SQL

Ciao a tutti.
Vorrei inserire dei dati all'interno di un database Access, gia'
collegato alla mia applicazione tramite un controllo DAO. Poiche'
pero' questi dati risultano da una elaborazione batch, non li devo
inserire come al solito tramite una form, ma tramite un comando SQL.
La query di prova che ho preparato e' molto semplice e direttamente su
access funziona:
Query = "INSERT INTO tabella (FileName) VALUES ('pippo')"
ora pero' di pone il problema di come farla eseguire al DB.
Dopo aver letto tutti i messaggi a riguardo in questo NG, nonche' aver
guardato gli esempi presenti sul sito comune, credo che la sintassi
corretta sia questa (il controllo DAO si chiama DB):
MainForm.DB.Database.Execute "INSERT INTO tabella (FileName,) VALUES
('pippo')"
Pero' non funziona. Potreste aiutarmi? Grazie. 

La sintassi è corretta, però "forse" l'errore è perchè hai messo una ","
dopo il nome del campo (FileName)...
Cmq che errore ti da?
Byez
Tango

Cmq che errore ti da'?
Non mi da errore... in realta' ora ho scoperto una cosa assurda:
se navigo un po' con il controllo data su e giu' per i record, allora
non mi inserisce nulla
se invece non tocco quella barra alla fine mi inserisce i record nel
DB access e me li mostra pure nella barra dove navigo, pero' mi
aggiunge pure un campo vuoto (nella barra) che nel DB Access non c'e',
infatti se poi rilancio il programma quel record vuoto scompare anche
dalla barra.
Tale record poi pare sia il primo, perche' dopo tale inserimento devo
se voglio fare una scansione del RecordSet devo fare prima un
MoveFirst e subito dopo un MoveNext, altirmenti mi da' un errore tipo
"Record eliminato"
Newsgroup: it.comp.lang.visual-basic
Titolo: Costanti e notazione esadecimale

Ciao a tutti,
volevo avere maggiori delucidazioni in merito alla dischiarazioni di 
costanti con valore esadecimale. Ad esempio, ho trovato un codice che al suo 
interno propone le seguenti costanti:
Private Const ERROR_BAD_DEVICE = 1200&
Private Const ERROR_CONNECTION_UNAVAIL = 1201&
Private Const ERROR_EXTENDED_ERROR = 1208&
Private Const ERROR_MORE_DATA = 234
Private Const ERROR_NOT_SUPPORTED = 50&
Private Const ERROR_NO_NET_OR_BAD_PATH = 1203&
Private Const ERROR_NO_NETWORK = 1222&
Private Const ERROR_NOT_CONNECTED = 2250&
Private Const NO_ERROR = 0
Cosa indicano i valori di queste costanti? E, soprattuto, come si fa a 
conoscere il valore da inserire in queste costanti (il programmatore che ha 
scritto questo codice non si sarà certo inventato il valore 1203&)?
Grazie a chiunque mi sappia dare una risposta
Thunder 

 Grazie a chiunque mi sappia dare una risposta
Comunque quei valori NON sono esadecimali.
Ciao 

 ha scritto nel messaggio 
news:4275f...@x-privat.org...

Hai ragione, i valori non sono esadecimali. Ho preso la parte di codice 
errata.
Ecco quella che avrei dovuto inserire:
Private Const TRUETYPE_FONTTYPE = &H4
Private Const MIM_MAXHEIGHT As Long = &H1
Private Const MNS_NOCHECK  As Long = &H80000000
Trovo sempre tutto sotto MSDN?
Grazie per la risposta
Ciao
Thunder 

 Trovo sempre tutto sotto MSDN?
Provato a guardare? ;)
P.S.: non porti troppe domande sul loro valore numerico.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: controllo di concorrenza

Salve a tutti,
questo argomento credo sia già stato trattato ma non ho ben capito
cosa fare.
Ho un'applicazione scritta vb6 su access che funziona pressappoco così
per tutte le funzioni:
- maschera1 fa un elenco dei record in tabella
- seleziono un record e clikko su modifica
- si apre maschera2 che nell'evento load fa una select (per l'id di
quel record) sulla tabella e valorizza i suoi campi con assegnazioni
uno per uno.
- clikko su salva
- viene effettuata una update sul record della tabella.
Adesso questa applicazione dovrà girare in rete con più client e
quindi mi sono posto il problema della concorrenza di accessi. Così
come è fatta l'applicazione il record non viene mai lockato se non nel
tempo necessario all' UPDATE.
Escludendo la gestione del lock logico ( con un flag o con una tabella
dei lock ), vorrei qualche indicazione per fare gestire tale
concorrenza al database. Ho visto che access 2003 ha un blocco a
livello di record ma se ho capito bene funziona soltanto sulle sue
maschere native e solo se basate su tabella ( correggetemi se sbaglio
);
è possibile fare qualcosa del genere su access? se no, con sqlserver
come potrei fare?
In entrambi i casi dovrei cambiare il tipo di sequenza lavorative che
hanno le maschere?
In genere il collegamento al db avviene comedi seguito:
strSQL = "Select * from Clienti where ID_Clienti = " & ID
strConnection = "DSN=DB; PageTimeout=5000; UID=; PWD="
RSapp.Open strSQL, strConnection, , , adCmdText
Grazie a tutti.

 come potrei fare?
Guida in linea 
"hint blocco"
Ave
giuseppeD
---
CCR 
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

hint blocco direttamente sul server immagino?
ma da visual basic come lo gestisco?
mi servirebbe un esempio di codice multiutenza che mi da un messaggio
nel caso in cui tento di accedere ad un record lockato
Grazie

 ha scritto nel messaggio 
news:1131699315.3...@g14g2000cwa.googlegroups.com...


Newsgroup: it.comp.lang.visual-basic
Titolo: vb 5 licenza?

Pensate si trovi ancora da acquistare vb5? Il prezzo può essere conveniente
rispetto alla versione 6?
Ad alcuni msg con lo stesso oggetto non ho visto risposta. Forse risposta
privata?
t@s

 ha scritto


 Pensate si trovi ancora da acquistare vb5? Il prezzo può
essere conveniente rispetto alla versione 6? [...]
Oltre a quanto indicato da pal, potresti anche consultare:
http://msdn.microsoft.com/vbasic/prodinfo/previous/downgrade.a
sp
Dove, tra l'altro, c'e` scritto:
"Visual Basic Downgrade Information
If you require a previous version of Microsoft Visual Basic,
you may purchase version 6.0, and then downgrade
[
http://www.microsoft.com/permission/copyrgt/cop-soft.htm
] to
a prior version."
--
Ciao.
Maurizio
Newsgroup: it.comp.lang.visual-basic
Titolo: visual basic for applications (Excel)

I have een little problem
I have a own menu in Excel
I move all menu's to off, except me own menu
when the application runs, and one clicks with the rightmousebutton
on the menu, popup menu appears to adjust the menu.
this is a standard popup from excel.
I want to eliminate this popup (adjust), How can i do that ???
me code:
----------
Const ON = True
Const OFF = False
Sub MenuBarOnOff(Choise As Boolean)
  Dim MenuBar As CommandBar
    For Each MenuBar In Application.CommandBars
    With MenuBar
      Select Case .Name
      Case "Me Menu"
        .Enabled = Not Choise
      Case Else
        .Enabled = Choise
      End Select
    End With
  Next
End Sub
-------
Thanks for your time
Cornelis
Email: corneli...@NoSpam.nl
Change "NoSpam" to "wxs" for your personal reaction

 End Sub
  With Excel.Application.CommandBars.Item(Me Menu)
    .Protection _
      = Office.MsoBarProtection.msoBarNoCustomize
  End With
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

   With Excel.Application.CommandBars.Item(Me Menu)
    With Excel.Application.CommandBars.Item("Me Menu")


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

Ciao, utilizzando il controol ExtGrid ho un problema:
con la proprietą allowedit settata a true e spostandomi con il cursore fra
le celle cancello il contenuto. La mia intenzione č semplicemente spostarmi
senza modificare i dati.
La modifica dovrą  essere eseguita solo premento i tasti lettere o numeri
Potete darmi una dritta?
Grazie Ciao

senza modificare i dati.
Setta AllowEdit a False e solo quando vuoi modificare una cella
imposta AllowEdit a True.
Dove hai trovato questo componente?


 ha scritto nel messaggio
news:39587410...@100.0.57.0...

Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO! Il metodo SEEK non avanza!

Delta System - Tomasella Gianpietro ha scritto:
Per favore riposta la risposta.
    Grazie
        Massimo

Per favore riposta la risposta.
Se hai l'OE clicca con il pulsante destro e guardati le proprietą ti da un
pulsante con la possibilitą di vederti il messaggio originale, il fatto che
non lo vedi penso sia perchč e in MIME (HTML).

Newsgroup: it.comp.lang.visual-basic
Titolo: Autocomposizione installazione non riuscita

Nell'Help di VB4, nell'Autocomposizione installazione si legge:
'Nota   Se si desidera distribuire l'applicazione senza utilizzare
l'Autocomposizione Installazione e il Kit di installazione disponibili in
Visual Basic, è necessario verificare che i controlli e i riferimenti
utilizzati nell'applicazione e i rispettivi file dipendenti siano installati
nel computer dell'utente e registrati nel database di registrazione del
sistema. È possibile registrare i file durante la procedura di installazione
oppure richiedere agli utenti di procedere manualmente alla registrazione.'
Come diavolo si fa a registrare manualmente nel database di registrazione
del sistema (WIN 95/98) i files ad es.CRYSTL32.OCX e quale è questo malefico
database?E' il regedit?
Chiedo questo perchè ho scritto un prg con vb4 32bit che si installa bene su
win98fat32bit  ma su win95fat32bit  no, perchè durante l'installazione dice
'impossibile registrare il file mfc40.dll, crystl32.ocx,spin32ocx'.
Eppure questi files sono stati copiati regolarmente in windows/system!
Ringrazio anticipatamente chi riesce ad illuminarmi!!
Giorgio

...

Newsgroup: it.comp.lang.visual-basic
Titolo: ICONE

Salve NG!!!!come va?
Sono le 9:10 ed iniziamo una nuova giornata.
Per completare la mia applicazione mi servirebbero delle icone carucce per
poter impostare la Toolbar.
Ho cercato su Internet ma quelle che ho trovato non sono quelle che cercavo.
Conoscete qualche sito da potermi sugg.
P.S. Conoscete qualche programma che mi permette di estrarre da un file
delle icone?
Sicuro di una vostra risposta vi auguro una piacevole giornata.
FormW@re

Icone?
Da me, area files...
Sono in formato ICL, quindi hai bisogno di un prg tipo Microangelo o simili...
DiTuttoDiPiu č imperdibile :))
--
GbC
http://www.chiappori.net
http://www.gbcweb.com
--

Per quanto riguarda il programma ( quello che da un file riesce ad estrarre
una icona ) quale consigli.
Microangelo va bene?
Ho visto le tue icone ma mi servirebbero quelle standard di Windows ed
Office.
Sai dove poso trovarle, o in quale file sono contenute.
Grazie ancora
FormW@re


Ciao
--
Fabio

delle icone?
Microangelo, come ti ha consigliato GbC, è ottimo; io uso IconEasy (O EasyIcons, non mi ricordo...
in pratica sono due programmi, no per l'editing di ICO/BMP l'altro per la gestione di
IconLibrary...)
In alternativa sul Sito Comune ci sono degli esempi su come estrarre un IC da un file.... ;-PPPP
Sirri Moreno
WebMaster del Sito Comune di questo newsgroup:
http://www.it-lang-vb.net
webm...@it-lang-vb.net

E' un vero piacere che il grance Moreno Sirri mi ha risposto (con tutto il
risposto per gli altri )
Colgo allora l'occasione per esprimergli la mia stima.
Complimenti per la gestione de SC.
Formw@re

Scusa ancora.
Mi sapresti dire dove hai scaricato il programma.
Sto cercando su internet ma le ricerche vanno sempre male.
Oppure mi potresti mandare una mail con allegato il setup
Grazie
FormW@re



Ti ringrazio di cuore per i complimenti e per la stima... per il resto, non esageriamo, please...
 :-)
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
---------------------------------------------------------------------------



Probabilmente l'ho scaricato da Tucows, ma vai su 
http://www.zdnet.com/downloads/graphics.html
scegli "Icon Tools" quindi "Reviewers' Picks": trovi quello (Icon Easel 98/Easy Icons 98),
Microangelo e molti altri...


 wrote in message
2eUA6.13675$r67.3...@news2.tin.it...


> FormWare:

Ho visto qualcosa di molto carino su:
 
http://digilander.iol.it/ProDomoSua
ma non so se e` proprio quello che cerchi.
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

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

Salve a tutti vorrei passare da vb6 a vb Net esiste un newsgroup
apposito o si posta qui?

Puoi postare qui (magari indicato [NET] nel subject) oppure
microsoft.public.it.dotnet.vb
HTH
-- 
Corrado Cavalli [Microsoft .NET MVP-MCP]
UGIdotNET - 
http://www.ugidotnet.org
Weblog: 
http://www.ugidotnet.org/710.blog
Newsgroup: it.comp.lang.visual-basic
Titolo: Annullare l' unload

Ciao A Tutti
Come faccio a disabilitare l'unload dalla stessa rutine di VB5.
In poche parole mi serve sapere come posso annullare l'unload dopo che uno
alla domanda 'Vuoi salvare?' l'utente mi risponde Annulla vorrei sapere come
si blocca la chiusura della form.
Grazie a chi mi risponde.


Ciao,
devi mettere la domanda (e l'eventuale codice che la segue) nell'evento
di QueryUnload della form e per fermare l'unload impostare a True il
parametro Cancel, ad esempio:
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
 
      	If MsgBox "Vuoi salvare?", vbYesNocancel = vbCancel Then
           	Cancel = True  <--- per annullare l'unload
       	else..........
    		.........
	endif
End Sub
Ciao.

Grazie a chi mi risponde.
Metti il seguente codice nell' evento form_unload (sperando che me lo
ricordi bene, non ho la possibilità adesso di controllarlo)
Private Sub Form_Unload
    dim response as integer
    response=msgbox("Chiudo la maschera?",36,"Uscita dal programma")
    if response=vbno then cancel=true
End Sub
Fammi sapere se va bene (al 99% dovrei ricordare bene)
--
"Baby, vieni qui che ti devo parlare da vicino..."
----------------------------------------------------------
Night Eagle ti aspetta su:              U_/
http://space.tin.it/io/mzugar/
       / R
----------------------------------------------------------
Togliere 'FUCKSPAM' per le risposte

Basta mettere true il parametro Cancel dell'evento Unload
in altre parole questo:
Private Sub Form_Unload(Cancel As Integer)
bye bye


L'evento che ti serve intercettare è QueryUnload. Devi settare correttamente
il valore della variabile Cancel
Ciao Marco
--
----------------------------------------------------------------------------
---
Marco Facchetti
via Dante Alighieri 37
24050 Morengo (BG)
Tel-Fax: 
+39 363 957795
E-Mail: 
ci...@energy.it
web: 
http://www.vassalli.it/cicca

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Testo nella systray (a fianco dell'orologio)

Ciao a tutti, scusate se ultimamente vi bombardo di domande ma so pochissimo
di VB e sto cercando di imparare.
Qualcuno ha idea di come si possa inserire del testo (non una icona) nella
systray? (a fianco dell'orologio)
per l'esattezza è un numero di 3 cifre. Ne ho parlato ieri su IRC ma poi il
modem si è rifiutato di riaccendersi (un contatto vicino allo spinotto di
alimentazione si è staccato e ieri sera alle 23 non potevo mettermi a
saldare :-)
Un'altra domanda: se ho un numero ad esempio di 3 cifre, come faccio a
scomporlo?
mi spiego meglio ho numero = 883 :-)
e mi serve
numero1=8
numero2=8
numero3=3
come posso fare?
(si vede che sono ignorante eh!)
--
=> Fabio883 <=
E-mail: 
fab...@net-one.it
ICQ UIN: 5320334
Home Page: 
http://fly.to/fabio883
COMBATTI ANCHE TU CONTRO LA TUT!
http://www.notut.org
<<<<<<<<<<<<<<<<<<<<>>>>>>>>>>>>>>>>>>>>
Il Vero Programmatore programma i sistemi guida di satelliti e missili.
In ogni caso il Vero Programmatore lavora su progetti molto importanti
o molto ben pagati.
    TELEMATICUS
<<<<<<<<<<<<<<<<<<<<>>>>>>>>>>>>>>>>>>>>
SignMail v1.0 Beta by Fabio883

...


come posso fare?
Questo č facile:
Dim I As Integer, Cifre() As Integer, Num As String
Num = CStr(TuoNumero)
For I = 1 To Len(Num)
    ReDim Preserve Cifre(I - 1)
    Cifre(I - 1) = Int(Mid$(Num, I, 1))
Next
Cifre() contiene le cifre del tuo numero separate l'una dall'altra:
la prima cifra č Cifre(0) , la seconda Cifre(1) e cosě via
Ciao!
Gabriele

Newsgroup: it.comp.lang.visual-basic
Titolo: DAO..Querydef...chi se lo ricorda piu!

il comodo ADO.COMMAND....passa in DAO attraverso
Private connDB As DAO.Database
Private qryEXE As DAO.QueryDef
Dim strSQL As String
...
...e poi....nella procedura giusta
...
Set connDB = OpenDatabase(App.Path & "\miodb.mdb")
strSQL = Trim(txtSQL.Text)
Set qryEXE = connDB.CreateQueryDef("", strSQL)
.....
e poi
qryEXE.Execute dbFailOnError
....
...fin qui anche con l'help me lo ricordavo...
il dubbio amletico?
connDB.close...ok!
ma per eliminare la query temporanea...
qryEXE.close ?
set qryEXE=nothing?...basta per eliminarla dalle QueryDefs?
ma guarda che dubbi a quest'ora!!! la vecchiaia avanza!
thanks!

 set qryEXE=nothing?...basta per eliminarla dalle QueryDefs?
mi sa che ti manca
conndb.querydefs.delete "tuaquery"


 set qryEXE=nothing?...basta per eliminarla dalle QueryDefs?
SI perche' crei la query senza specificare il nome
e in questo modo non puo' salvarla.
CIAnO
Newsgroup: it.comp.lang.visual-basic
Titolo: Inchiodato!

Il mio progetto ad un certo punto lancia (shell) una serie di 5 prg  in
sequenza.
for v = 1 to 5
    ret = shell (Prg(v))
next v
Ogni prg impiega tot tempo per essere caricato dal so. Dovendo ottenere che
ogni prg venga lanciato solo se il prg precedente e' stato caricato
completamente ho pensato di utilizzare l'api FindWindow per procedere solo
se FindWindow ha trovato il prg. Per cui:
for v = 1 to 5
    ret = shell (Prg(v))
    Do While PrgHwnd = 0
        PrgHwnd= FindWindow(vbNullString,PrgCaption)
    Loop
next v
In teoria dovrebbe funzionare, in pratica si inchioda
Ch'aggiaffa'?
Esiste un altro metodo per ottenere quello che desidero?
Ciao, Roby

 wrote in message 384b3...@news.megasys.it...


 ha scritto nel messaggio
news:384b3...@news.megasys.it...


 ha scritto nel messaggio
news:8k41hm$3h7$1...@nslave2.tin.it...



Ciao,
Alessandro

 ha scritto nel messaggio
news:384b6...@news.megasys.it...


 ha scritto nel messaggio
news:6Zg95.46713$2s6.5...@news.infostrada.it...


 ha scritto nel messaggio
news:8k4eej$25lc$1...@stargate1.inet.it...


 operativo.
e chi lo può sapere, scusa?

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema sul setup

Ciao a tutto il NG.
Ho un problema: se faccio il setup di un programma che utilizza un database
MDB (access), posso poi installare questo programma in un Pc in cui non è
presente l'access?
Ho fatto delle prove e mi sembra di no, ma visto che non sono esperto e
visto che questo problema mi sta facendo impazzire, chiedo a voi.
Ciao e grazie.

Devi inserire nel setup le dll del jet engine

 ha scritto nel messaggio
news:94936d$5l6$1...@fe2.cs.interbusiness.it...


Ma questa gente č disumana con te!
Ho visto i post e devo dire che in pochi ti hanno risposto!
Per le dll da includere prova a ricercare il file Vb6dep.ini.
Qua dentro ci sono tutte le dll da includere nel pacchetto in base
al modello di accesso ai dati che hai usato.
Io utilizzo l'Installer,perň non mi ricordo piů l'indirizzo da dove l'ho
scaricato. Se vuoi ti mando in posta i due file che ho scaricato
(in totale sono 17,3 MB!!!!)
Ciao
Oz

 wrote in message
news:AWT96.2634$lV5....@twister1.tin.it...


 Alessandro

Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTOOO!! PERFAVORE CONSIGLIATEMI (ottenere hwnd!)

Ciao dinuovo a tutti!!!
Io ho un lavoro urgente da fare...ho un controllo WebBrowser da cui devo
ricavare l'hwnd ... ma mi dà errore quindi vorrei cercare una strada
alternativa...qualcuno mi sa consigliare x risolvere? è molto importante  ho
solo 4gg x risolvere il problema...dopo di ke nn sò che faro!! (inizierò a
impararmi la Bibbia a memoria!!!)
Grazie vermante!! aiutatemi se potete!!!
Ale(xand[17])

 wrote in message
news:8rj11f$ana$1...@nslave2.tin.it...


 wrote in message
news:8rk3l7$noo$1...@nslave2.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] modificare la scritta sul pulsante nella bassa della applicazioni

Salve a tutti,
Scusate l'oggetto, ora mi spiego:
vorrei scrivere un pgm che mi faccia sapere in che stato è un determinato
file (attivo/disattivo) e vorrei scirverlo sul pulsante del pgm posto sulla
barra delle applicazioni (per intenderci dove si trova il pulsante
"AVVIO/START")
Grazie.
Paolo.

 ha scritto nel messaggio
news:mfd37.55161$q77.4...@news2.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: popolare DataGrid da codice come?

Salve ho un datagrid che devo popolare con ADO,
se inserisco un contollo ADO tutto funziona perfettamente, ma da codice come
si fa?
Io ho fatto cosě:
Dim criterio As String
  Set Resizer = New clsResize
  Resizer.SourceForm = Me
  Resizer.SizeFormToScreen 50
Set rselenco = New ADODB.Recordset
criterio = ScegliCompagnia.Label2
  rselenco.CursorLocation = adUseClient
  '*** apro il recordset ***
  With rselenco
        .CursorLocation = adUseClient
        .LockType = adLockOptimistic
        .Open "SELECT *  FROM clienti where ((Compagnia='" & criterio & "')
AND (AvvisoScadenza= #" & Format(Date, "mm/dd/yyyy") & "#)) ", Connessione,
adOpenDynamic
        'Sposto il cursore del recordset al primo record
        '.MoveFirst
    End With
    DataGrid1.da rselenco
End Sub
grazie anticipatamente

     DataGrid1.da rselenco
SET Datagrid1.datasource = rselenco
ciao
ugo

Newsgroup: it.comp.lang.visual-basic
Titolo: Errore di rete o disco (Errore 3043).

Senti, sinceramente credo che il mio caso non abbia nulla a che fare col tuo, ma comunque colgo l'occasione:
ho passato mezza settimana a cercare di capire perchč, da quando avevo installato un nuovo server in una rete, avevo continuamente  Errore di rete o disco (Errore 3043)..
Sono arrivato a stabilire che :
Se si ha 
Una macchina con Clock di processore superiore a 200 MHz  
Insieme a
Una scheda di rete PCI basata su Chip 8029     
E si usano
I drivers nativi di Win 98 per tale scheda,
SI HANNO CONTINUAMENTE Errori di rete o disco (Errore 3043) !!!!!
PROVARE PER CREDERE:
Se abbassi il Clock il prob passa
Se cambi scheda il prob passa
Se metti NT o Win 95 il prob passa
Olč
Ciao
                 Maurizio B..
                 mrzNOMMISPAMMApub@tin..it   (eraseNOMMISPAMMA)

>se scopro qualcosa di nuovo ti faro' sapere
Te ne sarei veramente grato..

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Acquisizione immagini e picturebox

Ciao a tutti.
Per una certa applicazione avrei bisogno di rilevare
una immagine da una microtelecamera e visualizzarla
all'interno di una picturebox in un form.
Siccome l'immagine mi arriva in composito, ho pensato
di utilizzare una scheda di acquisizione tv (hauppage o
pinnacle o simili) che hanno tale ingresso, poi pero' non
so come utilizzare le loro dll per fare apparire l'immagine
in una picturebox del mio form.     C'e' qualcuno di voi che
ha gia' risolto questo problema e puo' darmi un consiglio
o una dritta qualsiasi?
Non posso usare webcam USB, devo usare per forza la
microcamera con uscita in composito.
Ovviamente il prog lo sto sviluppando in VB6.
Grazie mille !
Ciao
Bepi

 Ovviamente il prog lo sto sviluppando in VB6.
Ah, ma allora questo è un newsgroup sul VB, credevo fosse sul Delphi :-)...
Ciao
--
Timothy Redaelli
timothy(dot)redaelli(at)email(dot)it
-----------------------------------
Links:
Sito Comune: 
www.it-lang-vb.net
MSDN: 
msdn.microsoft.com


Beh, l'ho specificato perche' in passato qualcuno mi
ha detto che forse avevo sbagliato NG.....  ;-)
Grazie
Bepi

 viene fornito assieme alle schede di acquisizione
devi usare i driver twain di solito sono compatibili (non sempre).
Sul sito comune ,se non sbaglio, c'č un esempio di come catturare immagini
usando questi driver(sono funzioni api).L'esempio ti da anche la possibilitą
di guardare tutto il ripreso in una picturebox.
Se non trovi nulla fammi sapere che cerco di trovarti le funzioni dell'api
adate allo scopo.
ciao

 adate allo scopo.
Ho cercato sul sito comune, e anche altrove, ma senza successo.
Se puoi darmi qualche chiarimento mi fai un grosso favore, perche'
ne ho davvero bisogno, sto facendo un sw per controllo ambientale,
sta cosa dell'immagine nel form principale e' la ciliegina sulla torta,
ma al cliente le ciliegine piacciono.....
(mi sa che mi sono cacciato in un bel guaio...)
Grazie
ciao
Bepi

 (mi sa che mi sono cacciato in un bel guaio...)
bastava inserire acqusizione  :)))
http://www.it-lang-vb.net/result.asp?dir=0&keyword=acquisizione&typeric=AND&
Tipologia=Tutte&Categoria=Tutte&NomeFile=Chiave
ciao

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

Salve,
e' da poco che mi sono avvicinato a VB6, mi hanno detto che e' possibile 
inserire un programma scritto in quickbasic in un programma scritto in Vb6, 
come si fa'?
Ve ne sarei grato se mi potreste aiutare grazie
_________________________________________________________________________
Get Your Private, Free E-mail from MSN Hotmail at 
http://www.hotmail.com
.
-- 
Posted from [212.216.215.2] by way of 
f264.pav1.hotmail.com
 [64.4.30.139] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

come si fa'?
Dunque... innanzitutto occorre scrivere dei post con dei subject un po' più
chiari.
Poi, chi te l'ha detto?
VB6 con quickbasik ha ben poco da spartire, se non qualche somiglianza nella
sintassi.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: [FAQ]: Impossibile trovare ISAM installabile (ho già letto i vecchi post... :)

premetto: ho VB6 SP5 e ho letto nei vecchi post che quest'errore (che a me
viene generato quando tento di creare un database da codice con
createdatabase) viene risolto dal SP5.
Ma dato che ce l'ho... non vorrei sia io a fare qlc c.....a. allora č giusto
fare cosě:
    DBEngine.IniPath = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\4.0\ISAM_
        Formats\HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\4.0\ISAM
Formats\Jet 3.x"
        Set datUP = CreateDatabase(datUP_path, "dbLangGeneral")
???
prima dico che tipo di database voglio usare e poi lo creo....
se c'č qlc di sbagliato, x favore... mi indicate la soluzione corretta x
creare - appunto - un db da codice ?
grazie
Marco Trapanese

Please... usiamo i prefissi corretti nel subject.
Ut Manifesto docet (v. Sito Comune)
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
---------------------------------------------------------------------------

 Ut Manifesto docet (v. Sito Comune)
d'accordo... a essere sincero non avevo letto il manifesto... ma spulciando
vecchi post ne avevo trovati diversi che trattavano lo stesso argomento con
li prefisso FAQ... ad ogni modo.... oltre a correggermi - giustamente - hai
qlc idea riguardo al mio problema ? :)
grazie,
Marco



credo tu abbia sbagliato il nome della chiave...
HKEY_LOCAL_MACHINE\Software\Microsoft\Jet\4.0\ISAM Formats\Jet 3.x
e non 
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\4.0\ISAM_
        Formats\HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\4.0\ISAM
Formats\Jet 3.x
un "ctrl+v" di troppo... :-P


 un "ctrl+v" di troppo... :-P
no, il pasticcio l'ho fatto quando ho scritto l'e-mail (x la fretta....
c'era un temporale in arrivo....) ma nel codice è giusto! l'errore quindi
rimane.
grazie cmq!
Marco

Newsgroup: it.comp.lang.visual-basic
Titolo: [Image] Trasparenza

Ciao ragazzi
vorrei sapere, cortesemente, come sia possibile realizzare la trasparenza di
un'immagine in un controllo Image, + precisamente dello sfondo
dell'immagine, per poter avere solo il soggetto della gif e non il suo
backcolor in sostanza.
Deve essere sicuramente una stupidaggine ma ancora non ci sono riuscito,
grazie anticipatamente e buon lavoro.
Andrea

 wrote in message
8fr9q2$kmm$1...@news.flashnet.it...


Grazie 1000,
potevo pure morirci sopra !!
Andrea

Il controllo image se la gif contiene aree trasparenti le gestisce senza
problemi... se invece vuoi creare aree trasparenti in diciamo runtime il
processo č un pochino piů complesso. Per un esempio completo ti mando ad un
articolo sull'MSDN "Bitmaps with Transparency"...
----------
ciao
sabba

Ok lo consultero' sicuramente, + per sfizio che per altro ma comunque grazie
Newsgroup: it.comp.lang.visual-basic
Titolo: URGENTE: Numero di files in una directory ?

Salve,
esiste una funzione che ritorna il numero di files 
presenti in una directory ?
Grazie 1000.
Marco.
--
Posted from 
maes.esrin.esa.it
 [192.106.252.50]
via Mailgate.ORG Server - 
http://www.mailgate.org

Dai un'occhiata alla mia risposta al messaggio di Lino con oggetto "Trova
File in directory"
 __     __
<o>  <o>
      []
  \____/   ......(Statti bene!)
Pasquale Minerva
mine...@libero.it

...



no
come noterai anche windows, per contare la dim di una cartella impiega un
pò...
devi "visitarti" tutte le dir...

Newsgroup: it.comp.lang.visual-basic
Titolo: Access , ASP & VBScript

Sto usando uno script opportunamente modificato che dalla mia Homepage mi
permette di effettuare ricerche
su di un DataBase Access , il problema è che questa ricerca è case sensitive
ed io la vorrei case insensitive.
Cosa posso fare ? devo convertire in minuscolo la stringa da cercare e
riempire i campi del Db in minuscolo
o esiste una maniera + semplice e performante ?
P.S. Ovviamente la ricerca avviene mediante istruzione Select di SQL
______
Flex

dovrebbe bastare specificarlo nella sql.
credo che in sql tu possa usare sia lower() che lcase()
Select * from tabella where lower(record) = "confronto"
oppure
Select * from tabella where lcase(record) = "confronto"
Carlo
"Flex" <flex...@Mfreemail.it> ha scritto nel messaggio
news:9bpsm2$ktn$1...@pegasus.tiscalinet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Stampa Struttura DB

Mi consigliate un tools ?


Se usi Access il tool c'è l'ha integrato nell'ambiente per accedere al tool
fai click su Strumenti->Analizza...->Analizzatore.
Ciao Roberto - Syd


Ettore Maronese
il Mes
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Scrivere e leggere su una "Porta"

Salve a tutti, scusatemi se rompo un pò troppo le scatole ma ho un piccolo
problema che vorrei risolvere con il vostro aiuto.
Ho costruito un programma simile ad una chat privata, avrei la necessità
però di controllare quali computer hanno attivo questo programma
controllando una eventuale porta.
Spero di essermi spiegato bene grazie a tutti e alla prossima.
--------------------------------------
ICQ:      60347243
E-mail:   
song...@libero.it
--------------------------------------

 wrote in message
KSRP4.83643$xt2.1...@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Arghhhhhhh

Xchč Xchč !!!!!! ????? Xchč non mi avete mai detto che .Net mi copia il 
database nella cartella di debug.. cosě che io se modificavo e riaprivo ogni 
volta che mi copiava il database originale e nn trovavo le modifiche ..e nn 
capivo cosa cavoli non funzionava.. XCHE' non me l'avete detto 
!!!!!!!!!?!?!??!?!?!?!?
CI HO PERSO 1 mese a pensare a cosa stessi sbagliando!!!!!!!!!!!!

 ha scritto nel messaggio 
news:45f30eea$0$20815$5fc...@news.tiscali.it...

Beh, un buon spirito d'osseeěrvazione ;)
Ciao 

Ahhh non dirlo a me :-P
Anche io ho avuto questo "problemino" :P
Era per questo che avevo rinunciato ad usare i dataset...
Bye,
-- 
Carmine ( 
pikachu...@gmail.com
 (Togli la scritta NOSPAM) )
Webmaster di The Total Site: 
http://www.thetotalsite.it
My Blog: 
http://blog.thetotalsite.it
Gamertag XBOX Live: Carmine XX
http://live.xbox.com/it-IT/profile/profile.aspx?pp=0&GamerTag=Carmine+XX
 


ok scusa allora mi dici come faccio a dirgli di usare sempre quel tal 
database e di non copiarlo nella directory di debug ?
c'è un modo ?

 c'è un modo ?
Basta che selezioni nel Solution Explorer il database e setti la proprietà 
"Copia nella directory" a "Non copiare".


Newsgroup: it.comp.lang.visual-basic
Titolo: API BITBLT

Ciao a tutti, sono disperato.....
Illustro il dramma....
Catturo una immagine tramite la API BitBlt è mi piacerebbe che questa
immagine venisse messa su una RichTextBox oppure può anche andare bene
poterla salvare come bmp o jpg è uguale.
Il problema è che riesco a catturare l'immagine e metterla in una
picturebox però di fatto questa immagine è inutilizzabile perchè
passando sopra una seconda form l'immagine viene cancellata come se
passassi una gomma.
Qualcuno può darmi una dritta ?
Grazie
Giorgio
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Giorgio
mi sembra che la proprieta' del form AutoRedraw faccia al caso tuo.
ciao. buc

 ciao. buc
ricordati di chiamare il metodo refresh dell'oggetto su cui utilizzi il
bitblt (se la sua proprietą AutoRedraw č settata su True), altrimenti non
vedrai alcuna immagine.
ciao, assa.
--
Sito Comune
http://www.it-lang-vb.net/

Newsgroup: it.comp.lang.visual-basic
Titolo: Aiutino con LISTITEM

Come si fa, tramite codice, ad impostare
la larghezza automatica
in un controllo listview in modalità
report?
Con il mouse basta fare doppio clic tra
due colonne, nel titolo.
Grazie
Mauro

...
Newsgroup: it.comp.lang.visual-basic
Titolo: blocco navigazione

Salve, esiste un comando per bloccare la navigazione in internet?
Ringrazio infinitamente chi mi risponde

 Ringrazio infinitamente chi mi risponde
puoi usare una sorta firewall.
Però in vb non saprei come crearlo (ci ho provato ma sono riuscito a tirare
fuori solo uno sniffer).
Oppure usa un Proxy che disattivi quando vuoi. Però il pc deve essere
impostato per navigare col proxy.
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it

 esiste un comando per bloccare la navigazione in internet?
A che' te' serve ?
Speriamo per un uso lecito !
Ecco qua na' cosa veloce veloce (c'e' di meglio)
'*.vbs
set oShell = CreateObject("WScript.Shell")
on error resume next
Do
WScript.Sleep 100
If oShell.AppActivate("Microsoft Internet Explorer")Then
oShell.SendKeys"%{F4}"
End if
Loop
' 
www.google.it
 "Cyber+Patrol" "Cyber+nanny"  o similia
--
Fosco
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] NetRemoteTOD - Win98

Ciao a tutti!
Sto usando l'api NetRemoteTOD per ricavare la data ed ora corrente da un PC.
Il programma che usa questa api gira su XP Pro e tutto giustamente funziona
mentre su un altro con W98 gioustamente non funziona. La domanda logica è:
Qualcuno di voi si è già imbattuto in una situazione analoga? Se si,
gentilmente, potrei avere una dritta sulla strada per far girare il proramma
anche in w98?
Grazie a tutti,
Ciao,
Mattia

anche in w98?
Per mia fortuna lavoro solo con sistemi operativi NT, pero' dovessi
sbrigarmi rapidamente un problema del genere lancerei un net time con
output rediretto su file (strada facile) o su pipe (forse piu'
elegante, ma richiede qualche apetta).
-- 
ciao, hal

o su pipe (forse piu' elegante, ma richiede qualche apetta)
ma non saprei da dove cominciare, mi potresti gentilmente dare una dritta su
dove reperire info a riguardo?
Grazie mille,
Ciao,
Mattia


Rieccomi!
Ho provato la strada dell'output rediretto su pipe ma come immaginavo su
Win98 non funziona. Ho deciso di fare un programmino stupido sul server al
quale i client si collegano e chiedono la dataora.

quale i client si collegano e chiedono la dataora.
Buono a sapersi, se mi dovesse capitare terro' presente il
suggerimento ;-)
-- 
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: MID in VB

Come faccio a suonare un file MID in un prg. in VB5???
Grazie!!!!!!!!!!!!!


E-Mail: 
lig...@alo.it
ICQ: 11362849
Newsgroup: it.comp.lang.visual-basic
Titolo: crystal report e vb

ciao a tutti
qualcuno sa se è possibile fare un report con crystal report ed aggiungervi
un numero variabile di record
es:
01  a
01  b
01  c
02  a
03  a
voglio fare un report che faccia vedere le lettere di 01,02,03
grazie Enrico

innanzi tutto devi inserire un controllo crystal report nel progetto vb e devi
creare il report con crystal report
nel report dovresti creare delle textbox e non associarle a niente
in fase di esecuzione, a seconda di quanti campi devi stampare, primaa di
aprire il report,
inserisci, tramite la proprietą formula (se non ricordo male) dell'oggetto
crystal report,
i valori nei campi .

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

Qualcuno sa, se possibile sapere
a quale form appertiene un form chiamato con:
FormModal.Show vbModal, Form1
Voglio dire:
Se ho 3 o più Form e uno di questi
chiama il FormModal, è possibile sapere
il Form chiamante all'interno di FormModal,
senza memorizzare questo in una variabile
globale.
I Form non sono child.


Non lo so. Io dichiaro una variabile Form nel form "figlio"
Public Capo as Form
e poi, nel form padre:
dim Figlio as new frmFiglio
Figlio.Capo=me
Figlio.Show vbmodal,me

 FormModal.Show vbModal, Form1
non ho il vb sottomano e non so sicuro di quello che dico :
nella proprieta' del form c'e' startposition con l'opzione "Owener Form" ,
adesso questo valore non so se dovrebbe essere disponibile anche come
variabile di modulo o globale , cmq prova a cercare in msdn "owener form"
( o come cavolo si scrive ) ^_^;
-- 
<Gigio2K>
Sito Comune
Nokia -> I.T.H.N. -> 
http://www.ithn.it/
VB -> I.C.L.VB -> 
http://www.it-lang-vb.net/

Newsgroup: it.comp.lang.visual-basic
Titolo: WindowsXP e Visual Basic

Ciao a tutti,
ho fatto un programma in vb6 che prende dei dati da una pagina web tramite
il controllo Inet e li mette su in database access.
Il prgramma una volta compilato fuziona correttamente su tutti i computer,
ma ad uno dei miei clienti che ha windows  xp gli si blocca duraten
l'installazione dando come errore ("Errore inaspettato...")
Avete consigli da darmi?
Grazie
Alessandro

 duraten l'installazione dando come errore ("Errore inaspettato...")
Dacci tutto l'errore. Magari è qualche fil di sistema che non viene
registrato bene.
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it

 ha scritto nel messaggio
news:wFZ9c.99879$FJ6.3...@twister1.libero.it...


 ha scritto nel messaggio
news:wFZ9c.99879$FJ6.3...@twister1.libero.it...

Io ho un antidialer comprato in un negozio a 60.000 lire tre anni fa e mi
trovo benissimo!
-- 
Ciao
Roberto

 ha scritto nel messaggio
news:wFZ9c.99879$FJ6.3...@twister1.libero.it...


 ha scritto nel messaggio
news:wFZ9c.99879$FJ6.3...@twister1.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Connessione

qual'è la sintassi e la procedura per connettermi ad un DB ACCESS
e la sintassi per generare un determinato SQL???
Grazie
Scusate, ma sono molto dummies!!

 Scusate, ma sono molto dummies!!
L'help in linea dice qualcosa, al riguardo?
Salutoni
Sergio

 ha scritto nel messaggio
news:b8tu70$cv4fs$1...@ID-173193.news.dfncis.de...


 Ce lo avessi lo userei....
Risposta sbagliata!
C'era una pubblicità, forse di un liquore, con un indice tipo "quante
possibilità hai di avere una promozione". Ecco, questo genere di cose ti
porta a -14.000, peggio che prendere la moglie del capo per sua figlia.
ps. non ti offendere, si scherza...
pps. ma non troppo...
Newsgroup: it.comp.lang.visual-basic
Titolo: Utilizzare altrove le ActiveX DLL

Salve a tutti, illustro brevemente il problema:
    Ho scritto una DLL in VB che funziona perfettamente, ma ora la devo
utilizzare in un programma Visual Fox, pero' non ne vuole sapere di trovare
il punto di accesso.
    Vorrei sapere se le DLL scritte in VB sono normalissime o hanno qualche
particolarita'
    e se si, magari quale. Grazie a chiunque possa rispondermi,
Maurizio.

    e se si, magari quale.
sono: 
normali dll ActiveX.
non sono:
dll funzionali standard (come quelle dell' api, per intenderci)
ciao, hal

     e se si, magari quale.
Puoi utilizzarle ovviamente in programmi scritti in vb e nei programmi che
utilizzano vba, tipo Excel,
Word, ecc.
La dll deve essere registrata e devi dare il riferimento al programma che la
deve utilizzare.
--
Mauro

 Word, ecc.
Ohibò, da quando il C non può usare Ole?
ciao
:-))
ugo

Newsgroup: it.comp.lang.visual-basic
Titolo: [WPF] Comporre form con moduli fissi.

Ciao a tutti.
Avendo cominciato ora, mi piacerebbe partire con il piede giusto e mi farebbe comodo un'instradamento.
Sto per costruire delle altre form, che funzionalmente si rifaranno alla prima, cioè pulsantiera (in VB = BindingNavigator, in WPF non c'è), etc.
La suddetta pulsantiera, spero di poterla creare a sè, così da avere modo di richiamarla come istanza, a comporre la form. Come si fa in Flash ad es.
Essendoci poi gli stili, ancora di più immagino ci sia il modo.
Cosa devo studiarmi?
Grazie!

Ciao Fabrizio,

UserControl(s)
 
.m
 
-- 
blog @ //
milestone.topics.it
 
 
 

Nel frattempo avevo trovato!
Grazie Mauro.
Newsgroup: it.comp.lang.visual-basic
Titolo: Access 97 - Problema con una query

Ciao a tutti.
Allora ragazzi.
Access 97
Creo una query in visualizzazione struttura, tiro giù 2 campi   Prezzo e
Quantità
creo un campo calcolato    Imponibile:[Prezzo]*[Quantità]
Ora però vorrei formattare l'imponibile tipo Format(Imponibile;"0.00").
Non ci riesco.
Comunque il mio problema è che voglio far considerare nei calcoli
l'imponibile con 2 cifre decimali. Cioè non volgio solo rappresentarlo con 2
cifre decimali.
Es.
Prezzo =5,36 euro
Quantita = 4,6
Imponibile =24,656
Ora metto nelle proprietà del formato del campo metto : Standard (cioè 2
cifre decimali) e mi diventa 24,66 Euro
Fin qua tutto bene, solo che nei calcoli lui mi considera sempre 24,656 io
invece voglio 24,66 anche nei calcoli.
Scusatemi se mi sono dilungato troppo.
Grazie a tutti.

 24,656 io invece voglio 24,66 anche nei calcoli.
Non conosco VBA di Access, ma Format(Round(Imponibile,2);"0.00") la prende?
Sul tipo di Round... abbiamo già dato (e altri brindato).

 ha scritto nel messaggio
news:O%d6c.61462$z23.2...@news3.tin.it...

Ti posto una funzione di Karl Donaubauer, popolarissima fra gli accessisti,
per il corretto arrotondamento in senso commerciale; va usata con dati di
tipo double o valuta.
Function fctRound(Optional varNr, Optional varPl As Integer = 2) As Double
    'varNr: numero da arrotondare
    'varPI: numero di decimali (due predefinito)
    If IsMissing(varNr) Or Not IsNumeric(varNr) Then Exit Function
    fctRound = Fix("" & varNr * (10 ^ varPl) + Sgn(varNr) * 0.5) / (10 ^
varPl)
End Function
La funzione Round, di cui parlava Lupo, non è supportata in Access 97.
Ciao
Galliano.

Newsgroup: it.comp.lang.visual-basic
Titolo: Re: Scambiare file tra 2 pc

 wininet, ma nn sono riuscito a far niente...
vedi il mio Instant Messenger (la versione open source) su 
www.nicolaottomano.it/download.asp
oppure cerca sul sito comune 
www.it-lang-vb.net
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
"Seminate Linux, che Windows si pianta da sč...." (Antico Adagio)
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it
Sinapsi Antispam. Antispam Gratuito.
http://www.nicolaottomano.it/public/SinapsiAntispam-Setup.exe
email spamtrap: 
spam...@nicolaottomano.it

 oppure cerca sul sito comune 
www.it-lang-vb.net
Se ti interessa FTP in particolare cerca sul suddetto sito comune oppure su 
www.vbsimple.net
.
Ti avviso che se sei un principiante, i socket non sono alla tua portata, ti consiglio di
approfondire meglio altri argomenti per poi evitare di trovarti invischiato in casini difficili da
risolvere.


ciao.. ho da poco iniziato a usare il visual basic.. mi chiedevo se è
possibile creare un'applicazione in VB x inviare e ricevere file tra 2
computer (server e client) usando il protocollo ftp... magari è
possibile col winsock? qualcuno sa come fare? io ho anke provato con
wininet, ma nn sono riuscito a far niente...
grazie di tutto -andre-



Non offenderti ma se hai appena iniziato lascerei da parte questo
progetto e imparare bene le basi di VB :)
Newsgroup: it.comp.lang.visual-basic
Titolo: ancora su vb6 & mysql

 mano???????????????? GRAZIE.....
Perchè non riesci?
termoPilucco.

 wrote in message
news:bf8a1u$c652r$
1...@ID-188026.news.uni-berlin.de

ho provato a recuperare il valore del recordset ed a passarlo
all'oggetto image..... e non lo visualizza
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Ti servirebbe anche una mano ad imparare a postare.
Comunque se non ricordo male, sul sito di mysql o di
uno di quelli menzionati nel loro sito demandava ad
una pagina di esempi su come utilizzare vb e mysql
tra cui anche la gestione dei campi blob.
-- 
Saluti
Andrea Moro

 wrote in message
news:bf8e2j$cfmd6$
1...@ID-61006.news.uni-berlin.de

sto iniziando ora a farlo.... e spero di imparare presto.... Grazie! 


Newsgroup: it.comp.lang.visual-basic
Titolo: Font microscopici...è un bug?

Salve ragazzi,
tramite l'oggetto printer stampo una pagina:
printer.fontsize=12
printer.FontName="Times new roman"
printer.scalemode=7
printer.print "quello che devo stampare"
printer.endDoc
Dovrebbe stampare font di grandezza 12 giusto?
Come mai me li stampa di grandezza oserei dire 0,5?
Microscopici, però belli chiari .-))
Ho provato anche con:  printer.font.size=12  ma nulla
Se invece prima imposto printer.fontsize=10 e poi printer.fontsize=12
la stampa è normale a 12 punti...
Qualcuno ha una spiegazione da darmi?
Grazie 
Robin

 wrote in message
WFW8OCtIUIQ7sf...@4ax.com...
