mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: [?]Text Box solo numerico.

Volevosapere se esite un controllo TextBox aggiuntivo freeware che permette
di scrivere solo numeri e di impostare via proprietą i valori massimo e
minimo.
Sono in grado di farlo via codice, ma volevo sapere se esiste un controllo
gią pronto sullo stile di quello disponibile con VisualC++.
Grazie a tutti.

Spieg ha scritto:

Forse MaskEdit

 ha scritto nel messaggio
news:b1gcui$rl9$1...@lacerta.tiscalinet.it...

ce ne č uno sul sito comune
http://www.it-lang-vb.net/

 ha scritto nel messaggio
news:b1ge46$12kf4q$1...@ID-174464.news.dfncis.de...


non ho trovato nulla.
Intercettare il codice ascii del tasto nell'evento keypress e' troppo
banale?
-- 
ciao, hal

 ha scritto nel messaggio
news:5atp3vgfkukaglm18...@4ax.com...



mi dispiace farti notare che non fai bene le ricerche
il subject di questo post è Text Box numerico, se cercavi la parola
'numerico' ti accorgevi che il quarto link era quello che serviva a te.
ciao

Scusa, ho trovato ora come mi avevi detto.
Ti assicuro che prima di postare in ogni caso avevo oltre che fatto le
ricerche, sfogliato tutte le pagine dell'archivio.
Grazie per avermi detto come trovarlo.
Hai ragione, cerco male le cose.
"Huntercity" <hunte...@NOSPAMexcite.com> ha scritto nel messaggio
news:129%9.163678$AA2.6...@news2.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Come inserire una cartella XLT in VB6?

Gentili Signori,
ho da poco cominciato a lavorare in VB6.
Ho un quesito.
Qualcuno sa dirmi come trasformare una cartella di lavoro Excel (6 fogli,
2,1 Mb) in un file .exe apribile anche da un computer su cui non sia
installato Excel? Sono riuscito a visualizzare i fogli, qualcuno conosce la
procedura per cambiare il valore di alcune celle?
Grazie infinite a tutti.
Claudio Facciolo
claf...@freemail.it

 qualcuno conosce la procedura per cambiare il valore di alcune celle?
Per esempio, col seguente codice apri Excel senza renderlo visibile, crei
una nuova cartella di lavoro, assegni il valore 1 alla cella A1 del primo
foglio di lavoro, visualizzi tale valore per verifica, poi chiudi tutto
senza salvare.
Option Explicit
Private Sub Main( _
)
  With New Excel.Application
    With .Workbooks.Add
      With .Worksheets(1).Range("A1")
        .Value = 1
        Call MsgBox( _
            .Address & " = " & .Value _
          , vbInformation + vbOKOnly _
          , "[" & .
Parent.Parent.Name
 & "]" & .Parent.Name)
      End With
      .Close False
    End With
    .Quit
  End With
End Sub
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

E installare Excel sui computer destinazione? :)
Se l'intenzione e' modificare le celle, penso che tu debba portarti appresso
le librerie di Excel, il che significa distribuire Excel (seppur in parte)
senza pagare la licenza d'uso... io vedrei le clausole del contratto M$
prima di continuare...
Se e' solo questione di visualizzazione, esistono visualizzatori gratuiti
sul sito M$...

Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTOOOOOOOOOOOOOOOO

problema
guardiamo se riesco a farmi capire.
vorrei fare un programma,che quando lo eseguo controlla
se c'è un file sul disco, se trova il file mi colora un cerchietto(da me
fatto) di rosso,se non lo trova lo colora di verde.
ringrazio tutti per la vostra attenzione
ciao
vp...@lumetel.it

 wrote in message
BdqF4.54282$pn3.6...@news.infostrada.it...

Vediamo un po se ho capito bene
* Il cerchietto è un'immagine
* hai già la funzione che controlla se c'è il file
Ti fai un cerchietto rosso e uno verde e li metti su due PictureBox nascoste
(diciamo picture1 e picture2). Poi fai la tua pictureBox visibile (diciamo
picture3). Fai eseguire la tua funzione di controllo del file e se ti
ritorna True fai "Picture3.Picture = Picture1.Picture" altrimenti fai
Picture3.Picture = Picture2.Picture.
Spero di esserti stato di aiuto
Ciao RangO


vp...@lumetel.it
USAAAAAAA IIIIIIL COOOOOOOOOMAAAAAAAANDOOOOOOOO Dir$() EEEEEEE
UUUUUUUUUNAAAAAAAAA SHAAAAAAPEEEEEEEEE
CIIIIRCOOOOOOOOOOOOOLAAAAAAAAAAAAAREEEEEEEEEEEEE
CIIIIIIIIIIIIIIAAAAAAAAAAAAAAAAAAOOOOOOOOOOOOOOO!

 CIIIIIIIIIIIIIIAAAAAAAAAAAAAAAAAAOOOOOOOOOOOOOOO!
::::::::::::::::::::::::))))))))))))))))))))))

 CIIIIIIIIIIIIIIAAAAAAAAAAAAAAAAAAOOOOOOOOOOOOOOO!
RRRRRROOOOOOOOTTTTTTTTTTFFFFFFFFLLLLLLLLLL            !!!!!!!!
Bye, G.


Certe cose ti risolvono la giornata!
Grande!

Newsgroup: it.comp.lang.visual-basic
Titolo: problema myodbc

Dopo aver cercato su vari Ng non sono ancora riuscito a produrre un
codice in vb valido per connettermi al mio server mysql remoto...
avete suggerimenti da darmi..quale oggetto database bisogna
utilizzare?
confido in voi(mi serve per la tesina di maturità!)
ciao Andrea

Nell'A.D. 22 Jan 2003 12:39:21 -0800, 
amici.a...@tin.it
 (VizZz)
scrisse:

Hai scaricato MyODBC?
Hai accesso come utente valido al server MySQL?
Hai i privilegi necessari?
Quale codice utilizzi per poterti connettere?
Ciauz
Aran Banjo
<math> 2 + 2 = 5 for sufficiently large values of 2</math>

Newsgroup: it.comp.lang.visual-basic
Titolo: Crystal report per vb .net Standard

Qualcuno è a conoscenza dell'esistenza di una qualsiasi versione 
Crystal report per vb .net standard ?
Tipo la RDC60 (la versione activex) per visual studio 6 tanto per 
intenderci.
Grazie, Alverman
Inviato da 
www.mynewsgate.net

dimenticavo ....... gratuita :-)
Inviato da 
www.mynewsgate.net

 ha scritto nel messaggio
news:200408271...@mynewsgate.net...

Newsgroup: it.comp.lang.visual-basic
Titolo: line e circle

