mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Dichiarazione DLL in directory applicazione

Ciao a tutti,
    ho questo problema:
Io sviluppo in VB mentre un mio amico in Delphi.
Lui ha creato una DLL ed io la includo nel progetto con questa dichiarazione
Public Declare Sub ComunicazioneShow Lib
"d:\gms\gitd\StampaComunicazioni.dll" ()
Quando poi richiamo la funzione della DLL da una qualsiasi parte della mia
applicazione funziona.
Perň il mio problema č questo:
Vorrei che queste DLL stiano nella cartella dell'applicazione (non in system
o system32) quindi con una dichiarazione di questo tipo io pensavo che
funzionasse
Public Declare Sub ComunicazioneShow Lib "StampaComunicazioni.dll" ()
e lui prendesse il percorso dell'app. Invece no, mi dice "Impossibile
trovare la dll"
Come devo fare ?
Secondo questito: come faccio ad includere una DLL da progetto ->
riferimenti, cosě qualsiasi funzione o oggetto di quella DLL la richiamo
senza problemi, senza dover dichiarare ogni volta la fz. come sopra (vi
ricordo che il mio amico sviluppa in Delphi!)....
Ciao e grazie

La dll può stare dovunque , l'importante che venga registrata.
Ciao.

 ha scritto nel messaggio
news:ardko6$l7v$1...@newsreader.mailgate.org...


C:\Windows\System\Regsvr32 C:\App\nome.dll
--
-----------------------------------------
Il Pioniere.
**** Use your illusion ****
-----------------------------------------

 ricordo che il mio amico sviluppa in Delphi!)....
*Non* puoi.
O meglio: sei obbligato a farlo per le DLL ActiveveX, come quelle che crea
VB, ma non puoi con quelle standard.
Essendo una DLL Delphi direi che č sicuramente una DLL standard (anche se D.
puň crearne di ActiveX), quindi puoi solo usare le Declare.
P.S.: le domande dovrebbero avere il tag [?] nel subject.
Ciao
--
using System.Gtk.Forms = "
http://www.neodatatype.net/windowsforms/sgf.aspx
"
mathParser = "
http://www.neodatatype.net
"
sitoComune = "
http://www.it-lang-vb.net
"

 ha scritto nel messaggio
news:jOwC9.40051$Yw.18...@news2.tin.it...


 Thanks very much!
Risolto?
Cos'era?

Newsgroup: it.comp.lang.visual-basic
Titolo: Catalg list

C'è un modo per ottenere la lista dei "Catalog" (singoli database -
o come si chiamano - visto che la traduzione in italiano non l'ho mai
saputa) di un server sql?
Attenzione non mi riferisco al nome db server ... e non vorrei usare
le sql-dmo object messe a disposizione dallo stesso sql server.
Ho trovato con la netapi32.dll la possibilità di avere la lista dei server,
ma non dei singoli catalog ...
Grazie per le risposte o per gli indirizzamenti
Andrea Moro

le sql-dmo object messe a disposizione dallo stesso sql server.
Puoi usare ADOX con OpenSchema(adSchemaCatalog,...) oppure con il solo
ADO esegui la stored procedure sp_catalogs.
-- 
ciao, hal

 >C'è un modo per ottenere la lista dei "Catalog" (singoli database -


 quindi ado e compagni non vanno bene
dao e camerati si' ?
scusa, j. :)

quindi ado e compagni non vanno bene ...
E' la strada di piu' semplice impiego, imho, perche' non richiede
l'installazione di nient'altro che l'mdac e i nuovi sistemi operativi
ce l'hanno gia' di default.
-- 
ciao, hal

A me però serviva per scandagliare il db e dire dove ti
vuoi connettere?? master, default, xxx ecc. ecc.
Booo ... ci pensò e cogito un pò sopra poi mi farò venire
in mente qualcos'altro ...
Ciao e grazie
Andrea

:PPP
Ciao
Andrea

Newsgroup: it.comp.lang.visual-basic
Titolo: casualita'

Ciao a tutti
il mio problema e' questo,avendo 10 controlli label indicizzati chiamati con
il nome L(index)
e con la proprieta' visible impostata su false vorrei fare in modo che
casualmente ne vengano visualizzati solo 4
come posso fare? qualcuno puo' farmi un'esempio?
grazie ciao henry.

 ha scritto nel messaggio
news:9n5qbo$7mb$1...@lacerta.tiscalinet.it...


eh eh, dimenticavo MinVal è il valore inferiore dell'array...
scusa,
DaDe



E se esce piu' di un numero uguale?
Meglio usare un While e non un For.
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Disabling ODBC Cache ?

I am trying to test response times for ODBC connectivity. It seem like
the first time I access the file it caches a lot of it. After this I
don't get times that would reflect the first time reading. So I would
like to know if there is a way to clear the cache after reading from the
file??

...

It does not depend on the cache, but ob the rdbms'acces plane.
The first time you execute  the statement, rdbms has to parse the statement
and decide which is the best access way for your request.
Not the second time.
Newsgroup: it.comp.lang.visual-basic
Titolo: get con byte

Ciao a tutti,
ho un piccolo problemino.
Se apro un file in accesso binario, e se voglio leggerlo come stringa
non ho problemi, prima di usare get creo una stringa vuota per es:
[...]
MiaStringa = String(15," ")
Get #NumFile, 40, MiaStringa
[...]
Se voglio leggere 15 byte invece di 15 String (praticamente i valori
esadecimali) come devo fare?
Non ci riesco proprio.
Grazie mille.
JLW

 ha scritto nel messaggio
news:mfkj5tk6ro81iqh1g...@4ax.com...

nella maniera più semplice:
    Dim x(1 To 15) As Byte
    Open "C:\AUTOEXEC.BAT" For Binary As #1
    Get #1, , x
    Close #1
    Dim i As Integer
    For i = 1 To 15
        Debug.Print x(i), Chr$(x(i))
    Next
ciao


Grazie mille,
ma perň ho ancora un problema come faccio a scrivere tutti e 15 i
caratteri  un file text per esempio.
Con questo sistema mi scrive solamente il 15 numero decimale o
carattere , a seconda di cosa scelgo.
Grazie
JLW

 JLW
Ho ricavato il codice inverso rispetto a quello postato da hellboy (quindi
come scrivere su un file) tagliando quasi tutto quello scritto da lui e
modificando una parola di quanto restava.
La parola e' Get, l'ho cambiata con Put, ora prendi la guida e usala :)
Dai ad un uomo un pesce e mangera' per un giorno, dagli una canna da pesca e
la usera' per bastonarti...
Ciaotutti,
Alessandro

 ha scritto nel messaggio
