mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: formattare textbox

come posso inserire un divisore delle unità in una textbox
es 12.000 o 234.556.778 ecc.
grazie a tutti
ps. se possibile spiegazioni molto chiare(principiante)

Mi sà che non c'è un modo diretto,
io mi sono creato una Function che prende la stringa e la trasforma
inserendo i puntini al posto giiusto.
Se stavo al lavoro te la includevo, idem se domani mi ricordo di prenderla.
Gianni Moretti

 ha scritto nel messaggio
news:8nubpc$hv7$1...@serv1.iunet.it...

Prova ad inserire il codice seguente nell'evento LostFocus della textbox
(nell'esempio la textbox si chiama txtImporto):
txtImporto.Text = Format(txtImporto.Text, "#,0")

Comunque se ti interessa la mia sub, di cui ho parlato nel messaggio
precedente, è riportata qui sotto:
Gianni Moretti
Function Soldi(x$)
c = 0: r$ = ""
l = Len(x$)
For a = 1 To l
    If c > 0 Then c = c + 1
    If Mid$(x$, a, 1) = "." Then c = 1
    If c < 6 Then
      If c <> 1 Then r$ = r$ + Mid$(x$, a, 1) Else r$ = r$ + ","
    End If
Next a
x$ = r$
r$ = ""
c = 0: l = Len(x$)
vir = -1
For a = 1 To l
If Mid$(x$, l - a + 1, 1) = "," Then vir = a
Next a
For a = 1 To l
   r$ = Right$(x$, 1) + r$: x$ = Left$(x$, Len(x$) - 1): c = c + 1
   If c = 3 And a < l And a > vir Then
      If Left$(x$, 1) = "-" And a = l - 1 Then
      Else
        r$ = "." + r$: c = 0
      End If
   End If
   If a = vir Then c = 0
Next a
Soldi = r$
End Function

 wrote in message 8nubpc$hv7$1...@serv1.iunet.it...


 es 12.000 o 234.556.778 ecc.
Ciao,
prova con una cosa del genere:
private sub text1_change()
    if text1.text <> "" then
        text1.text = format(text1.text, "##,##0")
        text1.selstart = len(text1.text)
    end if
end sub
se poi imposti la proprità Alignment a vbRightJustify diventa acora più
carino :-)
Ciao.
--
Princi, 
princ...@programmer.net
--------------------------------------------------------------------------
"Tutti sanno che una cosa è impossibile da realizzare,
finché arriva uno sprovveduto che non lo sa e la inventa." A.E.

 Textbox.Text = Format(pippo, "###,###,###")
Vedo che anche tu, come altri, usi la forma:
    "###,###,###"
al posto di:
    "#,##0" oppure "#,###"
C'e` un motivo particolare?
--
Ciao.
Maurizio
--------
?SPQR(C)
 X

 wrote in message
8o268s$qvk$4...@nslave2.tin.it...


 A questo punto dimmi che differenza c'è tra le varie forme,
per piacere.
Veramente te l'avevo chiesta io...
Io uso quella forma perche' ho letto la guida. Mi chiedevo se
tu e gli altri aveste delle ragioni particolari che mi
sfuggissero. Se invece le cose stanno come dici puoi
risparmiarti di scrivere qualche carattere... tutto qui.


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

Come si imposta la parte argomenti della riga di comando restituita dalla
funzione Command, per far si che all' avvio di un programma, questo mi debba
riconoscere un parametro?

 ha scritto nel messaggio
news:9jmplm$5h0v$1...@ID-57322.news.dfncis.de...

???
leggi il contenuto della command e comportati di conseguenza.
Per es.:
    sParam = Trim(UCase(Command))
    If InStr(sParam, "/M") > o Then
        ...
    else
        ...
    endif
ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: stampa immagini

Sto lavorando in Access: avrei bisogno di stampare, in un report, una o più
immagini di cui ho i path
in campi della tabella che sto stampando (le immagini possono essere di
formato diverso .img .bmp . jpg ecc.)
Grazie
--
Ciao,
Antony
NOSPAM: Rimuovere i trattini dallo username!

formato diverso .img .bmp . jpg ecc.)
it.comp.appl.access
-- 
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: TEXTBOX

E' la prima volta che scrivo su un newsgroup, perdonatemi se sbaglio
qualcosa! Vorrei sapere, per cortesia, premesso che sia possibile farlo,
quali impostazioni delle proprietà o quale codice usare per fare in modo che
:
1)  digitando valori numerici nella textbox di un qualsiasi form non appaia
il cursore;
2)  l'importo venga visualizzato immediatamente secondo il formato delle
migliaia( cioè 1.258.688 e non 1258688);
3)  il cursore, nel caso in cui non fosse possibile eliminarlo, durante la
digitazione non deve spostarsi, seguendo la prima cifra digitata,  da destra
verso sinistra ma deve rimanere appiccicato sul lato destro della textbox.
4) conseguentemente al punto 3) sia possibile inserire decimali (magari in
numero prestabilito) generando la virgola con il punto (o Canc) del
tastierino numerico.
Sto utilizzando la versione 4.0 di VB. Infinitamente grato a chi avrà la
voglia di delucidarmi in merito (che ci crediate o no, non ci dormo la
notte!!)  ********   My e-mail: 
pbar...@tin.it
 -------------Saluti Paolo.

Per nascondere il cursore non saprei proprio (ma forse non si può fare a
meno di utilizzare qualche API a me sconosciuta)
Per visualizzare subito il formato editato di un campo numerico non devi
usare il textbox ma il maskedit....
Ciao Genni

...


tastierino numerico.
    Questo dipende dalle impostazioni internazionali che ha la macchina su
cui lavori, e quindi se č impostata con i codici italiani, il separatore di
migliaia il punto, e quello dei decimali č la virgola

quali impostazioni delle proprietà o quale codice usare per fare in modo
che ......

Ciao,
se un problema del genere non mi facesse dormire la notte seguirei questa
scaletta:
1) proverei a stare alzato due o tre notti consecutive di mia volonta'
(probabilmente la seconda notte dormirei come un ghiro)
2) se non funziona proverei con alcuni pastiglini di tavor
3) se persisto ancora andrei da un dottore di fiducia e mi farei vedere la
testa
4) se anche questo non funziona proverei a scrivere questo codice:
Option Explicit
Dim Variabile As String
Dim NumeroLab As Integer
Private Sub Form_KeyPress(KeyAscii As Integer)
    Select Case KeyAscii
        Case 48 To 59
            Variabile = Variabile & Chr$(KeyAscii)
        Case 8
            Variabile = Mid(Variabile, 1, Len(Variabile) - 1)
        Case 46
            KeyAscii = 44
            Variabile = Variabile & Chr$(KeyAscii)
    End Select