salve a tutti
stavo cercando di riportare un programma da qbasic a vb. questo programma
legge dei file contenenti delle coordinate grafiche.
sia il form che lo schermo su QB anno le coordinate con l'asse Y invertito.
lo zero sta in alto a sinistra e non in basso a sinistra.
il problema viene fuori quando si vuole riprodurre archi che sono stati
creati su assi xy normali su un sistema con l'Y invertito.
con QB con "window screen" e poi le dimensioni della videata si risolve. con
VB no.
come posso risolvere?
grazie

 ha scritto nel messaggio 
news:443f93ad$0$29733$4faf...@reader2.news.tin.it...

y = ScaleWidth - y
Ciao

 ha scritto nel messaggio
news:443fb14b$0$29733$4faf...@reader2.news.tin.it...


 ma questi non coincidono di poco.
Certo come pensi di essere aiutato se non hai postato
neanche UNA riga di codice?
Mah!
Lokar 

 ha scritto nel messaggio
news:4aa54eF...@individual.net...



Premesso che del codice funzionante e di esempio con dati reali 
invoglierebbe maggiormente ad aiutarti, quanto hai postato, nonostante 
l'orrendo stile QBasic, mi pare funzionare benissimo, l'errore č solo nel 
fatto che l'asse Y lo va misurato su ScaleHeight anzichč su ScaleWitdh come 
io ti ho indicato ;)
Ti consiglio comunque di ripulire un po' il tuo codice, dare dei nomi 
significativi alle variabili, usare le funzioni e evitare i goto.
Un porting paro-paro del codice QBasic in VB non č il massimo.
Prova ad es. cosě:
Const PI As Double = 3.14159265358979
Const TO_RADIANS = PI / 180# ' questo č un po' piů preciso di 0.01745
Public Sub DrawArc(ByVal X As Long, ByVal y As Long, ByVal Diameter As Long, 
ByVal Color As OLE_COLOR, ByVal Angle1 As Double, ByVal Angle2 As Double)
    Circle (X, ScaleHeight - y), Diameter, Color, Angle1 * TO_RADIANS, 
Angle2 * TO_RADIANS
End Sub
' ...
' ...
          Case "ARC"
                  'Cerca la riga giusta
                  Do While (RigaDati <> "10") AND (not eof(1))
                      Input #1, RigaDati
                  Loop
                  If (RigaDati = "10") AND (not eof(1)) Then
                      Input #1, p1Ori, c20, p2Ori, c30, p3Ori, c40, Dia, 
c50, Ini, c51, Fin
                  End If
                  Call DrawArc(p1Ori, p2Ori, Dia, vbBlack, Ini, Fin)
                  GoTo AVANTIUNARIGA 'Questo non voglio sapere cosa sia :)
E' un po' piů chiaro da leggere e ti mette al riparo da file "imperfetti".
Ciao 

 ha scritto nel messaggio
news:4440b09e$0$29724$4faf...@reader2.news.tin.it...


 ha scritto nel messaggio
news:4444e70a$0$18281$4faf...@reader1.news.tin.it...


> window (0,0)-(640,480)
Non ricordo cosa faccia questa.
Ciao 

 ha scritto nel messaggio
news:44479f14$0$29734$4faf...@reader2.news.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [WinXP/2K + OfficeXP] BUG/Errore!!!

Miii, erroraccio installando un'applicazione VB6 + SP5 + MDB Access 97 + DAO
3.5 (anche 3.6)
Se sulla macchina è già installato Windows XP o 2000 con Office XP si
verifica il seguente errore:
"errore di run-time -
2147417848
 (80010108)
Errore di automazione
L'Oggetto invocato si è disconnesso dai client corrispondenti"
Se si disinstalla Office XP, si installa l'applicazione e si reinstalla
Office XP il problema viene bypassato...PERCHE'?
Un saluto,

Per quello che ho visto è Office XP ad avere voragini..
..ogni volta che apro un testo non italiano dopo 4 secondi mi dice ciao con
un GPF
ho tolto qualsiasi correttore grammaticale ma si pianta lostesso
alla fine ho tolto Office XP e ora mi funziona tutto :)
(ho rimesso il 97)
ps* non ho capito l'utilità dello storico delle copie in clipboard.. appare
un cicalino sul testo che non risco a toglierlo, per non parlare della
finestra a lato...
Bellissima l'interfaccia di office xp, ma troppo ingarbugliata, a mio
parere..
e poi ha bisogno di una petroliera di patches
per contro.. XP mi sembra superstabile.. incredibilmente anche con il
Plug&Pray!!
Fabio

 ha scritto nel messaggio
news:RRb28.10340$ly.3...@twister1.libero.it...

Ho seguito i tuoi stessi passi per un mio programma, ho installato su un
comp dove gia' c'era xp con office xp
e non mi ha dato nessun errore. E' possibile che il sistema era gia'
compromesso prima che installavi.

 compromesso prima che installavi.
No. I test vengono fatti su macchina vergine e comunque ho 8 clienti con lo
stesso problema.
Mannaggiupatataus!

Newsgroup: it.comp.lang.visual-basic
Titolo: sql-vb2005 aggiornamento percentuale

Salve a tutti,
ho la necessità di aumentare in forma percentuale il campo di una serie di 
record (es.aumento listino prezzi).
Qual'è la strada più corta?
ringrazio anticipatamente
saluti. 

salve,

UPDATE dbo.Tabe
    SET Col = Col * 1.x -- dove x rappresenta la percentuale di incremento
    WHERE ....
saluti
-- 
Andrea Montanari (Microsoft MVP - SQL Server)
http://www.asql.biz
 
http://italy.mvps.org
DbaMgr2k ver 0.21.0 - DbaMgr ver 0.65.0 and further SQL Tools
--------- remove DMO to reply
Newsgroup: it.comp.lang.visual-basic
Titolo: DAO 3.6 in VB6 SP3 !!!