news:jb1k5t4rubbdntq5h...@4ax.com...

allo stesso modo:
    Dim x(1 To 15) As Byte
    Open "C:\AUTOEXEC.BAT" For Binary As #1
    Get #1, , x
    Close #1
    Open "C:\AUTOEXEC.NEW" For Binary As #1
    Put #1, , x
    Close #1
ciao


wrote:
Scusate, mi sono espresso malissimo.
Il mio scopo è quello di aprire un file, leggere un numero tot di byte
in esadecimale ed visualizzarli, non in un file text come ho scritto
precedentemente ma in un text box.
Con il sistema form.print, questo mi funziona.
Es.:
Private Sub Command1_Click()
Dim x(1 To 4) As Byte
    Open "C:\AUTOEXEC.BAT" For Binary As #1
    Get #1, 5, x
    Close #1
    Dim i As Integer
    For i = 1 To 4
        Form1.Print x(i), Chr$(x(i)), Hex(x(i))
    Next
End Sub
Mi da come risultato, stampato in colonna sul form: 80 65 84 72  PATH
H50 H41 H54 H48
Ora vorrei che nella text.box mi appaia tutta la serie di numeri a
seconda di cosa voglio scegliere. Ma se per esempio scrivo:
[.....]
dim a
[.....]
a= Hex(x(i))
text1.txt =a
Come risultato mi da H48, cioè solo l'ultima cifra della serie,
insomma non riesco a creare un testo nella text box che contenga tutta
la serie di numeri.
Grazie mille
JLW

dim a as string, lung as integer
a= Hex(x(i))
lung = len(a)
a = right (a, lung -1)
text1.txt = text1.txt & a
Salve
            Dbg
xlustro ha scritto nel messaggio ...

Newsgroup: it.comp.lang.visual-basic
Titolo: ListView + selezione multipla

in una listview con possibilitą di selezione multipla esiste un metodo
veloce per avere un riferimento istantaneo agli item selezionati senza dove
ciclare in tutta la list?
grazie a tutti in anticipo
--
Ciao
Alfredo

l'unica cosa che mi viene in mente č di intercettare l'evento Click e
salvare in un array/collection l'index dell'elemento selezionato, cosě alla
fine quando puoi sapere quali sono quelli attivi, non fai piů alcun
controllo sulla ListView, ma guardi direttamente l'array che hai
riempito.....
non solo, facendo UBound(Array)+1, sai esattamente quanti elementi hai
attivato
ad ogni click, dovresti anche verificare se quell'elemento su cui hai
cliccato č stato abilitato o disabilitato
che ne dici, ti piace?
good coding!!!
-- 
Damiani Liborio Igor
ig...@igordamiani.it
 - 
soft...@igordamiani.it
 - 
idam...@hotmail.com
http://www.igordamiani.it
ICQ : 11847262

praticamente avevo già risolto in questo modo, mi serviva per le operazioni
di drag&drop,carico il vettore quando mi serve.
pensavo ci fosse una maniera più "elegante" di risolvere il problema, che
poi problema non è!
grazie cmq ;O)
Alfredo

Newsgroup: it.comp.lang.visual-basic
Titolo: Inserimento dinamico di una funzione in una query

Salve a tutti,
ho necessità di inserire dinamicamente il risultato di una funzione in una
query senza che mi salti fuori un'orrenda msgbox.
Riuscite ad aiutarmi?
Grazie

 query senza che mi salti fuori un'orrenda msgbox.