End Sub
Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
        Select Case NumeroLab
            Case 1
                Label1 = Format(Variabile, "###,###,###.###")
            Case 2
                Label2 = Format(Variabile, "###,###,###.###")
            Case Else
        End Select
End Sub
Private Sub Label1_Click()
    NumeroLab = 1
    Variabile = ""
End Sub
Private Sub Label2_Click()
    NumeroLab = 2
    Variabile = ""
End Sub
imposterei la proprieta' del Form1.KeyPreview=True
inserirei due label nel form ed imposterei le proprieta' affinche'
apparissero come dei textbox e proverei ad andare a letto a dormire
rimandando il problema all'indomani.-)
beppe
Newsgroup: it.comp.lang.visual-basic
Titolo: Differenza tra variabili di tempo

Cari amici,
come si effettua la differenza tra due variabili di tempo?
Es. Ora attuale - Ora connessione = Tempo di connessione
Grazie a chi mi voglia rispondere
     GASFIRE

Prova con la funzione : DateDiff e metti come intervallo
"h" per le ore
"n" per i minuti
"s" per i secondi
longvar = DateDiff("n", tempo1, tempo2)



usa la funzione DateDiff
C'e' un ottimo esempio nell'help in linea di VB5




Newsgroup: it.comp.lang.visual-basic
Titolo: Grid dove inserire immagini

Qualcuno mi sa dire dove posso scaricare qualche
controllo Grid dove all'interno delle celle posso inserire
immagini oppure icone?
Grazie anticipatamenteà... 


www.vbaccelerator.com

Newsgroup: it.comp.lang.visual-basic
Titolo: Vscroll o non Vscroll : questo è il dilemma ! ;-(

Salve a tutti,
sto lavorando allo sviluppo di una semplice applicazione
per la compilazione di un piano di studi universitario,
a un certo punto deve comparire un form che contiene una 50-ina di esami
selezionabili con un command button, avendo lurkato un pò il ng con google
mi
sembra di capire che, per visualizzare questi esami (50 textbox uno sotto
l'altro),
  la vscroll bar non sia una soluzione elegante,
oltretutto se pure rimanessi dell'idea di utilizzarla ho tristemente notato
che devo settare a zero
il border style del form per avere un height > 12000, e questo non mi piace,
allora vi chiedo : quale è la soluzione più elegante ed efficiente per
visualizzare tanti controlli
su un solo form (che in nessun caso entrerebbe tutto nello schermo)?
grazie a chiunque vorrà rispondermi

 form (che in nessun caso entrerebbe tutto nello schermo)?
Usare una listbox?
Lokar.pepplesso
--
Sito Comune: 
http://www.it-lang-vb.net/
Manifesto: 
http://www.it-lang-vb.net/docs/Manifesto.txt

 per la compilazione di un piano di studi universitario,
Punto uno: cambiati il nick immediatamente! :) (scherzo!)
Due: perche' usare cinquanta (CINQUANTA!) textbox?
Puoi provare con un solo (molto meglio, no?) Listbox
Es.
Dim i As Long
Randomize
For i = 0 To 49
    List1.AddItem CStr(Rnd)
Next i
tre righe di codice e il listbox e' riempito! :) Poi:
Private Sub List1_DblClick()
    MsgBox List1.List(List1.ListIndex)
End Sub
Ovviamente, usa F1 per avere info su ListBox, List, ListIndex, etc.
Ciao,
- SonicBoom - the original :)

   la vscroll bar non sia una soluzione elegante,
Se i dati sono di sola visualizzazione mi aggrego con gli altri e ti
consiglio una lista.
Se invece i dati devono essere anche editabili ti suggerisco una bella
grigliata... scusa volevo dire una griglia.
Saluti,
Pusky
Newsgroup: it.comp.lang.visual-basic
Titolo: Info Sardegna.

Ciao a tutti,
il prossimo mese di agosto (sigh!!!!) saro' in vacanza in Sardegna,
precisamente nella costa Paradiso, quindi nord-ovest dell'isola. Ho a
disposizione l'auto, quindi vorrei girare un po' in zona, in modo da poter
ammirare le bellezze locali.
C'e' qualcuno che conosce la zona e che sa consigliarmi i paesi da visitare
(sia da un punto di vista paesaggistico che culturale), eventuali sentieri
da percorrere a piedi, spiagge da visitare...
C'e' qualche libro che puo' illuminarmi, o qualche guida turistica?
Vi ringrazio per varie ed eventuali; buon viaggio
Aldo

Caspita che svarione!!!! Scusate, ho sbagliato gruppo !!!!!!
Saluti

Newsgroup: it.comp.lang.visual-basic
Titolo: Componenti OCX

Premetto che con la versione 4.0 e 5.0 di VB ho fatto dei programmi
Ora in un PC nuovo ho installato VB 6.0.
Quando cerco di caricare i programmi fatti in passato mi chiede dei
controlli che ora non ci sono, tipo Gauge32.ocx, Grid32.ocx ecc....,
controlli che ho utilizzato nei miei programmi.
Come posso fare per recuperare i programmi cercando questi controlli da
qualche parte e come faccio ad installare i controlli OCX persi per strada ?
Grazie anticipatamente

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Incollare un'immagine in un RichTextBox





Ho creato un programma contenente un RichTextBox.


Volevo, DA PROGRAMMA, incollare un immagine, ma NON CI 
RIESCO!


Se copio e incollo "manualmente", con CTRL+C e CTRL+V tutto 
funziona bene, ma


se devo farlo da programma non ci riesco!!!!


 


Aiuto!!!!









Giovanni


 


Prova in questo modo


 


RichTextBox1.OLEObjects.Add , , 
"c:\mia_immagine.bmp"


è inutile dire che devi sostituire 
("c:\mia_immagine.bmp") con il percorso che vuoi o utilizzando il 
CommonDialog1.Filename


 


Nell' help trovi un ottimo esempio


 


Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Invio/Ricezione Fax da VB

Ciao.
conoscete un modo per inviare /ricevere fax da VB6 ?
vorrei indicare numero di telefono, testo e immagini varie da faxare,
e viceversa quando il modem riceve una chiamata fax "catturare" il fax in
arrivo,
...tutto da mio programma VB, automatico senza intervento dell'utente.
Grazie.

 wrote in message