Ciao raga...
non so se qualcuno ci ha fatto caso, ma nel sp3 di vb6 c'č anche il NUOVO!
DAO 3.6 ovvero il motore di Access 2000 !!!
Non so a voi, ma a me il nuovo DAO risolve un casino di problemi.
Questa volta M$ ci ha fatto un bel regalo (speriamo)... peccato che non ci
sia neanche una riga sui nuovi comandi :-(
CIAO.
Mario.

 DAO 3.6 ovvero il motore di Access 2000 !!!
No, non ci ho fatto caso dato che avevo già installato Access 2000.
Per me nessun regalo quindi... sigh ! Speriamo che quest'anno quel
rimbambito di Babbo Natale se ne ricordi... almeno lui !
Zeross
^____^

 sia neanche una riga sui nuovi comandi :-(
Nella SP3 full ci dovrebbe essere anche un file .chm che rimpiazza l' help
del DAO.
Ad ogni modo anche quello che trovi li è decisamente scarsa come
documentazione.
Ciao
Fabrizio


nel sp3 per vb6 ver italiana non c'e'...... forse solo in quella completa
per vstudio..
anzi, se qualche anima pia che ce l'ha potesse postarmelo...
saluti
Andrea Montanari
andrea.m...@iol.it

Newsgroup: it.comp.lang.visual-basic
Titolo: R: Ritardo - Come si fa?

 tipo delay(1000) o sleep(1000) o qualcosa simile??...
hai detto bene: Sleep
Public Declare Sub Sleep Lib "kernel32" Alias "Sleep" _
    (ByVal dwMilliseconds As Long)
dwMilliseconds rappresenta i millisecondi in cui l'applicazione deve 'stare
ferma'
Ciao
Faber

 wrote in message
news:5n895.45662$2s6.4...@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Ordinamento per Data di una ListVievw

Salve a tutti
Sono incappato nel classico problema di ordinamento delle date, per cui
una data tipo 06/04/2006 viene prima della data 06/06/2005
Forse la soluzione più semplice è quella di importare le date nella list
view in questo modo 2006/04/06... ma volevo sapere se c'è qualche altro
sistema più semplice...
Ringrazio anticipatamente per le risposte :-)
-- 
Daniele Pinna  (leva oops. per rispondere) * ICQ "chiedilo"
* Vota il mio sito nella TOP100 Italiana *
Sito Web 
DAPINNA.COM
: 
http://www.dapinna.com
Il Docfa in Pillole:  
http://www.ildocfainpillole.it

 sistema più semplice...
Credo che dovrai gestirlo a mano, altrimenti.
Io di solito faccio questo passaggio:
Database -> Collezione -> ListView
Quindi i dati sono nella collezione. Li ordino e riscrivo la listview.
Ciao,
    Fabrizio
=== 
http://www.negusweb.it
 ===

 ha scritto nel messaggio 
news:e330ie$mch$1...@area.cu.mi.it...


 Ringrazio anticipatamente per le risposte :-)
Se usi 
VB.NET
 ti ha già dato una risposta Cteniza.
Se usi VB6 dipende...
Se la data è l'unica colonna di ordinamento fissa, allora (se è possibile)
la cosa più semplice è quella di ottenere i dati già ordinati, ad esempio
agendo sulla proprietà sort di un recordset.
Viceversa, se la colonna di ordinamento può essere impostata dinamicamente
cliccando sull'header, o se non puoi ordinare facilmente i dati origine, hai
2 alternative.
1) Nella listview aggiungi una colonna "nascosta" (con width nulla),
popolata con gli stessi valori della colonna data ma in cui i subitems hanno
il formato yyyymmdd; quando clicchi sull'header della colonna data in realtà
imposti la colonna di sorting su quella nascosta.
Piccolo problemino: agendo col mouse sui separatori di colonna è possibile
che l'utente "riveli" la colonna nascosta.
2) Implementi una routine callback di custom sorting, come spiegato qui:
http://vbnet.mvps.org/code/callback/lvsortcallback.htm
Bye
Raf

 Daniele Pinna wrote:
[cut]
Ringrazio tutti per le risposte... :-)
Ho deciso per la soluzione più semplice cioè importare la colonna con il
formato yyyymmgg :-)


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

Salve, uso vb6, forse qualcuno mi aiuta....
vorrei aumentare il numero di righe visualizzate nel elenco di una combobox, 
inoltre vorrei che l'elenco rimanesse sempre aperto.
Qualche idea.....Grazie a tutti.

 combobox, inoltre vorrei che l'elenco rimanesse sempre aperto.
Proprietą .Style -> F1
Un Paperino RTFM.

 Proprietą .Style -> F1
Ultimamente faccio fatica a capirti :)
Io avrei risolto con una listbox.
Ciao
--
Reporting tool: 
http://www.neodatatype.net

 Io avrei risolto con una listbox.
Ehi, io ho risposto alla sua domanda :-)
Ho /presunto/ che se usava una combo fosse perché doveva
poter inserire a mano qualcosa di non presente nella lista.
Se poi gli andava meglio una ListBox, io non posso saperlo...
Un Paperino in ferie e di passaggio.
Newsgroup: it.comp.lang.visual-basic
Titolo: MaskEditBox.

Cosa è ?? Dove lo Trovo ????
Leonardo

 ha scritto nel messaggio
news:f2yy7.16849$YC3.4...@news1.tin.it...


 ha scritto nel messaggio
news:9qej8f$vk8$1...@nreadb.inwind.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto disegnare rettangoli con gli angoli smussati

Come posso disegnare con le API dei rettangoli
con gli angoli smussati
Aiutatemi
e Buona Pasqua

 con gli angoli smussati
Public Declare Function RoundRect Lib "gdi32" Alias "RoundRect" (ByVal hdc
As Long, ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As
Long, ByVal X3 As Long, ByVal Y3 As Long) As Long
su MSDN ne č spiegato l'utilizzo
buona pasqua anche a te    :)
Faber

 wrote in message 8dpnn4$b6a$1...@nslave1.tin.it...


> Grazie di avermi aperto gli occhi
uhmmm... prego, non sapevo di essere un oculista    :)
Faber

Newsgroup: it.comp.lang.visual-basic
Titolo: LAVORARE COL REGISTRO DI CONFIGURAZIONE.

C'č qualcuno che mi aiuta per imparare a usare le api del registro di
configurazione?
Scrivetemi a 
ppuggi...@tin.it
togliere nospam

C'è qualcuno che mi aiuta per imparare a usare le api del registro di


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

Esiste qualche funzione di VB per convertire una data (es. 01/01/2002) in un
numero seriale o, in caso contrario, sapreste indicarmi come fare?
Grazie
Pasquale

 indicarmi come fare?
Cosa intendi per "numero seriale"?
Se e' quello che conosco io, ti basta usare la funzione
DateSerial(year,month,day)
(cercare nell'help di VB o in MSDN no, eh?...)
--
   Alex Palmese
---
Sei anche tu stanco dei messaggi spam? Usa Terminator, il programma
anti-spam italiano FREEWARE! 
http://www.sertel.net/terminator/

 numero seriale o, in caso contrario, sapreste indicarmi come fare?
DateSerial :-)
Bye, G.

    Alex Palmese
Per numero seriale intendo quello che si ottiene contando i giorni che sono
trascorsi dal 31/12/1899 fino ad una certa data.
Cdate ad esempio, converte questo numero in una data nel formato
corrispondente all'impostazione internazionale (Cdate(2) = 01/01/1900).
Quanto all'osservazione (polemica) rispondo citando l'MSDN:
Esempio di funzione DateSerial
In questo esempio la funzione DateSerial viene utilizzata per restituire la
data relativa all'anno, al mese e al giorno specificati.
Dim MyDate
' MyDate contiene la data corrispondente
' al 12 febbraio 1969.
MyDate = DateSerial(1969, 2, 12)   ' Restituisce una data.
...stesso discorso per DateValue.
Grazie comunque per la risposta.
Pasquale