E perche` mai dovrebbe uscire una message box?
-- 
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: Lo slider di  media player

Ciao
Volevo implementare nella mia aplicazione
lo slider di Windows media player come questo
http://users.libero.it/chiales/slider.jpg
c'e' la possibilit� di fare riferimento a qualche routine
windows o ocx   per VB6 ?
grazie 

 windows o ocx   per VB6 ?
Io mi farei un controllo utente.
Prova a cercare su google "vb6 slider control"
Nicola

 Nicola
Grazie.... ma non � proprio possibile usare
'Quelli' ??
cio� gli stessi che usa Media player ? 

 cioï¿œ gli stessi che usa Media player ?
Presumo proprio di no.  Sia a livello tecnico (magari non sono degli ocx 
utilizzabili da VB6) sia a livello di copyright.
Nicola

Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto!Come traduco Open "com1: 9600,e,7,2,rs,cs,ds,cd"

Salve ho u n sorgente in basic(dos) che accede alla porta
seriale,vorrei rifare il programma in visual basic ma non ho ben
chiaro come posso tradurre la seguente riga
Open "com1: 9600,e,7,2,rs,cs,ds,cd" For Random As #1
ringrazio tutti coloro che vogliano aiutarmi

A mio avviso ti tocca usare il controllo MSCOM e gestire la seriale
attraverso quest'ultimo
Bye

attraverso quest'ultimo
ci ho pensato anche io , pero' :
 9600,e,7,2
posso configurarli ma "rs,cs,ds,cd" come li inposto nelle proprieta'
di mscom?

Sono rappresentati dalle relative proprietą del controllo!
MSComm1.RThreshold
MSComm1.DTREnable
MSComm1.CDHolding
Bye
Newsgroup: it.comp.lang.visual-basic
Titolo: can't load

Ciao, il mio professore mi ha detto di portare VB3 dal suo pc ad un altro
computer, perň non ha piů i dischetti di installazione.
Io ho copiato tutti i file della cartella, tutti i *.vbx ma quando lo faccio
partire mi dice: can't load custom control DLL (per esempio Anibuton.vbx).
Inoltre un avviso mi dice che non ho la licenza!!
C'č una soluzione? Ho dimenticato di prelevare qualche file?
Grazie ciao

"Bobic" <scatteri...@tiscalinetRIMUOVI.it> ha scritto nel messaggio
news:a38svb$tn6$1...@lacerta.tiscalinet.it...
[supercut!]
Non ti far sentire!!!
Ciao, Pascal ;)

 ha scritto nel messaggio
news:a39003$16kekd$1...@ID-98635.news.dfncis.de...


Newsgroup: it.comp.lang.visual-basic
Titolo: Formato numeri

Salve, sono alle prime armi con il VisualBasic e ho un paio di problemi
che non riesco a risolvere da solo:
Sto impostando un programma per la gestione di una cassa della ditta di
mia moglie, ora tentero' di elencarvi i problemi:
1)-Nel Form principale ho inserito un Textbox il quale contenuto e' il
valore di una cella di un foglio di Excel. Questa cella e formatata
'numeri' e con due decimali; pero' nel TextBox il numero viene sempre
mostrato con tre decimali, ho provato a dare come valore alla proprieta
'dataformat' del textbox lo stesso formato della cella (numero e due
decimali) ma niente da fare.....
2)- nello stesso Form ho un'altro Textbox che riceve l'input dall'utente
(un importo in cifre) il quale viene mandato ad un'altra cella del
foglio di Excel, e accade questo:
nel Textbox viene inserito una cifra con due decimali(es.:12,34) nella
cella sul foglio Excel viene visualizzata corretamente (12,34) pero'
sulla barra delle formule la cifra viene vista con numerosi decimali
(es.:12,33566777..)
Le domande sono dunque le seguenti: come fare per ricevere e mandare
cifre al foglio di Excel con solo due decimali???
Vi ringrazio per l'aiuto
Roberto.


Ciao ti consiglio di usare il comando format
' Formati definiti dall'utente.
Variabile= Format(1234.4, "##,##0.00") ' Restituisce "1.234,40".
Variabile= Format(124.9, "###0.00") ' Restituisce "124,90".
Variabile= Format(5, "0.00%") ' Restituisce "500,00%".
Ciao joe

 decimali) ma niente da fare.....
inserisci nell'evento change() del textbox:
text1.text=format(text1.text,"##,##0.00")
CIAO

Grazie per le risposte, siete stati di grande aiuto....
A risentirci.
Roberto
Newsgroup: it.comp.lang.visual-basic
Titolo: URGENTE: Immagine BMP

Qualcuno mi sa dire come si introduce una immagine BMP usando solo il codice
(magari utilizzando una .dll).
Grazie a tutti.
Max

 wrote in message
news:93906438...@flesh.goldnet.it...

LoadPicture( <filename.bmp> )

Ok funziona....ma io volevo l'immagine andasse a finire nella form con
coordinate precise....non in una nuova form.
Grazie
Max

Se ho capito bene potresti fare cosě:
Posiziona nel form un controllo "Image" (o "Picture box") alle coordinate
che desideri e poi da codice gestisci l'inserimento dell'immagine ad esempio
cosě:
----------------------
Image1.Picture = LoadPicture("C:\WINDOWS\Nuvole.bmp")
----------------------
Se mi sono sbagliato riformula meglio la domanda.
 __     __
<o>  <o>
      []
  \____/   ......(Ciao!)
Pasquale
mine...@libero.it

 ----------------------
Set Image1.Picture = LoadPicture("C:\WINDOWS\Nuvole.bmp")
--- :)

 --- :)
Non so a te Alexei!? Ma a me (con VB6) funziona benissimo anche senza Set!
Provare per credere!


Newsgroup: it.comp.lang.visual-basic
Titolo: Arriva il Seca

Sono previste per la fine del mese le consegne degli Astoncrypt, i primi
moduli Common Interface compatibili con il sistema d'accesso condizionato
Seca Mediaguard, utilizzato in Italia dai canali D+ e in Europa dalle pay tv
del gruppo Canal+, oltre che AB Sat. Il modulo, che satellite ha potuto
provare in anteprima, consente di accedere a tutti i canali dell'offerta D+
e, nella sua versione definitiva, dovrebbe permettere anche l'accesso a
Palco, il servizio di Pay per View, dell'operatore: per effettuare l'ordine
di un evento in Pay per View, in assenza di un modem nel ricevitore, sarà
possibile utilizzare il telefono, grazie al servizio dedicato recentemente
inaugurato da Tele+, ovvero l'Interactive Vocal Response. I moduli d'accesso
condizionato Common Interface potranno essere utilizzati in tutti i
ricevitori compatibili, come i Nokia Mediamaster 9600 e 9800, DigiQuest
P1000 e 5400, e tutti gli apparecchi dotati dell'apposita interfaccia CI.I
moduli Astocrypt saranno distribuiti in Italia da Cardmania Multimedia, tel.
06/9857981
steve...@tiscalinet.it

 wrote in message
8cep37$dar$7...@lacerta.tiscalinet.it...


E' spamming, questo? Spero di sě, č una vita che non segnalo piů qualcuno agli
abuse..
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Prelevare dati da una finestra attiva.

Ciao Ragazzi,
Vorrei fare un programmino in V.Basic che, in modo automatico controlli
l'indirizzo web che viene digitato in internet explorer.
In questa maniere si potrebbe fare un programma che 'filtri' i siti che
vengono scaricati in base ad una lista di parole chiavi che vengono
registrate in un database.
Potreste darmi qualche indicazione?
Grazie Sergio.

[Sergio Villarreal] ha scritto

io sostituirei il programma explorer con uno fatto in vb utilizzando il
controllo vebbrowser, in questo modo avresti la possibilità di tracciare tutto
il "traffico" effettuato tramite l'applicazione. Certo che in questo caso
dovresti rendere quanto meno "difficoltoso" l'utilizzo dell'ie vero e proprio.
Utilizzando direttamente IE, per un problema simile mi avevano consigliato dei
programmi, ti posto il link al thread:
http://makeashorterlink.com/?C29C33553
Per poi costruire programmi di tal fatta in vb... passo
Salutoni
Sergio

 ha scritto nel messaggio
news:b1o4dm$k7n$1...@grillo.cs.interbusiness.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] - Info Toobar

.....qualcuno sa indicarmi
una toobar valida, magari che comprenda
anche una statusbar, controlli di questo tipo,
naturalmente free....
grazie
ciao

scusate "toolbar"

 ciao
Fai un giro su 
www.vbaccelerator.com
Ciao
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Ciao
Grazie.ciao

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

Ciao a tutti,
            qualcuno sa dove trovo l'applicazione imagedit.exe che l'help di
VisualStudio6.0 mi dice essere presente sul cd e che servirebbe per creare
icone ? Io non riesco a trovarla da nessuna parte, tanto meno nel cd di
VisualStudio.
Grazie
Marzia

Vai su aggiunte, poi gestione aggiunte, prova a controllare lě!
Ciao!
--
http://web.tiscalinet.it/minorchio
Newsgroup: it.comp.lang.visual-basic
Titolo: copia su dischetti

Ho bisogno di copiare un file (già compresso) di dimensioni 
notevoli su più dischetti. Come posso implementare una procedura
in VB? Esiste già un ocx che risolve tale problema?
Grazie per l'aiuto. Walter.


  -----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
 
http://www.newsfeeds.com
       The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including  Dedicated  Binaries Servers ==-----

 > non so se esiste un OCX che faccia al caso tuo io ho risolto il problema


non so se esiste un OCX che faccia al caso tuo io ho risolto il problema
spezzando il file da codice:
lo apro in modo binario con open
leggo blocchi di byte dal file
( la dimensione dei blocchi - es 1000 byte - e' fissa tranne all'ultimo
blocco che deve arrivare fino alla fine del file se il file e' 2.023.300
Byte sono 2023 blocchi da 1000 e 1 da 300)
copio i blocchi in sequenza in un altro file anchesso aperto in binario
quando il file raggiunge la dimensione massima che desidero continuo su un
altro file ecc..
il ciclo e' abbastanza veloce pero ho riscontrato dei problemi se la copia
avviene direttamente su floppy ovvero:  se spezzo il file in tanti altri su
HD non mai avuto problemi
se il ciclo lo imposto per scrivere su floppy ho avuto degli errori di
scrittura che poi non consentono la ricomposizione del file
l'errore non avviene se i file vengono scritti su HD e successivamente
copiati su floppy
Avrei voluto mandare il sorgente al Sito Comune ma non ho trovato il tempo
di risolvere l'errore.
se ti interessa il sorgente posso mandartelo
Ciao Stefano

 85cnfd$muq$1...@lacerta.tiscalinet.it...



ho mandato al sito il programma escludendo pero' la parte che copia su
floppy
ora potete scegliere un file e il programma lo spezza in tanti altri da 1000
Kb
per default li mette nella dir c:\documenti con un nome fisso progressivo
il programma provvede anche  a ricostruire il file (il nome questa volta lo
date voi)
se volete cimentarvi nella copia su floppy fatemi sapere. Credo (ma non ho
avuto tempo di provare) che il problema dipenda dalla velocita' di scrittura
del floppy, infatti la routine e' abbastanza veloce perche spezza un file da
12 Mb in 4-5 secondi mentre su floppy i tempi diventano geologici
se qualcuno ha urgenza posso spedire il prg zippato
Ciao stefano

 ho mandato al sito il programma
grazie, appena ho un momento ci guardo volentieri.
ciao, andrea
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Stampante non predefinita e Excel

Salve a tutti!
Sono ormai due giorni che cerco di risolvere, senza alcun esito, il seguente
problema:
all'interno della mia applicazione VB scrivo alcuni dati su un foglio Excel
e poi ne stampo il contenuto.
Vorrei che la stampa avvenisse in una stampante DIVERSA da quella
predefinita del sistema. Per fare questo, nel form splash dell'applicazione
imposto con
Set Printer = (nome della stampante)
la stampante della mia applicazione, solo che quando invoco il metodo
PrintOut dell'oggetto di Excel, questo stampa sempre sulla stampante del
sistema.
Ho provato con  xls.PrintOut ActivePrinter:= Printer.DeviceName,
ma non ottengo nessun risultato utile. Sembra che l'argomento ActivePrinter
richeda una stringa che non riesco a trovare.
Se infatti stampo
Debug.Print Excel_App.ActivePrinter
ottengo come risultato
(Nome stampante) su Ne00:
Come posso fare per impostare correttamente la stampante sulla quale voglio
il foglio di Excel?
Vi ringrazio per la collaborazione e mi scuso per la lunghezza forse
eccessiva del messaggio.
Un saluto, Mirco


Hai provato a registrare una macro stampando su una stampante non di
default?
E' un idea che non posso provare ma dovrebbe generarti il codice con la
stringa esatta da utilizzare, dopo basterebbe un cut&Paste...
--
Ciao
   Sharkman
-----------------------------
Rimuovere NOSPAM per risposte


Ti ringrazio per il suggerimento, ma ho trovato la soluzione ed è ancora più
semplice:
(all'interno di VB)
wks.PrintOut ActivePrinter:=Printer.DeviceName & " su " & Printer.Port
Newsgroup: it.comp.lang.visual-basic
Titolo: Neofita su Database

Ciao a tutti, la mia situazione è la seguente:
Database "pippo" creato con access97
   tabella "clienti"
      Campo "id_cli"
      Campo "nomecli"
Per apire il database con VB6 e lavorarci sopra avevo pensato di:
Dim wrkJet As Workspace
Dim dbPippo As Database
Dim tbClienti As Recordset
Set wrkJet = CreateWorkspace("", "admin", "", dbUseJet)
Set dbPippo = wrkJet.OpenDatabase("pippo.mdb")
Set tbClienti = dbPippo.OpenRecordset("clienti")
Ma VB6 mi dice errore 13(Tipo non corrispondente) sulla riga "Set
tbClienti..."
Che cosa sbaglio ???
Grazie a tutti.

 ha scritto

se non e' una tabella indicizzata (default di openrecordset), prova con
Set tbClienti = dbPippo.OpenRecordset("clienti", dbopendynaset)
f1 su "dbopendynaset" per opzioni.
ciao, a.

 ha scritto nel messaggio
news:9gsuce$aqu78$1...@ID-51318.news.dfncis.de...





 ha scritto nel messaggio



Certo, anche se, oggi come oggi, la definirei "censurabile"...
Perchè scrivere ora un programma nuovo con tecnologie obsolete?
ciao
ugo

 Perchè scrivere ora un programma nuovo con tecnologie obsolete?
gent.mo sig. mangini
dobbiamo confessarle che non abbiamo mai subito la fascinazione
dell'estetica del nuovo. troppo decadente, senza contare lo stress per
la pigrizia.
ioho, _se_ (nb la sottolineatura) un prg dos e' piu' che sufficiente, e
crea zero o cmq meno casini di altre cose, vada per il prg dos.
se un prg e' monoutente, su pc locale, con zero o minime probabilita' di
essere scalato a crescere (caratteristiche che ancora paiono ritrovarsi
in larga parte delle basi di dati su _p_c: provi a considerare la
percentuale di db degli mp3 napsterati per i quali si sono viste
richieste sul ng), troviamo abbastanza inutile pensare a ado e
quant'altro, e ci sembra invece che un sano dao indicizzato ( con largo,
abbondante, espensivo uso di seek :) resti la soluzione piu' efficace.
tanto piu' se ado diverra adonet, e il vc vcnet, mentre le nostre
giornate diverranno sempre piu' corte...
che questa politica poi serva dal pdv della carriera al programmatore
che vi ricorre, affaracci del programmatore. nietzsche e' morto, il
mondo duro, l'economy new (*).
il nostro motto quello rimane:
quello che non c'e' non si rompe.
la salutiamo cordialmente,
henry ford
(*) e oggi sabato, e non ne possiamo pew.
FERIE !!


:-)
ciao
ugo

Newsgroup: it.comp.lang.visual-basic
Titolo: Codici a barre

Sapete dove posso trovare un ocx per la stampa dei codici a barre ?
Grazie
Fabio

...


prova

Newsgroup: it.comp.lang.visual-basic
Titolo: PROVACI!! FUNZIONA DAVVERO!!!

cifra di 64.700.000.000!!!

classica " Catena di S.Antonio" ce ne sono a decine.
Ragioniamo per assurdo:
Tutti rispondono, tutti inviano le 2000£ e quindi TUTTI dovrebbero in breve
ricevere una somma con talmente tanti zeri che nemmeno il mio Pentium riesce
a conteggiare.
E tutto questo senza aumentare il numero di banconote da 1000 e 2000 lire in
circolazione, il che significa che tutti hanno mediamente lo stesso numero
di banconote di prima...
La cosa non quadra molto!
Newsgroup: it.comp.lang.visual-basic
Titolo: files OCX

Scusate la domanda ingenua, e' possibile editare gli OCX per modificarne le
caratteristiche, come ad esempio la forma dei pulsanti ecc.
Grazie a chi rispondera'

 caratteristiche, come ad esempio la forma dei pulsanti ecc.
Senza il sorgente dell'OCX, no.
Un OCX può essere solo usato, per tutte le proprietà e metodi di cui si ha,
da progetto, la disponibilità.

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

Ciao a tutti, vorrei porvi una domanda apparentemente banale...
nei db prevedo un campo "e-mail"  e li ci sono gli indirizzi dei clienti.
Bene ora che comando uso per aprire Outlook Exp. in modo che mi appaia gią
il nuovo messaggio in cui il riferimento TO: ci sia il mio campo????
Grazie 1000!

 ha scritto nel messaggio
news:9cmq0l$2t0$1...@serv1.albacom.net...


 ha scritto nel messaggio
news:L9CH6.17979$0t6.6...@news.infostrada.it...

già


Newsgroup: it.comp.lang.visual-basic
Titolo: Lettura id chiamante

Ciao a tutti, scusate se sono leggermente OT, ma comunque lo devo fare 
in 
vb.net
.
Avete esperienze in merito all'interfacciamento alla linea telefonica 
per leggere il numero del chiamante?
Ho provato con un modem 56k, apro la seriale e durante la chiamata mi 
appare RING ma poi nulla. Eppure il servizio di vedere il numero è 
attivo poichè sul display del cordless lo vedo?
Avete soluzioni in merito?
La cosa mi serve per interfacciare al gestionale la chiamata in corso e 
aprire la scheda cliente.
ciao e buon Pasqua a tutti.

aprire la scheda cliente.
 
Devi innanzitutto capire se il tuo modem lo permette, leggi le FAQ qui, è un po'
datato ma i modem analogici sono una specie in via di estinzione.
 
http://www.ainslie.org.uk/callerid/cli_faq.htm
 
 
poi provi a invocare le TAPI.
 
--
ciao
  Stefano
Newsgroup: it.comp.lang.visual-basic
Titolo: Grande problema - HELP

Un saluto al NG.
Scusate ma ho un problemino.
Ho una tabella (non creata da me) con i seguenti campi: Anno, Codice
Fiscale, Nome, Cognome, Mail.
La chiave è costituita dai campi Anno e Codice Fiscale insieme.
Provo a darVi un idea della tabella:
1999  CODICE FISCALE1  NOME1 COGNOME1 
ma...@tin.it
2000  CODICE FISCALE1  NOME1 COGNOME1 
ma...@tin.it
2001  CODICE FISCALE1  NOME1 COGNOME1 
ma...@tin.it
1999  CODICE FISCALE2  NOME2 COGNOME2 
ma...@tin.it
2000  CODICE FISCALE2  NOME2 COGNOME2 
ma...@tin.it
1999  CODICE FISCALE3  NOME3 COGNOME3 
ma...@tin.it
2000  CODICE FISCALE3  NOME3 COGNOME3 
ma...@tin.it
2001  CODICE FISCALE3  NOME3 COGNOME3 
ma...@tin.it
...ecc
A questo punto avrei bisogno di mandare ad ogni indirizzo mail il contenuto
delle celle a sinistra dell'indirizzo stesso.
Non sarebbe un problema se ogni volta che leggo un indirizzo mail, invio la
mail (una mail per riga).
Il mio problema è che a 
ma...@tin.it
 devo mandare una mail sola contenente
quante righe tante ve ne sono nelle celle a sinistra dell'indirizzo
ma...@tin.it
 e non 5 mail (una per riga).
Il numero delle righe da inviare cambia ad ogni indirizzo.
Cosa potrei fare?
Scusate se mi sono spiegato male...
Grazie 1000
Carlo

 ha scritto

1. ordina la tabella per indirizzi email poi fai un ciclo tipo
' sei sul primo rec
omail=email
while not eof
    while email = omail
        aggiungi riga a una var stringa
        movenext
    loop
    spedisci stringa a omail
    omail=email
loop
controlla i loop e le variabili, sono andata molto difretta
2. la stessa cosa la puoi ottenere con query annidate. il concetto e' sempre
quello. es (non guardare i nomi, li ho cambiati: guarda il nucleo):
    Dim s As String, dGiorno As Date, cli As Integer
    With rs2
        .MoveFirst
        Do While Not .EOF
            dGiorno = !giorno
            s = "select count(*) from vend where data=#" _
                & Month(dGiorno) & "/" & Day(dGiorno) & "/" & Year(dGiorno)
& "#"
            Set rs1 = db.OpenRecordset(s, dbOpenDynaset)
            clienti = rs1.Fields(0)
            .Edit
            !clienti= cli
            .Update
            .MoveNext
            DoEvents
        Loop
    End With
ultima cosa: controlla anche la lunghezza della stringa risultante. non so
se lanciando mailto puoi mettere dopo ?text una lunghezza infinita.
ciao, j.qry
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6+mdb+DAO]sostituzione codici

Salve a tutti,
scusate per l'insulsa domanda ma, mi sono aggrovigliato tentando di
fare la seguente operazione.
Ho due mdb (db1,db2) e vorrei sostituire i i dati da un mdb
all'altro,mi spiego meglio.
Sul db1,oltre ad altri campi ho un capo CODICE, sul secondo db2, ho
sempre lo stesso campo CODICE + il campo CODICE_NEW.
Bene a questo punto vorrei sostituire i codici contenuti nel campo
CODICE_NEW del db2 nel campo CODICE del db1 (il contenuto dei campi
CODICE è identico).
Mi potete aiutare ?
Grazie mille
R.Zanni

 Mi potete aiutare ?
Se access supporta tabelle esterne con una query di aggiornamento, una cosa
del genere:
UPDATE TAB2 SET TAB1.CODICE_NEW = (SELECT TAB2.CODICE_NEW WHERE
TAB1.CODICE=TAB2.CODICE)
Non è una sintassi funzionante credo, ma è un esempio.
Oppure con due recordset, ma sarà lenta


Infatti. Una sintassi funzionante per JET è invece
UPDATE Tabella1
INNER JOIN [DB2.MDB].Tabella2
ON Tabella1.Codice = Tabella2.Codice
SET Tabella1.Codice = Tabella2.Codice_New
Questa query SQL va eseguita sul primo DB.
  Set db = OpenDatabase("DB1.MDB")
  sQuery = "UPDATE Tabella1 INNER JOIN etc. etc. ..."
  db.Execute sQuery
Probabilmente i nomi dei DB vanno indicati col percorso completo.
Bye
Raf 

Grazie,proverò
Saluti

Newsgroup: it.comp.lang.visual-basic
Titolo: Non posso piu' posizionare i form in VB6

Non posso piu' posizionare i form in VB6 usando l'apposita finestrina,
secondo voi perche' ?
Domanda numero 2 con control-g riesco a far comparire in debug
l'immediate window ma non la vedo nel menu, come mai ?
Microsoft misteri ..
--------------------------------------------------------
Paolo Hölzl
Metis Informatica s.a.s technical manager (Ferrara)
----------------------------------------------------------
ATTENTION!, antispam 
For reply, substitute xxxx.xxxxxxx.xx with 
mail.asianet.it

Microsoft misteri ..
Non ti invidio proprio... secondo me sono sintomi di un'inizio di "cancro"
del tuo Win.
Una bella formattazione prima di raggiungere il disastro completo?
O forse basta reinstallare VB6 (disinstallandolo prima)?

 O forse basta reinstallare VB6 (disinstallandolo prima)?
Da quando, alla Microsoft, permettono di disinstallare i loro software?
Newsgroup: it.comp.lang.visual-basic
Titolo: Net Use

Dal mio programma creo una collegamento su un drive remoto e.s. Z:  dove 
risiede un database access , poiche la creazione del collegamento non è 
immediato l'applicazione va in errore al primo avvio mentre l'esecuzioni 
successive è tutto Ok come posso gestire questo tipo di errore ???

Bikkiu ha spiegato il 10/05/2006 :

1) Se la connessione non richiede una password al momento, usare una 
mappatura di rete è un errore. Si può usare 
\\server\condivisione\db.mdb.
2) Che ci possa essere un errore di accesso al db è del tutto normale, 
che sia per questa storia di Z: o meno, quindi il sw deve gestire 
l'errore e ritentare o prendere altre contromisure, e sicuramente non 
andare in errore.
3) Se proprio vuoi, puoi eseguire il Net Use in modo sincrono, ossia 
aspettare il completamento del Net Use prima di tentare l'apertura del 
db
4) Per eseguire le mappature di rete puoi usare anche l'object model di 
Windows Scripting Host, senza fare chiamate alla shell.
Ciao
Alberto
-- 
A questo punto hanno trovato un muro,
un muro duro, molto molto duro,
che siamo noi.

 ha scritto nel messaggio 
news:44618065$0$29722$4faf...@reader2.news.tin.it...


 Anche questo è interessante puoi darmi qualche info in piu ??
Ho citato la classe proprio perchè tu potessi cercartela in autonomia.


 sincrona. Ma non ci hai detto come fai la chiamata, quindi...
Private Sub Form_Load()
'Disco Remoto
Dim NetFolder
NetFolder = Shell("net use z: \\192.168.96.22\d\Server\fault 
/u:Administrator pimpa", 0)
end sub
Per ora temporizzo cicli di 500 Msec e verifico l'esistenza della 
cartella d:\server.

 end sub
Senti, 4 giorni fa ti ho detto di fare la chiamata in modo sincrono.
Adesso, in 4 giorni, non mi dire che non hai mai cercato su google 
"SHELL SINCRONA" (SHELL, perchè usi tale chiamata, e non l'avevi 
indicato anche se era presumibile, e SINCRONA perchè è l'unica parola 
'di sostanza' che ti avevo detto).
L'ho fatto io per te, proprio adesso.
18 risultati, tutti e 18 con il codice che ti serve.


Newsgroup: it.comp.lang.visual-basic
Titolo: Report su VB6

Vorrei passare a VB6 (me lo consigliate?), ma vorrei prima saper alcune
cose:
1) è possibile creare e stampare i report di Access senza usare CR?
2) a che Service Pack è arrivato?
Ciao
--
Andrea
anfa...@tin.it

 wrote in message
news:7mhnup$gm8$1...@fe2.cs.interbusiness.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: HELP !!! - Problemi con il DataEnvironment del VB6

Sto sviluppando un software in VB6 e il report funziona soltanto la
prima volta. In pratica non effettua il refresh dei dati presente in
un archivio tampone che viene inizializzato prima di effettuare il
comando "Nomereport.show".
Qual'è se esiste il comando che effettua il refresh e come si può
risolvere questo problema ?
Grazie anticipatamente a chiunque possa auitarmi .

risolvere questo problema ?
Devi prima chiudere il Recordset associato, ti devi pero' fare una
funzioncina per verificare se e' aperto o chiuso, in quanto il Data
Environment ha, tra i tanti, anche il difetto di mollarti il recordset
aperto in determinate condizioni.
--------------------------------------------------------
Paolo Hölzl
Metis Informatica s.a.s technical manager (Ferrara)
----------------------------------------------------------
ATTENTION!, antispam 
For reply, substitute xxx.xx with 
tin.it

Purtroppo ho anche io lo stesso problema, solo che non riesco a
chiudere il recordset perchè mi dice che non è aperto, mentre se tento
di aprirlo mi dice che è già aperto; in pratica ho rinunciato e ho
comprato Crystal Report 7. Sarei comunque curioso di sapere se è
possibile utilizzare il DataReport. 


Newsgroup: it.comp.lang.visual-basic
Titolo: Compattazione DB

Qualcuno sa indicarmi quale sia la procedura più indicata per compattare un
database Access da un applicativo che normalmente utilizza questo database.
Tenete conto che vi sono altri applicativi che accedono a tale database.
Ho provato con l'struzione "Compactdatabase", ma questa richiede che non vi
sia
nessuna connessione attiva al DB per poter funzionare.
Greazie dell'attenzione
 Piero

nessuna connessione attiva al DB per poter funzionare.
E' giusto, dal momento che per compattare il db, vado ad eliminare i segnaposti dei record eliminati, ma se in quel
momento sto aggiungendo, eliminando o modificando record.....
Quindi il metodo da seguire è il seguente (esempio tratto da MS VB Site, di prossima apertura... ;-)) )
Dim dbase As Database
Set dbase = OpenDatabase("MioDB.Mdb")
...
dbase.Close
DBEngine.CompactDatabase "MioDB.Mdb", "DBTemp.Mdb"
Kill "MioDB.Mdb"
Name "DBTemp.Mdb", "MioDB.Mdb"
Set dbase = OpenDatabase("MioDB.Mdb")
Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)
---------------------------------------------------------------------------
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: IIS Application

Ciao a tutti!!
Ho bisogno di informazioni pratiche e concrete su come sviluppare
applicazioni IIS.
Qualcuno puň aiutarmi?
Grazie + ciao

 ha scritto nel messaggio
news:SgxI6.8812$UW4.7...@news.infostrada.it...


 wrote in message
news:jlNJ6.1078$B87....@news.infostrada.it...


>...Non mi aiuta nessuno!!!!
ehm, penso che dipenda dal fatto che la risposta alla tua domanda occuperebbe un libro !
a proposito, perche non procurarsene uno ?
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: INET

Salve a tutti!!
E' possibile conoscere se qualcuno è già connesso in FTP ad una directory
remota?
Ne ho bisogno per un semplice motivo: alcuni file che ho piazzato sulla mia
home directory devono essere modificati da più utenti, ma non debbono
poterlo fare contemporaneamente. Se uno si connette (ho utilizzato INET per
la connessione) il programma deve essere in grado di capire se qualcuno è
connesso: se sì appare una msgbox che invita a riprovare in un secondo
momento.
Per il momento ho risolto il problema creando un file busy.txt nella home
directory appena ci si connette e cancellandolo appena ci si disconnette: il
problema sorge se la connessione cade prima che il programma esca e cancelli
il file busy.txt: a quesrto punto bisogna intervenire manualmente e
cancellare il file altrimenti nessuno si connetterà più :((
Grazie per l'aiuto, Andrea.

 wrote in message
news:8pht9v$c6r$1...@fe1.cs.interbusiness.it...


 Alessandro
Ciao, Andrea

 wrote in message
news:8pkl2t$b09$1...@fe2.cs.interbusiness.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Convert HEX

Salve devo decifrare tale stringa ma non so da dove iniziare:
"Pass"=hex:88,30,c9,35,8c,34,fa,01
Grazie
-- 
##########################
# Yahoo Messenger: ShineMiku
# Ti aspetto per chiacchierare su
# Programmazione, Tecnologie
# Collaborazioni di Lavoro
##########################

Tiri fuori 88 con funzione mid, poi
Hexa=val ("&h"+str) dove str è 88
"Michelangelo" <1...@1.chèvuoi> ha scritto nel messaggio
news:chLyb.33828$AX1.1...@news1.tin.it...


 Grazie
Ti conviene Copiare tutto quello che segue i due punti in una 
sottostringa S.
Dopodichè affidati alla funzione Split.
Quando hai tutti i valori in un vettore, creati una funzione che 
converta un numero esadecimale in binario (che io in genere chiamo 
Hex2Dec) e iterando il vettore esadecimale il gioco è fatto.
-- 
Nella vita una sola cosa è certa: se la storia ci ha insegnato qualcosa, 
è che si può uccidere chiunque. (Micheal Corleone)
Posted from X-Privat Free NNTP server - 
www.x-privat.org

Newsgroup: it.comp.lang.visual-basic
Titolo: COM'è CHE SI TOGLIE L'.........??????

Nelle proprieta del progetto nella finestra dei componenti non posso
modificare le opzioni perchè risultano essere ombreggiate
..................come posso fare per poterle modificare in base alle mie
esigenze? ..........ringrazio tutti coloro che mi aiutano a risolvere i
problemi..............

sono ombreggiate perche' la calura era forte!
--
ciao
SaL
Alfonso ha scritto nel messaggio ...

Newsgroup: it.comp.lang.visual-basic
Titolo: Si può disattivare il Viaual Studio?

Prima faceva i capricci con IE (errore di debug eccc....) adesso anche con
FlashGet (tipo GetRight)....ma che palle....
--
Iscriviti alla Mailing List "Programmazione Web"
inviando una e-mail vuota a:
Programmazion...@it.egroups.com

Hal1961 ti avevo risposto in maniera pertinente se nno sbaglio...
Dal menů di Internet Explorer:
Strumenti ->Opzioni internet ->Avanzate
Assicurati che sia abilitato: "Disattiva debug script"
            Ciao
                    Allanon

 ha scritto nel messaggio
news:9g513v$6hudu$1...@ID-67444.news.dfncis.de...

Quello l'ho fatto, con IE non me lo fa piů! :-)
E' con un altro programma che lo fa, un programma che si chiama FlashGet
(simile al Getright)!
Pare che era il Surface (un programma che non ricordo come si chima sempre
del VS6) che non so neanche a cosa serve...se non sbaglio per controllare
alcuni tipi di DB!

Newsgroup: it.comp.lang.visual-basic
Titolo: HELP!!!!!!!!!!!!!!!!!

Chi ci capisce qualcosa di COMUNICAZIONE SERIALE (VIA MODEM) è
gentilmente pregato di aiutarmi !!!!!
Ecco i quesiti:
a) Devo inviare un fax da un prg. VB4 32 bit, la prima idea è stata di
configurare Microsoft Fax e quindi di utilizzare il Fax come una
stampante, ma..... brutta notizia deve essere fatto tutto in
automatico(niente richiesta di num. di telefono), come fare?
b) Devo inviare un messaggio vocale sempre tramite modem, come devo fare
???????
c)  Come fare per utilizzare i driver fax installati nel sistema, ovvero
se utilizzo il controllo seriale di V.B. devo inviare direttamente i
comandi AT al modem, giusto?
Ed allora a cosa servono i driver del modem ?????????

 Ed allora a cosa servono i driver del modem ?????????
No, devi utilizzare i driver del fax come se fossero una stampante.

Newsgroup: it.comp.lang.visual-basic
Titolo: Documentazione VBScript ?

Dove posso reperire ulteriori informazioni su VBScript, oltre a quella
presente sul sito comune ?
Grazie mille !!

 presente sul sito comune ?
quello che ho trovato, nei miei vblinks. cerca "vbs".
ciao, a.
--
andrea dot palazzi at tin dot it
free vb/sw: 
http://www.comune.modena.it/cittadini/apal/html/
Newsgroup: it.comp.lang.visual-basic
Titolo: [RegExp] Parola Successiva

Usando le regexp come posso leggere la parola dopo una frase?
Es:
Hai totalizzato punti: $
In questo caso dovrei leggere cosa c'è scritto dove c'è $

 ha scritto nel
messaggio news:41d2...@x-privat.org...

Non so cosa siano le regxp
Prova cosi manipolando la stringa
Sub LeggiPartedelTestoFinale()
Dim Testointero as string
Dim ricerca as string
Testointero = "hai totalizzato punti: 100"
ricerca =   Trim(Right(Testointero,Len(Testointero) - InStr(1, Testointero,
":")))
msgbox ricerca
End sub
se lo devi trattare come un numero assicurati dopo aver definito cos'è
ricerca che
isnumeric(ricerca) = true

il problema di questo codice è che mi viene a prendere anche tutto quello
che c'è dopo
se tipo ho:
hai totalizzato punti: 100
complimenti hai vinto.
Mi prende anche complimenti hai vinto, come risolvo?

 ha scritto nel 
messaggio news:41d2...@x-privat.org...

Realizzato in 
VB.NET
, ma la sostanza non cambia
 Dim st As String = "hai totalizzato punti: 100 complimenti hai vinto."
 Dim a() As String = st.Split(" ") 'Array dove il separatore è lo spazio
 Dim punti As String = a(3)
Ave
giuseppeD
---
CCR 

 In questo caso dovrei leggere cosa c'è scritto dove c'è $
La stringa di ricerca dovrebbe essere così:
[:*?\d]
Comunque faresti bene a vederti il tutorial:
http://search.cpan.org/~nwclark/perl-5.8.6/pod/perlretut.pod
Buono studio!
Ciao,
Andrea

Newsgroup: it.comp.lang.visual-basic
Titolo: ! ListView

Esiste un modo per cui avendo una ListView con la proprietą multiselect =
true e degli elementi selezionati (run-time) imangano evidenziate anche
quando la ListView perde il focus ?
Grazie dell'aiuto...

...

Hai provato con la proprieta'  HideSelection=False?
Ciao
Paolo Cioeta
Newsgroup: it.comp.lang.visual-basic
Titolo: scrollbar e picturebox

Ho un problema che da giorni mi assilla :
Come faccio ad applicare le barre di scorrimento ad una picturebeox
?
Il problema č che dopo aver caricato nella picturebox una immagine
appena scansionata, se l'immagine (la picture) č piů grande della
picturebox, devo poterla scorrere.
Oppure si potrebbe fare in modo di adattare l'immagine alla
picturebox ?
Vi pregodatemi dei suggerimenti, non sono in grado di procedere.

Vi pregodatemi dei suggerimenti, non sono in grado di procedere.
L'idea di fondo è questa, usi 1 picture box ed una image: la prima (che
chiameremo
pctCont) fa da contenitore per quella in cui andrà caricata l'immagine (per
questa che chiamiamo imgMy imposti la proprietà autosize=true, top=0,
left=0). Dopo aver caricato l'immagine controlli se
imgMy.width>=pctCont.width. Se la condizione è verificata renderai visibile
una hscroll1 (precedentemente collocata sotto alla pctCont) il cui range dei
valori dovrà andare da un minimo di 0 a (imgMy.width-pctCont.width) ,
attenzione: in valore della hscroll1 conviene esprimerlo in %, in questo
modo eviti eventuali overflow. Nell'evento change di Hscroll1 farai:
imgMy.Left=-Hscroll1.value. In sintesi questo è tutto. La cosa diventa
ancor più "carina" gestendo il resize della form ed aggiungendo la funzione
"zoom".
Ciao Marco

appena scansionata, se l'immagine (la picture) č piů grande della

Newsgroup: it.comp.lang.visual-basic
Titolo: windows media player

Ciao, due domande:
1 Come faccio a mettere gli apici negli apici...
 esempio voglio stampare con un msgbox La stringa
msgbox "ti dico "CIAO""
gli apici come li metto??
2 volgio far partire wmplayer con un file specifico, da esegui faccio
wmplayer "c:\file.mpeg" e me lo apre, col comando shell come faccio??
grazie gick

 wmplayer "c:\file.mpeg" e me lo apre, col comando shell come faccio??
Lancia direttamente il file Mpeg con una ShellExecute, in modo
che venga lanciata l'applicazione predefinita. Altre info guglando
per ShellExecute in questo NG :-)
Bye, G.

 wmplayer "c:\file.mpeg" e me lo apre, col comando shell come faccio??
Dovresti lanciare l'eseguibile del wmplayer e passargli come parametro il
file da aprire completo di percorso.
Se ad esempio il tuo wmplayer si trova in "C:\Programmi\Lettore
multimediale\mplayer2.exe" e il tuo file da leggere è appunto "c:\file.mpeg"
devi fare una cosa come questa:
shell("C:\Programmi\Lettore multimediale\mplayer2.exe c:\file.mpeg")
Ho paura però che possa succedere qualche pasticcio con i nomi di file che
comprendono spazi. Inoltre questo metodo non è assolutamente portabile,
perché se passi il programma a qualcuno che ha il wmplayer in qualche altra
cartella non parte più.
Di sicuro esiste qualche metodo migliore per sapere la posizione del
wmplayer, però non ne conosco. Spero comunque di averti aiutato almeno un
pochino.

 pochino.
io se faccio da start "wmplayer" senza nessun percorso me lo apre.... quindi
non dovrebbe essere un problema!! beh cerchero' shell execute

BEH, vi ringrazio lo stesso ma ho risolto in una maniera piů drastica... ho
messo l'OCX Windows Media Player.... :)))

Ma quindi in WinXP manca solo il programma Start.exe, perché se faccio shell
"C:\windows\explorer.exe" me lo apre senza problemi ma se faccio ad esempio:
shell "Start mailto:
gi...@gick.cjb.net
" che sun Win98 mi funzionava, su XPO
non funge, potrei risolvere con:
shell app.path & "\" Start.exe mailto:
gi...@gick.cjb.net
"
copiando da Win98 Il file start.exe nella direcotory in cui metto il mio
programma..? che ne pensate?


a proposito c'č qualcuno che ha win98 e sarebbe cosě gentile da inviarmelo
per e-mail?

 inviarmelo per e-mail?
Win98 sono diverse centinaia di mega. Appena mi installano l'ADSL potrei
mandartene un tot al giorno, facciamo 3-4 mega. Se svuotiamo le caselle
regolarmente in due o tre mesi possiamo farcela ;)
--
Ciao, Silv:o)

non intendevo tutto win98, intendevo solo il file START.EXE non dovrebbe
pesare piu' di tanto... fammi sapere. ciao grazie

 messo l'OCX Windows Media Player.... :)))
Io il WM-player l'ho disinstallato perchè mi mandava in crash win2000, e
anche tutti i programmi che usano l'ocx del WMPlayer fanno lo stesso.
Attualmente ho solo il QuickTime che funziona egreggiamente.
Ciao

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

E' possibile velocizzare la ricerca su una tabella aperta tramite
datacontrol. Avrei voluto usare il metodo seek ma... come apro l'indice
specifico? Non c'è un trucco?
Grazie.

...