8g0go1$g8k$1...@stargate1.inet.it...


 wrote in message 8g0ud3$p4$1...@news.flashnet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Passare safearray di struct da Visual C++ a Visual Basic

Salve.
Ho un componente VC++ che esporta una struttura con campi double,
long, byte e altri e diversi metodi tra cui uno che ha come parametro
d'ingresso un puntatore a puntatore a safearray di questa struct
(**ppsaSA). Questo metodo "popola" il safearray, facendone prima
l'allocazione.
Il metodo viene chiamato da un client Visual Basic, che dichiara un
array della struttura esportata dal componente (Dim aElems() as
stMyStruct) e lo usa come parametro nella chiamata al metodo descritto
sopra.
Il problema è che (le volte che non ottengo l'errore di run time 5) i
dati ritornati non sono quelli inseriti dal metodo VC++.
Questo comportamento "anomalo" non si verifica nei casi più semplici,
per esempio nel caso di una struttura con due long.
Ma già con un double in mezzo si cominciano ad avere problemi.
Sarà un qualche problema di packing per le strutture, diverso da VC++
a VB?
Però passando una singola struttura tutto ciò non avviene (ho
temporaneamente risolto così il problema).
E allora? Problema di COM? 
Qualcuno ha avuto esperienze simili e ne è venuto a capo?
l3mure

Dunque...
Credo proprio che sia dovuto alle differenze di packing... ma non ne sono
certissimo...
Potresti provare costruendo degli array di oggetti COM in VC++...
In bocca al lupo (dubito di averti dato un grande aiuto)
                    Ciao
                                    Allanon

...

A dir la verità avevo provato a giocare con i #pragma pack N di VC++
per cercare di allineare correttamete i dati ma senza troppo successo.
Credo di aver trovato una buona soluzione usando un unico tipo variant
che contiene l'intero saferarray di struct:
Client VB:
Dim m_Test As SAFEARRAYTESTLib.TestInterface
Set m_Test = New SAFEARRAYTESTLib.TestInterface
[...]
Dim v As Variant
ReDim v(20) As SAFEARRAYTESTLib.TestStruct
m_Test.fvGet v
Componente VC++:
STDMETHODIMP CTestInterface::fvGet(VARIANT FAR* v)
{
  HRESULT hr;
  SAFEARRAY FAR* psa = NULL;
  TestStruct HUGEP *pstTestStruct;
  [...]
  psa = V_ARRAY(v);
  hr = SafeArrayAccessData(psa, (void HUGEP* FAR*)&pstTestStruct);
  // a questo punto "popolo" l'array di struct pstTestStruct
  [...]
  hr = SafeArrayUnaccessData(psa);
  [...]
}
L'unico "drawback" di questo metodo è che devo fissare la dimensione
dell'array da VB mentre mi piacerebbe che fosse il server VC++ a
farlo, a seconda di quanti elementi deve memorizzare.
Altra notiziola interessante è che il problema si verifica quando il
componente VC++ è un .exe, mentre implementandolo come dll va tutto
liscio, posso passare safearray di struct che contengono anche
safearray e non ho alcun problema.
Secondo me (e anche secondo altri) è "colpa" di COM.
l3mure
Newsgroup: it.comp.lang.visual-basic
Titolo: [!] Massimo numero di controlli per Form.

Ogni tanto salta fuori qualcuno con questa richiesta, ma non ricordo di aver
mai visto citato il seguente documento:
DOCUMENT:Q229756  07-MAY-1999  [vbwin]
TITLE   :INFO: Maximum Number of Controls on a Form
HTH
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

 wrote in message
8v1d5t$3dkoj$1...@ID-52090.news.dfncis.de...


Purtroppo il VB 5 (almeno) ha la possibilità di inserire max 250
controlli in un form; se i controlli invece sono sotto forma du array
di controlli è possibile inserirne di più. In realtà ho provato per
una mia applicazione e anche con gli array il programma a un certo
punto (se si inseriscono numerosi controlli) si blocca per esaurimento
della memori.
Robin
P.S. Comunque è riportato sul testo originale MS questa limitazione.


Newsgroup: it.comp.lang.visual-basic
Titolo: [.NET] Formato colonna datagrid

Salve a tutti,
Compilo un datagrid a run time tramite un SqldataAdapter utilizzndo il
metodo Fill per riempire un dataset.
Poi associo il dataset al datagrid e chiamo il metodo refresh.
Fin quì tutto ok, ma il campo "Data" (che è di tipo DateTime) visualizza
solo il giorno (e non l'ora)
Qual'è il metodo più semplice per modificare il formato colonna in questi
casi?
Sarebbe facile farlo se il datagrid fosse impostato in design time, ma io ho
la necessità di impostarlo dinamicamente.
...qualcuno mi suggerirebbe qualche idea?
Ciao
-- 
Toglere #NOSPAM# dall'indirizzo
Cut #NOSPAM# to replay

 ...qualcuno mi suggerirebbe qualche idea?
Se puoi impostarlo a DesignTime puoi farlo anche a RunTime :)
Guarda il codice generato dal designer.
Ciao

 Guarda il codice generato dal designer.
Certo
Perň a design time io avrei modificato il tipo del campo del dataset nel
documento .xsd
Ovviamente questo non esiste nel caso di dataset generato in runtime
...mi chiedevo se esiste un alternativa piů semplice
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: perche' nn mi si installa .net ?????

Salve a tutti:
So' che siete voi che vi occupate di .net anche se nn è
proprio il newsgroup giusto.
Cmq.Ho comprato Visual Studio.Net pro ed ho
come Sistema Operativo il Windows98 SE.
Provo ad installare il "tanto
atteso" programma e.......NIENTE!!
Mi sembra dipende dal O.S. (98SE),in
quanto mi sembra di capire che con il mio sistema operativo la visual
studio.net
 possa funzionare solo da debugger.
Quindi vorrei sapere,se
possibile,devo installare un sistema operativo superiore al 98? se la risp.
è si,Quale?.
Ho altre scelte? Se nn voglio cambiare sistema nn posso usare
.NET? Qualsiasi informazione sarà accetta,GRAZIE
--------------------------------
Inviato via 
http://usenet.iol.it

 è si,Quale?.
si, l'ambiente di sviluppo funziona solo su Win200 o Xp professional, le
applicazioni che sviluppi funzionano da win98 in su.
CIAO

 
studio.net
 possa funzionare solo da debugger.
[SNIP]
In particolare da debugger remoto... la risposta e' si, dipende dal S.O.;
hai bisogno necessariamente di Windows 2000 oppure Windows XP, non ricordo
esattamente se e' possibile utilizzare anche NT Workstation (ma non credo),
di sicuro non sono supportati i sistemi considerati "home" come 98 e ME
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

Come ti hanno gią detto... lo puoi installare solo su Win2000 o XP... se
vuoi sviluppare .NET ti consiglio di mettere su l'XP Professional... . NEt
su xp pro. ci sta come il cacio sui maccaroni!!!
:o)))
Antonio