trascorsi dal 31/12/1899 fino ad una certa data.
Debug.Print CSng(Date)
-- 
hth, hal

 ha scritto nel messaggio
news:anmmko$fbag7$1...@ID-56381.news.dfncis.de...

Grazie, hal.
Pasquale
Newsgroup: it.comp.lang.visual-basic
Titolo: informazione

qualquno sa dirmi se esiste un decompilatore per vb4 a 32 bit?
e se esiste dove posso trovarlo?
grazie a tutti.

 grazie a tutti.
Non esiste, puoi solo disassemblare un file nel suo sorgente assembler, perchè
durante la compilazione vengono perse informazioni essenziali per ricostruire la
struttura di un linguaggio di alto livello come vb, c++, pascal o deplhi.
dario...@iol.it
http://dariobrunocorti.freeweb.org

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] percentuale di ot nel newsgroup

post IT            6536
post OT            491
post totali       7027
% di OT 6.99
--
Samuele Battarra
mail server: 
libero.it
, account: battarsa

 % di OT 6.99
Non č male!
--
Ciaps
Stracca (
http://www.stracca.net
)

Newsgroup: it.comp.lang.visual-basic
Titolo: contenuto db con Ado

Ciao a tutti !
La domanda sembrerà un po' strana, ma proprio non riesco a capire l'ADO.
Problema:
All'evento formload, vorrei dapere se nel mio db esiste "almeno" un record
(utilizzo ADO),ma non so che istruzione dare..
qualcuno può aiutarmi ?
Ciao 7ottobre

 ha scritto nel messaggio
news:68KO6.2003$w4.4...@news1.tin.it...

.recordcount
ciao
ugo

 [...]

 ciao
Yes, hai ragione, così è + completo.
ciao
ugo

 wrote in message
9eg5qe$b2c$1...@news.mclink.it...


 Ciao e grazie
[...]

Newsgroup: it.comp.lang.visual-basic
Titolo: START progr al boot

Mi permetto di chiedere come è possibile fare partire un applicazione (.exe)
su windows NT workstation 4.0 all'accensione del PC senza dover effettuare
(CTRL ALT CANC) nonchè il Login.
Grazie per l'eventuali risposte, Massimo.

Va inserito come servizio.
Non so come si fa ma se ne è parlato qualche tempo fa; prova anche a vedere
se c'è qualcosa sul sito comune.

> Va inserito come servizio.
Per Win98 basta inserire un stringa con un nome a scelta nel registro, nella
chiave:
HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunServices\
Il valore di tale stringa e' il programma che devi eseguire, corredata
eventualmente da tutti i parametri che vuoi.

Newsgroup: it.comp.lang.visual-basic
Titolo: connessione di una risorsa di rete

ciao  a  tutti
ho un problemino :
per connettere delle risorse di rete ho trovato solo questo metodo che
sicuramente non è dei migliori
Private Sub Command1_Click()
Shell "rundll32 user,wnetconnectdialog"
End Sub
Private Sub Command2_Click()
Shell "rundll32 user,wnetdisconnectdialog"
End Sub
quale può essere un metodo migliore ??
se no , come potrei passare dei parametri a wnet[dis]connectdialog ( Es.: F
,"212.216.212.21" )
grazie
Alberto

 grazie > Alberto
se ti puo' servire, io ho connesso al portatile come w: il cdrom del desktop
e nel registro trovo il nome di rete del desktop a questa chiave:
HKEY_CURRENT_USER\Network\Persistent\W
i valori sono
-- predefinito -- (non impostato)
-- providername -- microsoft network
-- remotepath -- \\aut_andrea_desk\cdrom
-- username -- administrator
le chiavi le puoi configurare senz'altro.
il punto e' se si riesce a evitare il rundll da vb. se ne era parlato tempo
fa per il login iniziale, e non credo fosse saltato fuori niente. se lo
scopri, facci sapere come :)
ciao, a.
Newsgroup: it.comp.lang.visual-basic
Titolo: Workspace e Database: oggi due nemici!

Ciao al NG!
Volendo rendere piu' flessibile alcune mie applicazioni ho deciso di
lavorare con VB5 (Enterprise Edition) dopo oltre due anni di esperienza su
Access 97.
Mi sono subito scontrata contro uno scoglio imprevisto: la dichiarazione
iniziale di Workspace e Database che utilizzo per creare un nuovo mdb o per
modificarlo a seconda delle esigenze!!!!
VB5 (Enterprise Edition) non mi accetta le seguenti dichiarazioni:
Dim wks as Workspace
Dim db as Database
Il programma, quando in esecuzione, si blocca subito qui!
Non riesco a capire perche'?!
1) Con Access 97 il problema non c'era;
2) nel Books On Line di VB5 (Enterprise Edition) ci sono molti esempi che
fanno quelle stesse dichiarazioni;
3) nell'Help di VB5 (Enterprise Edition) idem.
Mi manca forse una libreria, perche' quando cerco workspace nel
visualizzatore di oggetti non lo trova, infatti me lo scrive con la W
minuscola (w).
Un sentito grazie a chi mi puo' aiutare.
Monica

 
devi aggiungere il 'Reference' alla libreria DAO




Grazie, adesso meditero' sui consigli che mi avete date!
A presto, Monica.

 devi aggiungere il 'Reference' alla libreria DAO
p.f., qualcuno mi puo' spiegare a cosa serve dichiarare e usare il
workspace, visto che tutti i miei dbms in vb vanno tranquillamente
dichiarando solo
dim db as database
set db = opendatabase("ciccio.mdb")
??
tia, pal


Anche a me interesserebbe molto !! se non sbaglio riguarda le connessione
con ODBC giusto ? (staro' dicendo una ca..volata ?)
Io in un futuro molto prossimo dovro' lavorare con Odbc e non l'ho mai
usato.. c'e' molta differenza da ADO ?
Ciao, DaVe




istruzione può essere unica e cioè


 Ciao, DaVe
L'unica necessita' che ho finora trovato , ma sono sicuro che servono
anche ad altro e' l'uso delle transazioni( BeginTransaction,
CommitTransaction ) che operano a livello di WorkSpace e non a livello
di Database per rendere 'atomiche' sequenze di operazioni su database.

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con il comando START

Scusatemi se riposto il problema, ma non sono riuscito a trovare la
soluzione:
Dim varPercorso as String
Private Sub cmdFile_click()
varPercorso = "C:\Cartella\Filesenzaspazzi.doc"
Shell "Start" & " " & varPercorso, vbHide
End Sub
'Se invece il percorso ha degli spazi, non parte il doc e non da nessun
errore
Private Sub cmdFile_click()
varPercorso = "C:\Cartella\File con spazzi.doc"
Shell "Start" & " " & varPercorso, vbHide
End Sub
Grazie a tutti


direi
Private Sub cmdFile_click()
    varPercorso = "C:\Cartella\File con spazzi.doc"
    Shell "Start " & Chr$(34) & varPercorso & Chr$(34), vbHide
End Sub
(dovrebbe andare anche se non ci sono spazi)
Faber

Lascia perdere START, perche' comunque in nt non funzionerebbe, ma utilizza
ShellExecute, dell' api.
Sul ng ci sono un sacco di esempi.
ciao, hal

Se no c'è un modulo sul SC che converte un percorso con gli "Spazi" in una
stringa formato DOS !
Fatto questo dovrebbe funzionare!
Ciao Mauro!


Ripeto: in nt  _non_ funziona perche' start e' un comando della shell e non un eseguibile.
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: Leggere dati dalla porta parallela

Come posso, in VB, leggere e scrivere una locazione di memoria?
Dovrei leggere dei dati dalla porta parallela 889.
Grazie

 Dovrei leggere dei dati dalla porta parallela 889.
Non ti converrebbe usare un controllo specifico per l'uso della porta
parallela?
                    Ciao
                                Allanon

 wrote in message
ft0j7.38209$vC1.5...@news1.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto Come avviare un programma in vb da win

Come posso far avviare un programmino fatto in da windows cno una secuenza
di tasti del tipo alt + c o qualsiasi altro

Sul Sito comune ricordo di aver visto un progetto (o dll)  che ti permette
di intercetare la presione di qualsiasi taso... Cmq da una okkiata sulle
MSDN  la proprietą KeyPreview del Form.

di tasti del tipo alt + c o qualsiasi altro
Sulle proprieta' del collegamento si imposta la Shortcut Key (in italiano
sara' Tasti rapidi ? boh ?)
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: ListView e immagini

Ho due problemi:
1. Inserire un immagine centrata dentro una colonna di ListView (anche
allineando la colonna al centro, solo il testo viene centrato, l'immagine
rimane all'estrema sinistra).
2. Evitare che, inserendo un'immagine in una colonna del ListView, tutte le
altre colonne rimangano "spostate" a destra della dimensione dell'immagine
(come se caricasse l'immagine in tutte le colonne, solo che nella colonna
giusta si vede l'immagine mentre nelle altre è bianco).
Se esiste qualche controllo simile a ListView che potrei usare, fatemi
sapere.
Grazie mille! :)
P.S. Se sapete risolvere anche solo un problema dei due non esitate a
rispondermi ;)

 sapere.
Prova a giocare con l'ImageList (nei Microsoft Common Controls... non
ricordo quali ;p)
Happy Coding =)
Lokar
--
Sito Comune: 
http://www.it-lang-vb.net/
Manifesto: 
http://www.it-lang-vb.net/docs/Manifesto.txt

 ricordo quali ;p)
Certo, gia' la uso :)
Solo che la dimensione sull'ImageList è fissa!

 Solo che la dimensione sull'ImageList è fissa!
nel primo tab delle proprieta' c'e' anche 'custom' (vb6sp5).
non so se poi scelta una misura valga per tutte.

> non so se poi scelta una misura valga per tutte.
E' cosě.
Il problema non č tanto la dimensione, anche fissa va bene, tanto ho due
immagini una rossa una verde.
Il problema č gli spazi che mi si creano nella listview! :((
Nessuno sa come aiutarmi?

Newsgroup: it.comp.lang.visual-basic
Titolo: VB6 e SP6

Attualmente lavoro con SP5.
Dovrei, secondo Voi, darmi da fare per procurarmi
il SP6 ?
Grazie, Sauro

 il SP6 ?
http://groups.google.it/groups?hl=it&lr=&q=SP6&btnG=Cerca&meta=group%3Dit.comp.lang.visual-basic
Ave
giuseppeD
---
CCR 

Penso che lascierò le cose come stanno.
Grazie e saluti, Sauro


a me nessun errore eseguendo nell'esempio riportato nel newsgroup

il SP6 ?
Uso SP6 da maggio e finora non ho avuto problemi.
ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Ricerca all'interno di una stringa

Ragazzi sapete come posso trovare una certa sequenza di caratteri
all'interno di un campo ?
Cioč mi sapete dire se posso trovare il nome ANDREA all'interno di un campo
che contiene svariati nomi ?
Grazie a tutti per l'interessamento.


funzione Instr di visual basic
ciao, hal

 ha scritto nel messaggio
news:9eub5n$5ce$1...@pinco.nettuno.it...

Type "instr" and press F1.
Read the following...
bye :-)
ugo

if StringaInCuiCercare like "*ANDREA* <> "" then .......
Nella stringa che vuoi ricercare puoi inserire i soliti caratteri Jolly.
Ciao Claudio

 all'interno di un campo ?
campo....?  se parli di campo mi viene in mente un database.....se č cosě ti
rispondo con:
SELECT * FROM Tabella WHERE Campo LIKE '%{stringa che cerchi}%'
ciao


 ha scritto nel messaggio
news:9zNQ6.10396$Uo3.4...@news6.giganews.com...


 Roal Zanazzi
Chiedo scusa se ho infranto un copyright... :----)))
ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema per CrystalReport 4.6 - L'ordinamento!!!

Ciao a tutto il NG!!!
Oggi Vi pongo questo quesito...
Ho la necessita di scegliere il tipo di ordinamento dati in fase di
stampa... es.: ho già fatto una selezione di dati..(Quella selezione da
strizzati di cervello che vi ho fatto vedere qualche mess. Fa!!!), ora
vorrei dire al benedetto Crystalreport di ordinarmeli come voglio io...
magari per Nome Cliente e/o Data... Tutto questo da Codice VB...ecc.ecc.
Esiste qualche metodo particolare per fare ciò?
Grazie a tutti...

 ha scritto nel messaggio
news:9dua8r$s3h$1...@nreadA.inwind.it...



Ordina gia' il recordset, no ?
SELECT campo1, campo2, campo3
FROM tabella1
WHERE condizione1
ORDER BY campo1
ciao, hal
p.s.
ma il database che usi non ha un help per il sql ?

Newsgroup: it.comp.lang.visual-basic
Titolo: Gestione errori

C'è il modo di avere il nome della sub dove si è generato un'errore.
Cioè se sono in
Private Sub mnuUtilsPack_Click()
On Error GoTo Err_Handler
    Pack.Show
Exit Sub
Err_Handler:
    Call SetupErrorHandling(??????????????)
End Sub
Private Sub SetupErrorHandling(Evento As String)
    Set AppObject = App
    Set ErrObject = Err
    LogFileMenu = True
    OptionsMenu = True
Err_Handler:
    Call AddToCallStack(Name, Evento)
    Call ErrorReport
End Sub
Spero di essere stato chiaro.
Grazie, Alberto

 ha scritto:

Ma è una domanda o una affermazione?
Cioè se copio e incollo il tuo codice funziona oppure hai perso tempo
a scrivere qualcosa di totalmente inutile?
Prova con MZTOOLS....
Aran Banjo