Newsgroup: it.comp.lang.visual-basic
Titolo: [?2] Provider OLEDB

Come si fa per vedere l'elenco dei Provider installati?
Chi installa i provider OLEDB?
Il setup wizard in automatico installa il provider referenziato
all'interno di una applicazione che utilizza ADO?
Buona domenica

 ha scritto nel messaggio
news:38F02649...@yahoo.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Liberi professionisti

Dato che la metratura è eccessiva per la nostra attività, stiamo cercando
altri liberi professionisti disposti a condividere le spese dell' ufficio di
cui disponiamo.
Tuttavia, non è indispesabile operare nello stesso settore.
Svolgiamo la libera professione, nel settore informatico dell'automazione e
della gestione basi dati.
I costi sono contenuti e la zona è S.M.Maddalena, a 6 Km da Ferrara.
Riccardo Guirrini
Web :          
http://space.tin.it/computer/rguirrin
E-Mail:         
del...@tin.it

della gestione basi dati.
Bravi imparate ad utilizzare gli strumenti telematici correttamente
prima di postare i messaggi su questo NG!
[ANTISPAMMER MODE OFF]
Remove CUTME from E-Mail address to reply!
Visit Hardware Tips: 
http://www.hardwaretips.com

[ANTISPAMMER MODE OFF]
Basta non rispondergli... (tanto si sa che non leggono i newsgroup)... dovresti saperlo.... ;-)))
Cosě evitiamo msg inutili.....
P.S.:
Andava bene il quoting??? Grrrrrrrr....... lavora, produci, invece di rompere a me..... ;-)))
(da domani ti quoterň anche per telefono, cosě impari!!!!! ^___^)
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

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

Come posso fare in modo che un form di VB si possa scorrere utilizzano gli
Scroll verticali ed orrizzontali.
Grazie.
Corrado

 Scroll verticali ed orrizzontali.
usi la prop value degli scroll per modificare il valore delle prop top e
left dei controlli del form.
la soluzione piu' semplice e' inserire tutti i controlli del form in un
container (una picture) e applicare lo spostamento solo al container
attento che al crescere del valore dello scroll la prop top o left devono
diminuire  non puoi scrivere pic.top=hscroll.value altrimenti l'effetto
sara' contrario a quello desiderato devi scrivere  qualcosa tipo
pic.top=0-Vscroll.value
altra soluzione consiste nel mettere il tuo form in un form MDI e allo
scroll del form provvede il MDI automaticamente
Ciao stefano
Newsgroup: it.comp.lang.visual-basic
Titolo: Si suonano i files MIDI senza OCX o no??

Insomma siete tutti dei professori ma nessuno mi posta due righe per far
suonare uno straccio di midi file senza utilizzare un OCX??
Passo


Sì, c'è una Dll che te lo permette (non me la ricordo, cercala con il
"visualizzatore testo Api")
                        Giovanni A. Derks ( 
ger...@tin.it
 )

Vi sono disponibili sul sito 
www.activex.com
 vari controlli per riprodurre
file midi e non solo.
Ciao,
Thunder.
--
---------------------------------|
tyz...@yahoo.com
 |
---------------------------------|

...


suonare uno straccio di midi file senza utilizzare un OCX??
Si fa, si fa.
'Dichiarazione della API. E' l'unica che ho trovato che non mi faccia
'caricare l'OCX MCI
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
'Per Avviare il file MIDI occorre conoscere il nome
'Suono as String
'
'Retino e' un carattere che serve come valore di Ritorno
'
'can e' l'alias del file MIDI all'interno della comunicazione MCI
'
Dim retino As String * 1
mciSendString "open sequencer!" & Suono & " alias can", _ 
              retino, 1, Me.hWnd
mciSendString "play can", retino, 1, Me.hWnd
'Per terminare l'esecuzione bisogna inviare il comando si chiusura
mciSendString "close can", retino, 1, Me.hWnd
Il metodo era l'unico che si aveva con win 3.1 per comandare le
periferiche multimediali. Modificando i comandi inviati si puo'
controllare il lettore CD, file wav, file video ecc..
Il Multimediale Carlo
Carlo Quartararo
Bari - Italia
mailto: 
noma...@geocities.com
Leggete: 
http://www.geocities.com/SoHo/Lofts/9620
 (agg. 15 gen 1998)

Passo


Passo
Sono un professore, nel senso di insegnante, ma non come programmatore in
VB.
Anch'io cercavo un modo per far suonare un file midi o un file wav in
risposta ad un evento
o associato ad un pulsante e, a fatica, ho trovato questo sistema che
funziona anche
con files midi di 4-5 minuti.
1. Nel form, associata ad un pulsante o a un evento (es. risposta giusta),
scrivi la seguente sub:
r = mciSendString("open c:\miadir\suono.wav alias suono", 0&, 0, 0)
' oppure     r=mciSendString("open c:\miadir\suono.mid alias suono", 0&, 0,
0)
r = mciSendString("play suono wait", 0&, 0, 0)
r= mciSendString("close suono", 0&, 0, 0)
2.In un modulo separato (es Module1) riporti la dichiarazione della funzione
mciSendString
che puoi copiare dall'API Viewer e che è una robaccia del genere:
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
Il tutto funziona con Vb5.

...



io ho inserito un oggetto OLE e gli ho assegnato un WAV o MID quindi ho
usato nel mio codice il comando OLE1.DOVERB
Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto: Grafica - Vediamo se c'è un vero esperto!

Problema:
Ho bisogno di convertire un'immagine da 24bit a 8bit, ma non so come creare
una palette ottimizzata in un tempo di elaborazione non superiore ai 5
minuti!
Riesco a convertire un 8bit in 24bit reperendo informazioni sui colori nella
palette (per ora solo da BMP) ma non so fare il contrario.
C'è qualche genio grafico che sa rispondere?
E magari che mi può rendere noto il formato di alcuni file grafici quali
.Gif .jpg ecc...?
Non ditemi che ci sono i soliti OCX specializzati: l'OCX lo sto creando io!
Grazie a tutti.


Per ricavare una palette ottimizzata ho scritto a suo tempo un
programma che operava in questo modo:
Si crea un array di 32768 elementi.
Si prende il punto centrale dell'immagine. 
Si divide l'immagine in 4 parti, prendo i 4 punti centrali dei 4
immaginari quadranti in cui viene divisa l'immagine.
Dividendo ognuno di questi per 4 si hanno altri 16 punti e cosi' via.
Nel frattempo, per ogni punto, si legge il valore in R8 - G8 - B8
(24bit), si quantizza a R5 - G5 - B5, e si ricompatta il tutto in un
intero a 15 bit (0-32767).
Si incrementa il corrispondente valore dell'array. Se prima
dell'incremento l'elemento era = 0 si incrementa un contatore.
Quando il contatore e' arrivato a 256 abbiamo la palette istografica
dei 256 colori statisticamente piu' utilizzati con una stima media
della quantità di utilizzo per ciascun colore. Racimola gli elementi
dell'array diversi da 0 e avrai la palette!!!
Ti assicuro che anche con grandi immagini si arriva presto a 256....
Un altro buon sistema adotta la variante di leggere i pixel in modo
random, anziche' in progressione geometrica....
Naturalmente ora hai la palette, ma devi anche fare un algoritmo di
conversione e retinatura... se ti serve una mano su questo fammi
sapere!!!!
Ciao, spero di esserti stato utile.
Roberto

Newsgroup: it.comp.lang.visual-basic
Titolo: >>> Cerco routine vb <<<

Qualcuno sa dove posso trovare una routine per ottenere la stringa
letterale di un numero?

...



http://www.murialdo.it:8000/it_lang_vb/
Attenzione!!!!
l'URL corretta del sito Comune č:
www.murialdo.it/it_lang_vb
lascia stare le porte, usa le Windows... ^___^
Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)

Newsgroup: it.comp.lang.visual-basic
Titolo: Ping - come fare !!!

Che voi sappiate è possibile, utilizzando la libreria icmp.dll, eseguire il
ping su di un indirizzo ip specificando l'indirizzo vero e proprio e non il
suo alias ???

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Finestra di Debug

E' possibile cancellare il contenuto della finestra di debug tramite codice
VB? Io ho notato che debug accetta solo i metodi assert e print.
Grazie, Roby

 
Prova con un
For i = 0 to 200
	debug.print ""
next i

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

 programma non contenga errori?
Di sicuro troverai più interessati se si sapesse di cosa si tratta ;)
Ciao
--
Reporting tool: 
http://www.neodatatype.net

 programma non contenga errori?