Forse non mi sono spiegato :)
Quando chiamo ErrorHandling vorrei passargli anche la routine dove viene
generato l'errore, per questo ho messo i ?, perchè non so cosa metterci.
Call SetupErrorHandling(??????????????)

Cioč io non vorrei scrivere per esteso il nome della routine che ha generato
l'errore, ma chiedevo se esisteva un metodo che identificasse da solo il
nome della routine

nome della routine
Credo che non si possa....
Avevo giŕ dato una occhiata tempo fa, ma poi ho utilizzato MZTOOLS.
Sorry
Aran Banjo

Ho risolto com MZtools
A propo.....
A te funziona il controllo codice ??
A me dice che certe dichiarazione non vengono usate ma non č vero !!!
A te?
Grazie
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Nome corto (8.3) -> Nome lungo

Ciao a tutti, 
vorrei sapere com'è possibile ottenere il nome lungo di un file / percorso a partire dal nome corto
(formato DOS 8.3).
In pratica l'opposto di quello che ritorna la funzione GetShortPathName (ho provato GetFullPathName,
ma a quanto sembra non fa altro che concatenare un nome di percorso ad un nome di file... mah...)
CIao a tutti e grazie.
P.S.:
Passando alla funzione Dir un nome corto di file, viene restituito l'equivalente lungo, ma per
quanto riguarda il percorso non ho ancora trovato una soluzione.
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
---------------------------------------------------------------------------

 quanto riguarda il percorso non ho ancora trovato una soluzione.
mi hai incuriosito, e ho fatto al volo questa...
presuppone che il file si trovi in locale (cioè che strShortPath inizi con
C:\ oppure E:\), e che non sia nascosto o di sistema (cmq basta inserire i
flag appropriati come secondo parametro di Dir$())
Public Function NomeLungo(ByVal strShortPath As String) As String
    Dim strResult As String
    Dim BSPos As Integer
    BSPos = InStr(4, strShortPath, "\")
    strResult = Left$(strShortPath, 3)
    Do Until BSPos = 0
        strResult = strResult & Dir$(Left$(strShortPath, BSPos - 1),
vbDirectory) & "\"
        BSPos = InStr(BSPos + 1, strShortPath, "\")
    Loop
    NomeLungo = strResult & Dir$(strShortPath)
End Function
Ciao
Faber
P.S.: non è granchè testata...

    NomeLungo = strResult & Dir$(strShortPath)
con:
NomeLungo = strResult & Dir$(strShortPath, vbDirectory)
altrimenti, se strShortPath era un nome di dir e non di file, mi ritornava la dir padre.
Grazie 1024!


> Grazie 1024!
felice d'esserti stato d'aiuto   :)
Faber

quanto riguarda il percorso non ho ancora trovato una soluzione.
Puoi provare con la FindFirstFile(), ma non so se ritorna anche il percorso,
che comunque è lo stesso del file di partenza, per cui basta una "&" tra le
due stringhe.
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Zoom image

C'č qualcuno cosě cortese da darmi qualche dritta su come realizzare lo zoom
di un'immagine in una picture box (ho provato con la funzione StretchBlt ma
riesco solo ad ingrandire ... boh) ?
Grazie !!  :-)

 ha scritto nel messaggio
news:gDS98.59825$3J1.1...@news2.tin.it...


 riesco solo ad ingrandire ... boh) ?
Ritenta, sarai più fortunato :)
se riesci ad ingrandire devi riuscire anche a ridurre, il meccanismo è lo
stesso
per ingrandire prendi l'area del bitmap di origine e scrivi sulla picture di
destinazione in un'area più grande.
StretchBlt adatta l'origine alla nuova area
ps* ovviamente devi avere 2 bitmap, una fissa di origine, anche nascosta,
che manterrà sempre le dimensioni originali, e un'altra picturebox su cui
scrivi i diversi zoom
--
Fabio Guerrazzi
http://www.sourcecode4free.com/cgt
fab...@libero.it
fab...@si.tdnet.it
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Simulare Tab con Return

Volendo simulare l'effetto del tasto Tab alla pressione del tasto
Return ho scritto il seguente codice all'interno dell'evento KeyPress:
If KeyAscii = vbKeyReturn Then
    KeyAscii = 0
    SendKeys "{TAB}"
End If
il tutto funziona correttamente pero' se si ha il Caps Lock o il Bloc
Num attivi sulla tastiera si nota un lampeggiamento degli stessi led.
Volendo eliminare questo effetto ho provato ad utilizzare al posto
della SendKeys una SendMessage con il messaggio WM_CHAR il problema e'
che specificando il codice relativo al Tab (9) non ottengo nessun
effetto, mentre assegnando il codice 65 viene correttamente
visualizzato il carattere 'A'.
Un grazie a tutti coloro che vorranno aiutarmi.
Rimuovi #NoSpam# per rispondere
Please remove #NoSpam# to answer

 wrote in message
377a72e...@news.interbusiness.it...


Se non trovi di meglio, ecco come ho fatto io:
Private Sub Text1_KeyPress(KeyAscii As Integer)
    If KeyAscii = 13 Then
        Dim pippo As Control
        For Each pippo In Form1
            If pippo.TabIndex = Text1.TabIndex + 1 Then
                pippo.SetFocus
                Exit For
            End If
        Next pippo
    End If
End Sub
Ciao,
Moreno
#sirri#@
morenosoft.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
Home Page - 
http://www.geocities.com/SiliconValley/Bridge/1414/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema SQL

Ho N tabelle in un database voglio sapere il nome di quella che contiene il
maggior numero di record...
Grazie
Matteo..

 maggior numero di record...
 sp_tables ti da' tutte le tabelle di un DB con le caratteristiche, al
limite poi ci fai una query su ognuna con il count(*).
Ciao Reg
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 maggior numero di record...
Ci sono delle tabelle di sistema dove dentro trovi informazioni sulle....
tabelle che popolano il tuo DataBase.
Nomi, numero dei campi, nomi dei campi, occupazione, numero dei records o
righe (row) ecc. ecc. ecc.
Mi ricordo nomi tipo SYSTABLES o SYSCOLUMNS ma dipende dal DB.
Ciao
Ven.
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Ma VB da i numeri???

E' vero che sono le 2.00 però non ritengo di essermi ancora instupidito a
tal punto da non accorgermi che qualcosa non va..
Domande:
Se non faccio un movefirst che record mi becca di default?
Com'è possibile che (tale codice è annidato in un po' di loop) al secondo
passaggio sul movefirst mi ributti direttamente sulla sub che aveva chiamato
questa routine???
Ringrazio chiunque anche solo per un idea.... veramente non capisco che
possa essere...
StringaRicerca = "SELECT Vendita FROM Magazzino WHERE IDCategoria =" _
& CStr(IDCategoria) & " And IDComponente =" & CStr(IDComponente)
Set RecordsetSQL = DBClient.OpenRecordset(StringaRicerca)
RecordsetSQL.MoveFirst
TotalePreventivo = TotalePreventivo + CLng(RecordsetSQL!Vendita)
RecordsetSQL.Close