hai gia` pronta una check list?
tempo previsto per l'esecuzione dei test?
-- 
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: shell

Buongiorno a tutti
Ho la necessita' di poter selezionare un percorso per il salavtaggio dei
dati e quindi avrei bisogno di visualizzare la struttura delle cartelle sul
mio pc.
Che oggetto mi consigliate di usare e con quale procedura ?
Grazie a tutti
Rosario
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Che oggetto mi consigliate di usare e con quale procedura ?
Cerca: BrowseForFolder
(almeno in VB6)

Newsgroup: it.comp.lang.visual-basic
Titolo: Form Load e funzioni

Ciao a tutti,
	volevo sapere se esiste un modo per ovviare a un problema sul formLoad. 
In pratica se inserisco una serie di procedure nel dormload, queste sono 
eseguite prima che il form appaia. Io invece vorrei che prima compaia il 
form e poi dopo poco vengano eseguite le funzioni. Che devo fare ci 
metto un controllo timer?
Grazie

aaa ha scritto:

le metti nell'evento activate, con la premura di verificare (se serve) 
che vengano eseguite solo una volta.
La successione di eventi scatenati al caricamento di un form:
INITIALIZE
LOAD
ACTIVATE
ciao
stefano


VB6?
Puoi fare in vari modi... lascerei decisamente perdere il timer, per il 
momento:
- Chiamare Me.Show come prima istruzione dell'evento Form_Load (o comunque 
subito prima della chiamata alle procedure che dicevi)
- Appoggiarti ad un evento che viene generato *dopo* il Form_Load: 
Form_Activate, Form_Paint, Form_Resize... stando attento che non sempre 
vengono generati 1 volta sola.
- Se il form è quello di startup del progetto, cambiare la relativa 
proprietà del progetto, definendo (in un modulo BAS) una Sub Main fatta 
così:
Sub Main
    Load Form1
    Form1.Show
    Call proc1
    Call proc2
    ....
End Sub
Bye
Raf 

 metto un controllo timer?
Io semplicemente faccio tipo:
Load Form1
Form1.InizializzaForm
Form1.Show 
InizializzaForm è una routine all'interno di Form1, dove faccio quello che
devo (es. caricare dati ecc.), e in questo modo posso passare
variabili/recordset ecc.

Newsgroup: it.comp.lang.visual-basic
Titolo: OT ? --> Winamp

non è che qualcuno sa come si fanno a mettere su le nuove skin in Winamp?
io le ho downlodate dal sito 
winamp.com
   ma adesso ho dei file.WSZ  che non
so che farmene.
grazie in anticipo
ciao

 so che farmene.
mi sono scaricato non so piu' da dove dei vbp + exe per vb + winamp. mi
sembra ci sia anche come farle, le pelli.
se vuoi te lo mando. 1.5m non ancora compressi. nel caso mandami un mail col
tuo indirizzo corretto.
puoi anche guardare i miei vblinks cercando "winamp" o simili, _dovrei_
averlo messo.
ciao, pal
--
andrea dot palazzi at tin dot it
xday at libero dot it
free vb/sw: 
http://www.comune.modena.it/cittadini/apal/html/
Newsgroup: it.comp.lang.visual-basic
Titolo: Visualizzatore di filmati

Ciao a tutti,
sto provando a creare un visualizzatore di filmati con VB2008 express ma 
non trovo nessun componente per realizzarlo.
In questa versione non esite il componente che gestisce la multimedialità.
Riuscite ad aiutarmi.
Grazie a tutti di cuore
Sabrina

 Riuscite ad aiutarmi.
puoi provare ad installare sdk delle directx ed usare l'oggetto 
audiovideoplayback,
gli dai in pasto un file avi e lui lo riproduce.
se trovi qualke altro metodo, magari fallo sapere perchè mi interesserebbe.
saluti,
pusky re delle rane
Newsgroup: it.comp.lang.visual-basic
Titolo: colori e colori di sistema

domanda n°1:
E' possibile cambiare il colore del testo di un bottone?? Sicuramente si ma
come?
(domanda n°2 che in caso di risposata affermativa esclude la prima):
Tempo fa trovai in giro per internettt un esempio di codice che settava i
colori dell'applicazione come i colori di sistema, qualcuno l'ha mai vista?
sa dirmi dove posso trovarla?
sfortunatamente ai tempi non nutrendo particolare interesse per questo
codice non gli diedi un'occhiata ed ora ...piango amaramente non riuscendo
piu' a trovarla....
--
____________________________
   G 1 0 X®
Web: 
www.giox.net
Alt. Mail: 
info...@libero.it
Icq Uin: 47698601
Irc Chan. @azzurranet:
   #mhackerone; #ahccc; #linux;
_____________________________

SNIP<
--
Ciao Diego
*************************************
http://www.biapps.it/vbprogrammer
Il portale di riferimento per gli sviluppatori VB
- Iscriviti alla NewsLetter
- Partecipa alla Shared Comuniti
- Entra nel Forum
*************************************
Newsgroup: it.comp.lang.visual-basic
Titolo: Select Union in orizzontale...

Ciao a tutti,
forse mi sono incartato, ma avrei bisogno di tirare fuori un recordset
frutto di due select.
Cioè ho
T1= CODCLIFOR,TOTFATT
T2= CODCLIFOR,IMPO,TIPOIMPO
Dovrei tirarmi fuori
SELECT CODCLIFOR,SUM(TOTFATT) FROM T1 WHERE (mie condizioni) GROUP BY
CODCLIFOR
e altre due colonne che verrebbero fuori da una select del tipo
SELECT SUM(IF TIPOIMPO='1' THEN IMPO ELSE 0),SUM(IF TIPOIMPO='2' THEN IMPO
ELSE 0) FROM T2 WHERE (mie condizioni) GROUP BY CODCLIFOR
Le due where fra le select sono completamente diverse, in pratica mi
servirebbe una sorta di UNION perà che mi metta le 2 colonne di T2
calcolate in orizzontale.
TabRisultato
CODCLIFOR 	TOTFAT 	TOTIMPO1 	TOTIMPO2
1		50	23		0
2		25	20		10
3		0	50		100
Avete qualche idea di come fare?
Il tutto mi serve per fare
INSERT INTO T3 () SELECT (le mie due select di cui sopra)
Grazie
PS: scusate il semi OT
-- 
DBMS Firebird
VB6 + Ado

 Avete qualche idea di come fare?
Quello che devi fare non è una Union ma un Join:
SELECT T1_Temp.CODCLIFOR,
        T1_Temp.TOTFATT,
        T2_Temp.TOTIMPO1,
        T2_Temp.TOTIMPO2
    FROM (SELECT CODCLIFOR,
                        SUM(TOTFATT)
                    FROM T1
                    WHERE (mie condizioni)
                    GROUP BY CODCLIFOR) T1_Temp
    INNER JOIN (SELECT SUM(IF TIPOIMPO='1' THEN IMPO ELSE 0),
                                    SUM(IF TIPOIMPO='2' THEN IMPO ELSE 0)
                                FROM T2
                                WHERE (mie condizioni)
                                GROUP BY CODCLIFOR) T2_Temp
        ON T2_Temp.CODCLIFOR = T1_Temp.CODCLIFOR
-- 
3st3b4n
www.seber.it
Questo post è stato scritto con bit riciclati 

Dimenticavo gli alias dei campi:
SELECT T1_Temp.CODCLIFOR,
       T1_Temp.TOTFATT,
       T2_Temp.TOTIMPO1,
       T2_Temp.TOTIMPO2
   FROM (SELECT CODCLIFOR,
                       SUM(TOTFATT) AS TOTFATT
                   FROM T1
                   WHERE (mie condizioni)
                   GROUP BY CODCLIFOR) T1_Temp
   INNER JOIN (SELECT SUM(IF TIPOIMPO='1' THEN IMPO ELSE 0) AS TOTIMPO1,
                                   SUM(IF TIPOIMPO='2' THEN IMPO ELSE 0) AS 
TOTIMPO2


 Dimenticavo gli alias dei campi:
Ti ringrazio, ma purtroppo firebird non mi supporta una sintassi del genere
:\ (neanche semplificandola)


 genere :\ (neanche semplificandola)
Cosa non supporta? I Join o le Select nelle Select?
Potrei anche (sicuramente) fatto errori nello script.
Cosa non funziona?


 Cosa non funziona?
Non funziona una cosa del genere
SELECT * FROM
INNER JOIN
SELECT * FROM
E non funzionano neanche le query di query :
SELECT * FROM (SELECT
Pazienza, farň con due recordset in sequenza gestendo insert e update

Newsgroup: it.comp.lang.visual-basic
Titolo: Istruzioni SQL per definire DATASET

Ciao a tutti!!
Premetto che sono appena passato a .NET, č da un po' che giro in internet, 
sulla guida in linea e su un manuale di 
VB.NET
 ma non riesco a trovare 
quello che mi serve:
dovrei creare un DataSet attraverso il codice per poter gestire delle 
variabili che ho all' interno del programma, con vb6 dichiaravo una 
variabile recordset e poi  immettevo come parametri direttamente il codice 
SQL che mi usciva dalla query in access sostituendo dove mi servivano le 
variabili del programma.
Ora con .NET non riesco. Ho creato un dataset ma č sempre fisso, lo faccio 
con la creazione guidata. Non so assolutamente come poter fare per poter 
inserire l' istruzione SQL come facevo in vb6 oppure trovare un metodo 
alternativo che mi dia lo stesso risultato...
Grazie in anticipo a tutti!! 

 alternativo che mi dia lo stesso risultato...
http://groups.google.it/group/it.comp.lang.visual-basic/search?group=it.comp.lang.visual-basic&q=ado.net%2Bmanuale&qt_g=1
In prima scrivere la stringa di connessione:
http://www.connectionstrings.com/
è consigliabile scriverla nel file app.config in modo che sia richiamabile 
non solo da tutta l'applicazione ma da eventuali dll aggiunte.
I wizard danno dipendenza.
Il db utilizzato ?
Puoi utilizzare il namespace
System.Data.SqlClient   per sql server
System.Data.OleDb  per sql server, access, altri ....
Un esempio per sql server
dim sql as string= "SELECT * FROM tabella1 where id=25"
 Dim strConnect As String="Data source=(local);Initial 
catalog=Northwind;User id=sa;Password="
'Nel caso di dataadapter SqlConnection è evitabile, passando direttamente la 
stringa di connessione
 Dim con As New SqlClient.SqlConnection(strConnect)
dim ds as New System.Data.DataSet
dim dap as New SqlClient.SqlDataAdapter(sql,stringaConnessione o con)
dap.Fill(ds)
Se devi lavorare con i dati restituiti dal db forse è meglio un datatable
Ciao
giuseppeD 

 ha scritto nel messaggio 
news:44d3b35a$0$30251$4faf...@reader1.news.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: gif animate

come faccio ad inserire delle gif animate in un form?
Grazie


Sito comune.
ciao
ugo

Cmq c'è la CopyRight per utilizare immaigni Gif (animate) per i proprio
progetti commerciali..
(mi sembra :))


No, è inesatta la sintassi, per esempio:
Gif1.Copy vbRight
:P
ciao
ugo

Newsgroup: it.comp.lang.visual-basic
Titolo: VB KeyPreview property

Hello all,
      I am setting up a document in MS Word and I am using several
Visual Basic textboxes to input directed text. I set the function 1 key
to tab from one box to another. I  then started to set the KeyPreview
property to true on the document form. but there is no KeyPreview
property. Does anyone know how to get around this. I appreciate any
help thanks in advance.
Homer
Sent via Deja.com 
http://www.deja.com/
Before you buy.

                               VB KeyPreview property

Newsgroup: it.comp.lang.visual-basic
Titolo: WeBrowser control

Salve, ho la necessita' di riempire una INPUT TEXT di un FORM di una pagina
html caricata in un controllo WeBrowser.
Non sono riuscito a trovare una documentazione soddisfacente su questo ocx.
Qualcuno sa dirmi come fare?

 wrote in message
8tftfs$sjm$1...@fe2.cs.interbusiness.it...
: Salve, ho la necessita' di riempire una INPUT TEXT di un FORM di una

:
:
:

 ha scritto nel messaggio
news:8th2hi$aof$2...@sun450a.adriacom.it...


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

Esiste qualche anima pia che possa aiutarmi a trovare informazioni (o che le
abbia) circa l'interfacciamento di una seriale in Visual Basic ?
Grazie anticipatamente!
    Gabriella


sul sito comune (
http://it-lang-vb.net/
) cerca "porta seriale": troverai due esempi.
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Command Button come IE

Salve,
    come faccio a fare dei command Button come quelli di IE?
Cioč con l'immagine (Stile grafico) che copre esattamente tutto il bottone e
che si "sottolinea" quando uno ci passa sopra ?!?!?!
Grazie
Ciaps
Stracca
--
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
- - - - - - -
Cerca le risposte alle tue domande sul Sito Comune del
newsgroup it.comp.lang.visual-basic: 
http://www.murialdo.it/it_lang_vb
- - - - - - - - - - - - Magari prima leggi l'Help in
linea!  - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
- - - - - - -

 Cioè con l'immagine (Stile grafico) che copre esattamente tutto il bottone


Stracca
Beh, potresti fartelo da solo usando le funzioni API SetCapture e
RelaseCapture con l'evento MouseMove dello Usercontrol, eppoi
disegnare i bordi con la DrawEdge. E volendo potresti usare piu'
immagini per ogni stato del tasto (normale, col mouse sopra, premuto).
Ma se vuoi far prima vai su
http://members.tripod.com/~Aspiration/components.html
e scaricati un bottoncino gratuito che dovrebbe proprio fare al caso
tuo.... =)
Newsgroup: it.comp.lang.visual-basic
Titolo: Varie cose


Potresti fare cosě:
db.execute "DELETE * FROM 'Biglietti emessi';"
dove db č l'oggetto database.
Enjoyyyyyyyy!
NB: Mettere le Doeventssignifica anche rallentare un po' l'esecuzione.
ICQ: 43919681


Non funziona cosě. Bisogna creare un oggetto QueryDef e poi fargli eseguire
la tua query
Consiglio: che ne diresti di dare un'occhiata all'help in linea prima di
postare sul news ?
Ciao Ciao




Prova ad usare le parentesi quadre al posto degli apici
"DELETE * FROM [Biglietti Emessi]"
e comunque l'oggetto datacontrol non ha un metodo Execute
per cui devi farlo su un oggetto database aperto sull'mdb che ti
interessa

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

ciao,
ho la necessità di catturare l'errore in Embedded Visual Basic
ho provato con
on error goto errore
errore:
msgbox err.description
ma non funziona, sembra che non voglia il goto
è possibile che non sia possibile utilizzare il goto con Embedded Visual
Basic?
grazie,
ciao
Stefano
--------------------------------
Inviato via 
http://usenet.libero.it

 Basic?
E' molto probabile (altra prova che l'olio di gomito, a Redmond, pare piů
carente del petrolio)
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbceide/htm
/debug_7.asp

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

CHE differenza c'è tra GetProfileString e GetPrivateProfileString??
Grazias...


GetProfileString legge delle informazioni stringa dal file Win.Ini
GetPrivateProfileString legge delle informazioni stringa dal file *.ini che
vuoi tu.
Ciao Bruno
Newsgroup: it.comp.lang.visual-basic
Titolo: Ricavare il vero numero dell' hard-disk

Ciao,
cerco un modo (credo praticamente delle API)
per ricavare il vero numero di un hard disk 
(diciamo quello "fisico", non quello "logico").
Il buon esempio di M. Gamberini trovato tempo fa,
ricava un numero che non fa al mio caso
in quanto il numero varia alla reinstallazione del sistema operativo,
o quando si va a creare una partizione sullo stesso disco. 
L'ocx sysinfo.ocx sembrerebbe farlo 
(quindi sembra che sarebbe possibile, anche se non l'ho provato... ?),
ma comunque non vorrei ricorrere a file esterni.
---------------
Qualche idea, sennò
per identificare in modo molto sicuro 
un hard disk tramite altre informazioni
(magari combinate tra loro)?
Grazie
Tom

 ha scritto nel messaggio
news:3f2fc57c...@powernews.inwind.it...

Private Declare Function GetVolumeInformation Lib "kernel32.dll" Alias
"GetVolumeInformationA" (ByVal lpRootPathName As String, ByVal
lpVolumeNameBuffer As String, ByVal nVolumeNameSize As Integer,
lpVolumeSerialNumber As Long, lpMaximumComponentLength As Long,
lpFileSystemFlags As Long, ByVal lpFileSystemNameBuffer As String, ByVal
nFileSystemNameSize As Long) As Long
Function GetSerialNumber(strDrive As String) As Long
    Dim SerialNum As Long
    Dim Res As Long
    Dim Temp1 As String
    Dim Temp2 As String
    Call GetVolumeInformation(strDrive, Temp1, Len(Temp1), SerialNum, 0, 0,
Temp2, Len(Temp2))
    GetSerialNumber = SerialNum
End Function
prova questa ma forse funziona per partizione, non ne sono sicuro
ciao Alfredo

E' molto simile ad una che ho e
credo proprio che funzioni per partizioni
e quindi non fa al caso.
Newsgroup: it.comp.lang.visual-basic
Titolo: Help con le date

select * from tabella where data1 <= 'VarMiaD
ata' and DataFine >= miadata
 Sto confrontando una  2 campi di un recordet, con una data passata nel 
formato #mese/giorno/anno# e finchè metto un operatore solo e confronto solo 
un campo va bene.
Ma se  metto 2 operatori per esmepio  >= mi da errore Operatore mancante.
Oppure con 1 solo operatore ma confronto su campi non ottengo errori ma 
neanche i risultati sperati.
Dove sto sbagliando?
Grazie
-- 
Greg 


Scusa Greg ma non hai definito su che DB lavori e potrebbe fare la
differenza.
Se fosse JET mi sembra strano, quindi potrei ipotizzare un
ServerSQL...
A quel punto perchè non lo formatti con standard ISO...?
Il formato ISO è supportato da tutti i ServerSQL con una piccola
variante per JET
JET:
Format(TuoCampoDataDa, "\#yyyy\-mm\-dd\#")
Per ServerSQL non va bene, ma solo a causa dei delimitatori, che in
SQL sono gli apici.
Il formato yyyy-mm-dd [hh.mm.ss] è validato da entrambi
@Alex

 Format(TuoCampoDataDa, "\#yyyy\-mm\-dd\#")
Si proverò, ma mi sembra uno spreco fargli fare una funzione ad ogni 
record..
Per adesso ho risolto cosi:
k1= varMiaData +1
k2= varMiadata -1
select * from tabella where data1 < k1
and DataFine >k2
-- 
Greg 

 Greg
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------

 consiglio.
Uhm....
io non so come lavori il maghello delle query, ma a naso, deve prima 
applicare il format ad ogni record, oppure all'intera colonna, e poi fare il 
confronto.
Come faccio io invece, il maghello della query riceve la data già pronta e 
deve solo fare il confronto. Mi pare si risparmi un passaggio, che può 
essere piu o meno lungo. O no?
Comunque tornando un passo indietro ho scoperto perchè mi dava errore di 
operatore mancante.
where data1 => data2 genera errore operatore
where data1>= data2 va bene
where data1 =< data2 genera errore operatore
where data1<= data2 va bene
Sembra che ci sia un ordine degli operatori (<=>) da rispettare, ma solo con 
le date, con i numeri, pur non avendo mai fatto caso all'ordine degli 
operatori, non ha mai generato errore.
E mi riferisco sempre al Jet, eh. Gli altri non li conosco.
Ciao
-- 
Greg 

 Greg
Saluti


 Beh questo è normale la sintassi corretta esige la 2° struttura.
E pure qua pensavo di aver trovato la regola; invece facendo altre prove 
richiede l'ordine contrario :(
Ciao
-- 
Greg 

 prove richiede l'ordine contrario :(
Non esistono gli operatori =< e =>.
Ciao 


Mi sembrava di essere stato chiaro....(evidentemente no, nemmeno l'esempio
lo è stato)...
AUG.. ciao Fabio

Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto Wizard

Salve
qualcuno sa dirmi dove posso trovare dei wizard per l'autocomposizione di
progetti in VB
da scaricare?
Ciao e Grazie
Ivan

da scaricare?
Uno tra i più gettonati qui sul NG (e mannaggia non ho ancora avuto modo di provarlo) è Inno Setup:
prova a cercarlo sui motori di ricerca... sorry, non rimembro l'URL...
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: Database con password

Salve ho bisogno di aprire da VB un database con una password, ma non
ricordo la stringa per impostarla!!
Potete aiutarmi??
Al momento lo apro in questo modo:
  db.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source=" & App.Path &
"\Db.mdb;"
Ciao e grazie
Ivan

 ha scritto nel messaggio
news:c%wz7.42809$1H1.5...@news.infostrada.it...


Ciao,
in compenso chiunque aprira' il file avra' la password in chiaro ...
a questo punto la domanda: ma allora che cosa l'ho messa a fare???
beppe
-----------------------------------------------------------
Visita il sito del WWF AltoFerrarese
http://www.comune.cento.fe.it/wwfaf
-----------------------------------------------------------

Ciao,
sorry!, farei meglio a leggere con piu' attenzione quanto viene detto!!! ;o)


 ha scritto nel messaggio
news:9qmp67$954$1...@fe2.cs.interbusiness.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Penna Ottica

Ho un bel problema...
Mi e' capitata per le mano una penna ottica di quelle senza filo... mi
spiego... in genere ho interfacciato applicazioni VB con penne ottiche in
emulazione tastiera e qua naturalmente nessun problema.
Ora devo poter leggere da una penna che scarica i dati (l'utente lo chiama
calamaio ?? ) nel momento che viene riposta nel suo apposito alloggio che e'
collegato al PC tramite seriale.
Non ho il più ben che minimo manuale sulla penna in questione, ho provato a
ricercarne il modello in rete ma nulla...
Per l'accesso alla COM ho provato sia con l'apertura diretta della porta che
con MSCOMM ma non riesco a leggere i dati... non so più cosa  fare..... ogni
suggerimento e' apprezzato....
t.a.
Ciao
Ven.

 wrote in message 9544013...@fab-srv.fastnet.it...

Dovresti specificare la marca e il modello della penna.
Comunque la penna, prima di scaricare i dati, richiede  l'invio di una
sequenza di caratteri particolare sulla seriale.


Ti ringrazio RAF per l'attenzione innanzi tutto... pensa che credevo che il
mio post si fosse perso ma CASUALMENTE ho usato lo stesso subject di uno già
esistente ed e' stato.... accodato...
Una sequenza di caratteri... immagino che poi non siano standard... che
cambino da un prodotto all'altro...
che sarà come cercare un ago in un pagliaio visto che la penna in questione
e' vecchia credo di 5/6 anni e forse più....
cmq... la marca e' SYSTEL (cosi' trovo scritto sotto su una targhetta ) ma
non ho trovato nulla in giro... se vuoi ti do' anche il modello preciso...
Ciao
Ven.