...

Dopo l'istruzione set sei per default( sempre che ci sia ) sul primo record.
Se fai un movefirst senza che sia presente alcun record viene generato un
errore. Probabilmente nella tua sub chiamante hai un ON Error .....,  cosa
che non c'è nella routine chiamata. Quando viene generato un errore vb
risale tutto lo stack per trovare la prima istruzione ON error... Una cosa
molto utile sarebbe quella di non utilizzare in fase di progettazione
(magari mai!) gli on error, in questo modo si vede subito dove stà l'errore.
Ciao Marco

(magari mai!) gli on error, in questo modo si vede subito dove stà
l'errore.
Bastardo Vb.....  non credevo.. pensavo li cercasse solo nella routine
corrente....
Grazie, non ci avrei minimamente pensato

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

Come svuoto un dbgrid dopo che l'ho popolato tramite un controllo data ??

 data ??
Set dbgrid.DataSource=Nothing

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema calcolo scorporo

In realtà il problema non è lo scorporo in sè, ma spero una mia
allucinazione.
In una sub ho messo all'inizio:
    TextImpLire.Text = Int(przLire@ / (1 + IVA / 100))
se ho
    IVA=20      (è un integer)
    przLire@=120
il risultato è 99 !!!!  (senza Int = 99.99999 !!!)
Poi ho provato così:
    Dim templire As Single, coeff As Single, scorporato As Single
    templire = CSng(przlire@)
    coeff = 1 + IVA * 0.01
    scorporato = templire / coeff
ma non cambia niente !!!
In realtà con altri valori mi ritorna il risultato corretto ma non con
quelli sopra citati.
Ditemi che ho sbagliato qualcosa .....
Grazie,
Lorenzo.

 il risultato è 99 !!!!  (senza Int = 99.99999 !!!)
[...]
Sorry, sul mio PC è 100!
PS: sicuro che przLire@ = 120? Potrebbe SEMBRARE 120...
Prova a calcolare (przLire@ - 120) e vedi cosa ti restituisce.
Ciao,
Carlo.


Grazie per l'interessamento.
ho fatto:
przlire@=val(textLire.txt)
ma ora stavo provando a usare delle variabili di passaggio  (come
nell'esempio del mio post precedente) di tipo Double anzichè Single e sembra
che funzioni.
Ciao.

 che funzioni.
Sě, in effetti io uso quasi esclusivamente Double per questo tipo di
calcoli.
La strada č quella buona...
Ciao,
Carlo.
Newsgroup: it.comp.lang.visual-basic
Titolo: Printer Properties

Dato l'oggetto Printer,
come posso da VB visualizzarne la pagina delle proprietą?
Grazie

 ha scritto nel messaggio
news:9nq03p$g5u$1...@fe1.cs.interbusiness.it...


 ha scritto nel messaggio
news:8W%n7.177355$TS4.1...@news2.tin.it...


 stampante dal menu Impostazioni/Stamapanti .
Ma questa č roba interna ai driver della stampante. Voglio dire le
commondialog di Vb ti presentano delle finestre messaggio impostando la
pagina di scheda su quella predefinita...non so se da Vb č possibile
modificarla in modo 
ad.es
. di andare alla scheda Proprietą...ma non credo.
Cmq fammi sapere xche č interessante per me.

come posso da VB visualizzarne la pagina delle proprietà?
Shell "rundll32 printui.dll,PrintUIEntry /p /n\\nome_macchina\nome_stampante"
hth, hal

 >come posso da VB visualizzarne la pagina delle proprietą?


 sta roba e anche di altro che riesce a lanciare rundll32?
c'č stato un post di SuperMarioBros ed una risposta di Hyperion
sull'argomento con decine di tips rundll-abili
--
Fibia "Sakamoto" FBI

 
prova con l'api PrinterProperties
-- 
Samuele Battarra
prova il mio newsreader:
http://digilander.iol.it/battarsa/programmi/news/
Newsgroup: it.comp.lang.visual-basic
Titolo: Errore Crystal Report da Vb 6

Ciao a tutti,
ho un problema con l'utilizzo di Visual Basic 6, Crystal Report 4.6 e
Access 97.
Il db è Access 97 e risiede su un server, mentre i client hanno installato
Access 2000.
La mia applicazione, al premere di un pulsante, apre un report di Crystal
passando una determinata formula.
Questo funziona perfettamente su un pc con Windows 2000 (testato anche sul
98).
Su un pc con Windows XP (non è detto che sia questo il problema) ricevo
questo errore:
"
error detected by database dll
"
CrystalReport1.ReportFileName = "c:\costi_dettaglio_totali_utenti.rpt"
CrystalReport1.SelectionFormula = "Q_Costi.Anno} = '2004'
CrystalReport1.Connect = "DSN=;UID=;PWD=test"
CrystalReport1.Password = "test"
CrystalReport1.Action = 1
Avete qualche idea, per favore?
Grazie 1000 a chiunque potrà aiutarmi...
Kate
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 
probabilmente devi installare dao 3.51.
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

 	maxx
ciaooo e grazie lo stesso!


 
mdac non contiene dao, ma ado!
Prova ad installare questi file (in fondo alla pagina):
http://imaginware.tripod.com/imaginware/Downloads.html


 Sossio
Ciao,
che cosa ci metto al posto di CRWDC in:
DBQ=<CRWDC>
Provo a reinstallare Dao, a fare questa modifica e ti dico...
Grazie 1000!


 	maxx
grazie, ora provo...
ciaoooo!


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Nuovo su qs NG - VB in generale

Ciao a tutti
mi piace molto qs NG. Oggi mi sono letto tutti i 338 mex che sono 
riuscito a scaricare. Sto qui da 6 ore... E domani passo in rassegna 
quel che mi rimane del SC :)
Più di un anno fa ho comprato vb6  pro ma poi sono partito per naja. 
Qualche programma coi db lo avevo fatto. Ora vorrei riprendere, ma sono 
un po' confuso. 
I miei obiettivi primari sono:
a) lavorare bene coi db sia in locale sia in rete
b) interfacciare il pc con periferiche non standard, magari 
autocostruite, attraverso la seriale ad esempio.
quest1.
Secondo voi vb è adatto a questi scopi oppure ha ragione chi mi dice che 
butterei via tempo e che dovrei partire subito con C, magari in ambiente 
Linux (che tra l'altro sto conoscendo giusto di questi tempi)?
quest2.
Come mi consigliate di procedere per perseguire tali obiettivi?
quest3.
Ho vb6 ed un manuale per vb5 (Visual basic5, Gery Cornell ed. McGraw-
Hill in italiano). Sul SC ho visto che parlate molto bene di Programmare 
Visual Basic, Francesco Balena e vorrei comprarlo e soppiantare quello 
per vb5 onde evitare di confondermi ancora di più. 
E' una scelta corretta? C'è qualche libro preferibile al Balena? 
[preferisco in it x questione di velocità]
grazie in anticipo
enjoy all
-- 
hironic
icq UIN 77065732

 E' una scelta corretta? C'è qualche libro preferibile al Balena?
Sui libri non sono un esperto. Senz'altro qualcun altro ti saprà consigliare
meglio di me. Comunque Balena è una garanzia.
Ciao
*Roby*
Newsgroup: it.comp.lang.visual-basic
Titolo: Anteprima Report Access

Dovrei poter stampare un report di Access e poter vedere la sua anteprima
di stampa.
cosě ho visto che lo stampa correttamente:
Set Appl = New
Access.Application 
Appl.OpenCurrentDatabase ("mio.mdb") 
Call
Appl.DoCmd.OpenReport("report1", acViewNormal, , "prodotti.Id= '138a' ")
inserendo al posto di acViewNormal ,acViewPreview dovrebbe visualizzare
l'anteprima invece non fa nulla (come se girasse a vuoto) senza errori.
Set Appl = New Access.Application 
Appl.OpenCurrentDatabase ("mio.mdb")
Call Appl.DoCmd.OpenReport("report1", acViewPreview, , "prodotti.Id= '138a'
") 
c'č un'altra soluzione per poter visualizzare l'anteprima di un
report precreato in access?
--------------------------------
Inviato via 
http://usenet.iol.it

un'altro metodo consiste nel creare una macro chiamata Autoexec dentro
l'MDB......
che apra il report in anteprima.....
in questo modo l'apertura non avviene da vb ma da access stesso......
ciao, e good coding!!!
--
Damiani Liborio Igor
idam...@hotmail.com
 - 
igor.d...@light.it
http://www.igordamiani.it
ICQ : 11847262

come faccio poi a lanciare la macro da VB6 ??
Grazie


anche a me servirebbe la risposta per un mio problema simile.
Il 12 Feb


 come faccio poi a lanciare la macro da VB6 ??
Non lanci la macro ma apri semplicemente l'mdb.
ciao
ugo

Newsgroup: it.comp.lang.visual-basic
Titolo: Progressbar che non si muove

Salve a tutti,
non frequento molto questo forum perň ho un problema che non riesco a
risolvere.
Ho fatto un'applicazione per la conversione di grossi files di testo.
Il procedimento dura circa 10 minuti e ho posizionato una barra di
avanzamento per vedere il progresso del procedimento.
Il fatto č che se faccio delle prove interrompendo l'esecuzione ad ogni
ciclo la barra funziona, ma quando eseguo l'applicazione normalmente la
barra rimane cosě com'č!
Qualcuno sa darmi qualche suggerimento?
Grazie
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 barra rimane così com'è!


 Qualcuno sa darmi qualche suggerimento?
Io ho usato il DoEvents e funziona, sinceramente non so se č "corretto"
a livello di programmazione (nel senso che ci sia qualcosa di piů
snello)
For I=0 to LunghezzaFile
	[operazioni]
	[incremento progress]
	DoEvents
Next I
-- 
Freccia@Bulldozer63 :D
Newsgroup: it.comp.lang.visual-basic
Titolo: VBA for Excell

Ciao a tutti,
Spero di non essere fuori luogo se mi permetto di rivolgervi una domanda
riguardo una istruzione di VBA for Excell.
All'interno di una generica MiaFunction, come è possibile ottenere come
risultato della funzione una matrice come ad es.  =Matr.Trasposta(A1:A20)?
Ciao e grazie
Alberto

 wrote in message 84ars5$kl9$1...@nslave1.tin.it...

Option Explicit
' Dato che, per esempio...
Sub UsaVettore()
  Dim k As Variant, i As Integer
  Let k = TornaVettore
  For i = LBound(k) To UBound(k)
    Call MsgBox("k(" & i & ") = " & k(i))
  Next
End Sub
Function TornaVettore() As Variant
  Dim a() As Integer, i As Integer
  ReDim a(4 To 11)
  For i = LBound(a) To UBound(a)
    Let a(i) = i
  Next
  Let TornaVettore = a
End Function
' ... allora puoi fare:
Function TuttiPerUno( _
  MioIntervallo As Range _
, MioDoppio As Double _
) As Variant
  Dim MioRisultato() As Variant _
    , r As Long _
    , c As Long
  With MioIntervallo
    ReDim MioRisultato( _
        1 To .Rows.Count _
      , 1 To .Columns.Count)
    For r = LBound(MioRisultato, 1) To UBound(MioRisultato, 1)
      For c = LBound(MioRisultato, 2) To UBound(MioRisultato, 2)
        Let MioRisultato(r, c) = .Cells(r, c) * MioDoppio
      Next
    Next
  End With
  Let TuttiPerUno = MioRisultato
End Function
... che ovviamente dovra' essere immessa nel foglio con CTRL+MAIUSC+INVIO.
Ciao.
Maurizio

Newsgroup: it.comp.lang.visual-basic
Titolo: Dove trovo lo SE dell' IBM ita

Se qualcuno già ha fatto qualche progetto che lo include, può cortesemente
indicarmi un sito dove scaricarlo e magari qualche esempio di come usarlo

indicarmi un sito dove scaricarlo e magari qualche esempio di come usarlo
se per SE intendi Speech Engine
CD n. 28 e n. 33 di Io Programmo IBM Via Voice ver 1.5 dovrebbe contenere
anche l' Speech Engine in italiano. Non ho provato, sui numeri di Io
programmo di dicembre gennaio e febbraio trovi una serie di articoli
sull'uso delle SAPI della Microsoft (che sono l'estensione delle API per la
sintesi e il riconoscimento vocale) , a tale proposito sono  usciti alcuni
messaggi su NG negli scorsi giorni. Le SAPI Microsoft  sono solo in inglese
ma, stando a quanto scritto negli articoli, possono dialogare anche con un
SE diverso che supporta l'italiano come quello dell'IBM.
Ciao stefano

 ha scritto nel messaggio
news:8bt23a$ob5$1...@pegasus.tiscalinet.it...


c' è qualche sito che tratta l' argomento
Siti non so, pero il software su cd raccoglie 4 exe per oltre 150 Mb anche
se trovi il sito quanto ci metti a scaricarlo ? ti conviene chiedere
direttamente a Io programmo di inviarti il numero arretrato  credo sulle
25000 spese i spedizione comprese, oppure posso copiarti i file su un cd, se
sei di Milano possiamo pure incontrarci.
Ciao Stefano
P.S. ho testato il SE con una prova per Text to Spech e l'accento inglese
(con il SE italiano) e' comunque pesante