mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Cambiare data e ora a un file

C'e' un modo, un comando, un api o qualsiasi altra procedura  per
cambiare la data e l'ora di un file gia' esistente?
Ciao

cambiare la data e l'ora di un file gia' esistente?
	Ciao,
	penso che dovresti provare con queste Api (solo per win32):
- Public Declare Function SetFileTime& Lib "kernel32" (ByVal hFile As
Long, lpCreationTime As FILETIME, lpLastAccessTime As FILETIME,
lpLastWriteTime As FILETIME)
- Public Declare Function SystemTimeToFileTime& Lib "kernel32"
(lpSystemTime As SYSTEMTIME, lpFileTime As FILETIME)
- Public Declare Function CreateFile& Lib "kernel32" Alias
"CreateFileA" (ByVal lpFileName As String, ByVal dwDesiredAccess As
Long, ByVal dwShareMode As Long, lpSecurityAttributes As
SECURITY_ATTRIBUTES, ByVal dwCreationDisposition As Long, ByVal
dwFlagsAndAttributes As Long, ByVal hTemplateFile As Long)
	e con queste strutture & costanti:
Public Type FILETIME
	dwLowDateTime As Long
	dwHighDateTime As Long
End Type
Public Type SYSTEMTIME
	wYear As Integer
	wMonth As Integer
	wDayOfWeek As Integer
	wDay As Integer
	wHour As Integer
	wMinute As Integer
	wSecond As Integer
	wMilliseconds As Integer
End Type
Public Type SECURITY_ATTRIBUTES
	nLength As Long
	lpSecurityDescriptor As Long
	bInheritHandle As Long
End Type
Public Const GENERIC_READ& = &H80000000
Public Const FILE_SHARE_READ& = &H1
Public Const OPEN_EXISTING& = 3
	Per analogia con la funzione GetFileTime (del quale ho un
codice di esempio)  penso che i passi da fare siano:
- ottenere un handle per il file:
handle=CreateFile(Filename,GENERIC_READ,FILE_SHARE_READ,0,OPEN_EXISTING,0,0)
- convertire le data da applicare al file da struttura SYSTEMTIME a
struttura FILETIME (nel getfiletime avviene il contrario ...):
  rc=SystemTimeToFileTime(pSystemTime,pFileTime)
- applicare la data al file:
  rc=SetFileTime(handle, lpCreationTime, lpLastAccessTime,
lpLastWriteTime)
	Non ho provato ma il ragionamento dovrebbe esser giusto!
Chiaramente ognuna delle date devi associarla ad una struttura
SystemTime ...
	Spero che questo ti possa essere d'aiuto !
	Bye.
Enzo Marinacci- Roma   (Italy) 
http://www.bns.it/EMware
       Freeware,VB Utilities & Win95 Info
*** Rimuovere NO-SPAM per rispondermi in E-Mail! ***

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Riduzione ad icona

Ciao a tutti.
Qualcuno sa dirmi perchè quando aziono il pulsante di riduzione ad icona, di
un programma che ho sviluppato, questa non mi compare sulla barra delle
applicazioni di Windows, ma si riduce sul desktop, come se fosse
un'applicazione MDI, anche se la proprietà ShowInTaskbar del form è TRUE ?
Cosa devo fare per ridurre il form sulla barra delle applicazioni?
Grazie
Aldo

Che tipo di form hai settato?

E' un form normale con proprietą MDIChild impostata a False
"WRSoft" <wrs...@NOSPAMtiscalinet.it> ha scritto nel messaggio
news:rv5y8.12630$W9.3...@twister2.libero.it...


 wrote in message
news:Ch_x8.91500$SR5.2...@twister1.libero.it...

gioca col borderstyle ;))
ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: protezione software

Mi potete consigliare qualche software per la protezione degli eseguibili 
Visual Basic, magari con protezioni scaricabili on-line ?
Andrea 

 Visual Basic, magari con protezioni scaricabili on-line ?
Cosa intendi esattamente?
Visual Basic... Quale? ...:NET? ...VB6?
Che tipo di protezione?
Vuoi proteggere il codice in esso contenuto?
-- 
Ciao Fede
By Chicco Production
http://bcp.freetools.it

 ha scritto nel messaggio 
news:48f49f8d$0$14493$5fc...@news.tiscali.it...


 proteggere il codice in esso contenuto..
Scusa ma vuoi evitare che un cliente che ha il tuo sw, lo possa dare ad
altri e se lo installano in 10mila?
Se sono sw di un certo costo puoi valutare le chiavi hardware.

 Andrea
Guarda questo:
http://www.leonardobandini.it/vbocxproteggivbg.htm
mi sembra interessante (protezione con chiave pubblica). Ma è un 
suggerimento al buio, perché non l'ho ancora provato.
Ciao.
eSQueL


.net?
alcune funzioni invece di metterle dentro l'exe le fai esporre da un
webservice
Quando non vuoi + farlo funzionare cancelli la funzione ....
dovrebbe funzionare



Per .NET ti suggerisco questo post di Francesco Balena:
http://tinyurl.com/53wj3n
PaF

 
http://tinyurl.com/53wj3n
Peccato sia solo per net
-- 
Greg

Newsgroup: it.comp.lang.visual-basic
Titolo: Stampare un report di Access da VB6

Prima di tutto vi debbo i miei ringraziamenti per avermi risolto molti
problemi semplicemente leggendo i messaggi del NEWSGroup.
Allora veniamo al mio problema: dovrei stampare un report creato con Access
e che ho ovviamente memorizzato nel DB ma sulla macchina dove gira
l'applicativo VB e dove risiede anche il DB non c'è installato l'Access,
come posso fare a stamparlo ammesso che estista la possibilità di farlo?
Grazie a tutti in anticipo.

 wrote in message
7latad$rgh$1...@nslave1.tin.it...

L'unico modo per farlo e' usare Access via OLE Automation, ma, chiaramente,
ci vuole Acess installato :-(
--
Roal Zanazzi
z...@iol.it

Tratto da MS VB Site:
Dim appl As Access.Application
Set appl = New Access.Application
appl.OpenCurrentDatabase("MioDB.Mdb")
appl.DoCmd.OpenReport "Report1"
appl.CloseCurrentDatabase
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
---------------------------------------------------------------------------

 appl.CloseCurrentDatabase
...ma serve Access installato

>...ma serve Access installato
Sě....
scusa ma non avevo letto quella "piccola postilla" nel tuo messaggio....

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Per Zio Pal

Hei, devo chiederti una cosa...volevo farlo in mail perchč č mooooolto
losca ;) Non trovo piů il tuo indirizzo nella mia rubrica...scrivi qualcosa
cosě faccio replay e conservo il messaggio...aspetto eh!! Non tutto il
giorno logicamente :)
Saluti...
--------------------------------
Inviato via 
http://usenet.iol.it

 cosě faccio replay
Mmm... Ma prima o dopo il rewind? :P
-,
*

 Mmm... Ma prima o dopo il rewind? :P
di rewind non se ne parla.
mi e' bastata wind.
Newsgroup: it.comp.lang.visual-basic
Titolo: Compattare senza...sbagliare

 Se ho un form aperto con un oggetto DATA collegato ad un database, è
possibile, tenendo il form aperto, mediante un Button eseguire da codice:
db.Close
DBEngine.CompactDatabase ......
kill olddb
rename newdb olddb
quindi, uscendo dal form e rientrando, l'oggetto DATA dovrebbe trovarsi
colleagato a nuovodb senza dare alcun comando Opendatabase
E' giusto o mi ritrovo col database incasinato?
Grazie
--
Gulp ! Forse mi sono perso qualcosa !
--
Gulp ! Forse mi sono perso qualcosa !

 E' giusto o mi ritrovo col database incasinato?
Non incasini il DB semplicemente perchč la CompactDB va in errore se c'č
qualcuno che č connesso al DB.
Ciao


Memorizzi il link
Scolleghi
Compatti
Colleghi al link memorizzato
giuseppeD

 Colleghi al link memorizzato
Vuoi dire alllora che se faccio db.Close, il database chiude anche se è
presente l'oggetto DATA nel form? E che sparisce dalla Proprietà di questo
il link al database?
Scusate l' OT: come mai vedo una Re di CSSoft, non in "cascata" al mio
Thread, ma per "conto suo tra gli altri Thread del NG ? Ho qualcosa di
malconfigurato ? Grazie


 il link al database?
Quando usavo VB6 non mi sono mai voluto legare ai controlli Data,
sono più gli svantaggi che i vantaggi, mio pensiero, vedere i numerosi post
di help.
Presumo che un collegamento all'oggetto è possibile impostarlo con un
metodo, funzione o sub.
Come imposti il collegamento al db ?
Uno in apertura e lo chiudi alla chiusura del db ?
Apri e chiudi all'occorrenza ?
Apri all'apertura della maschera e lo chiudi al close della maschera ?
.......................
Salve
giuseppeD

 Apri all'apertura della maschera e lo chiudi al close della maschera ?
Vedi sopra


 form un oggetto DATA che punta ad una tabella di database
direi di no. se hai fatto db.close, sul form hai solo una 'memoria' della
tabella. se ricolleghi e fai refresh, ci sei di nuovo. ma se a tabella
chiusa provi a muoverti, mi sembra che arrivi un errore.
in ogni caso, anche per coerenza, ti conviene scaricare il form, seno'
l'errore te lo cerchi...
fa' qualche prova...
ciao

 tabella chiusa provi a muoverti, mi sembra che arrivi un errore.
Fermo lě a.p., allora fatte tutte le premesse precedenti,mi confermi che lo
posso fare?:
db.Close
DBEngine.CompactDatabase ......
kill olddb
rename newdb olddb
E poi Open.... oppure meglio, come mi sembra dici tu,  unload form, load
form
Ok?
Grazie


 Ok?
di solito i datacontrol li tengo su form children, e il menu pack lo chiamo
dall'mdi, normalmente con ^k.
quindi nell'ordine:
- scarico i(l) child col dc e chiudo eventuali rs vaganti. non dovrebbero
essercene, ma meglio esserne sicuri...
- ^k
--> compact db.mdb dbnew.mdb
-- [if exist dbold.mdb del dbold.mdb]
--> name db.mdb as dbold.mdb
--> name dbnew.mdb as db.mdb
- ricarico i(l) child
mai avuto particolari problemi.
pero', insisto, prima di distribuire un prog, fai qualche prova, in
condizioni varie...
cerca magari di inibire (con clessidra o quel che ti pare) ricaricamenti del
form durante il pack.
e considera che per il tempo del pack la macchina si pianta abbastanza...
ciao

Grazie moltissime e... di piu'

Newsgroup: it.comp.lang.visual-basic
Titolo: common dilaog

come faccio a centrare una common dilaog (file apri, file salva etc) nel
form?
Grazie enrico

 wrote


Newsgroup: it.comp.lang.visual-basic
Titolo: Disallocare un array

C'č il modo di svuotare o meglio proprio disallocare la memoria
predimensionata di un array per poi riallocarla come fosse nuovo?
E' urgente aiutatemi!!
grazie Francesca
_________________________________________________________________________
Hai perso l'ispirazione? La frase da inviare via SMS te la suggerisce Ciaoweb: 
http://www.ciaoweb.it/sms/public
-- 
Posted from [151.88.109.26] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 wrote in message
news:7e3901c0ce5c$16078ac0$266d5897@ciaoweb...


 redim preserve pippi(15) ' L'hai ridimensionato a 15 conservando i primi
10!
CiaoZ
SebaMix

perche' non erase pippi ???
ciao
mau_rizio

Newsgroup: it.comp.lang.visual-basic
Titolo: Programma in vb6 (idee confuse?)

Ciao a tutti,
non sapevo che oggetto dare stamattina al mio post... bah..
Sentite ho bisogno di realizzare un programma che risieda sempre sul server
poichè deve avere accesso a un db che risiede su questo server e che fa
parte di un sito internet... Tutti i client di questo programma possono
usare ma non hanno nessun accesso (e manco lo devono avere) a qualsiasi
punto del server e devono solo prendere specifici dati dal DB senza dargli
quindi la disponibilità di andarseli a pesacare dal DB sharato.
Avevo pensato a un programma che si installa solo sul client e le dll
richieste e sul server registrare le dll che servono a gestire le operazioni
consentite. In modo che io debba solo autorizzare (Win2000 server) la
chiamata delle dll (ma non so se funziona ditemi voi).
Voi che ne pensate???
Grazie!!!

 andarseli a pesacare dal DB sharato.
Sql-Server?
MSDE?
MySql?
Fanno tutti esattamente quello che intendi tu.
Se proprio vuoi usare un db Access (non lo hai specificato, ma immagino sia
così...), puio anche linkare MSDE o Sql-Server al db Access e sfruttare il
servizio solo come interfaccia di rete.
Ciao
Alberto
--
E non so se avrò gli amici a farmi il coro,
o se avrò soltanto volti sconosciuti,
canterò le mie canzoni a tutti loro
e alla fine della strada
potrò dire che i miei giorni li ho vissuti...

Non vedo quale sia il problema. Indipendentemente dal server,
se questo č blidanto da un posto di vista di sicurezza windows,
quello che tu devi dare č solamente mettere nelle mani dell'utonto
un programma che va a collegarsi al db e leggere solo su date tabelle
e determinati dati all'interno.
Piů lo vuoi complicato, piů ci devi lavorare.
Diverso sarebbe se vuoi fare un'interfaccia query dove il tizio
si collega e tramite questa interfaccia manda comandi sql all'rdbms
di turno.
Allora li devi implementare pesantemente sicurezza a livello di db,
e la cosa ti si complica di piů e non comunque risolvibile solo con
le dll che puoi mantenere registrate solo sul client invece che andare
a farti una sega mentale per installare delle dll activex remote che son
un mezzo bordello a seconda delle security del tuo dominio.
--
Saluti
Andrea Moro
Newsgroup: it.comp.lang.visual-basic
Titolo: tempi esecuzione

Visto che bisogna stare a casa altrimenti pure il prete, da sopra il campanile,  ha minacciato di sparare ai fedeli che 
si aggirano per il quartiere senza motivo....
 
Nella cartella VB6/Common/Tools/VB ci sono svariati miniprogrammi, uno di questi dovrebbe misurare il tempo di 
esecuzioni delle varie routine di una form. Vi ricordate per caso il nome? O se per caso è uscito qualcosa di meglio in 
tutti questi anni? Grazie
 
Buona salute a tutti
 
-- 
Greg

 Nella cartella VB6/Common/Tools/VB ci sono svariati miniprogrammi
 
Ricordavo male, ci sono tante cose interessanti ma non questo, bisogna farselo
 
-- 
Greg


ma non basta una mini funzione che usi il timer?
 
crei un modulo, ci metti la funzione e la inserisci in qualsiasi 
programma, gestendo l'attivazione/disattivazione del controllo con un 
menu o quello che ti pare (es: parametro nella command line)
 
-- 
gio

Newsgroup: it.comp.lang.visual-basic
Titolo: Cerco software per visualizzare DLL e OCX

Sto cercando un software che mi permetta di vedere quali sono le DLL e OCX
utilizzati  dal mio programma!!!
Qualcuno me ne può consigliare uno ?
Grazie Max

Max ha scritto:

http://www.dependencywalker.com/
CIAO, ROBY

 
http://www.dependencywalker.com/
Attenzione che si intrufola nella shell di Explorer
e poi sono ca@@i a toglierlo
Anche questo sotto lo fa' ma si puo' facilmente disinstallare
da installazione applicazioni
InspectExe
InspectExe allows you to explore and diagnose problems with Win32 applications
It is integrated directly into the Windows® Explorer and adds as a set of extra pages in the Properties sheet for the
selected executable file. Look at the screen shots at the bottom of this page to see examples of the information it
displays.
 Display all import and export functions of an executable file (.EXE, .OCX or .DLL).
http://www.silurian.com/win32/inspect.htm
Bust!_it
http://zonex.web.com/
Faber Toys
http://www.faberbox.com/fabertoys.asp
PEInfo
http://www.domaindlx.com/e_morcillo
--
Fosco
Newsgroup: it.comp.lang.visual-basic
Titolo: Valutazione programma

Ciao,
---------------------------------------------------------------
- Windows XP
- Visual Basic 2008 Express / Professional
----------------------------- ---------------------------------
come valutate le prestazioni di un programma?
Vi affidate al Task Manager e al tools prestazioni?
Grazie mille
Ciao BlackSun

 Ciao BlackSun
.m
-- 
Mauro Servienti
{C67C0157-5D98-4733-A75E-93CAEE4BADC8}
Microsoft MVP - Visual C# / MCTS
http://mvp.support.microsoft.com
blog @ 
http://milestone.topics.it
whynot [ at ] topics [ dot ] it

 Manager non è in grado di fare valutazioni sulla memoria managed.
Ok grazie. E di conseguenza cosa si usa?
Grazie mille
Ciao BlackSun

 
-- 
Paolo opg
BE AWARE that this post uses a fake reply-to address
to contact me write to:
janickg ( at ) hotmail ( dot ) com
--

 oppure un gran numero di scritture su disco?
No... nessuna delle 2 in quanto non lavoro in rete e la scrittura al
massimo si limita ad una sola, quella di salvataggio file (ma non
sempre).
Ciao BlackSun

 passaggio.
un profiler tutta la vita.


"Mauro Servienti [MVP]" <maurose...@online.nospam> ha scritto nel 
messaggio news:mn.b45b7da72...@online.nospam...

e per applicazioni in vb6?

 un profiler tutta la vita.
Intendi NetBeans o DotTrace?
Ciao BlackSun

 Intendi NetBeans o DotTrace?
Si, o anche Ants o lo stesso profiler di VS 2010 Ultimate


 e per applicazioni in vb6?
non ne ho idea mi spiace.


 passaggio.
Vai su Sysinternals, tira giů Process Explorer[1] e guardatelo
un po'. Fra le altre cose clicca sulle intestazioni di colonna
e guarda cosa puň fare. Sě, gestisce anche programmi in .NET.
Se vuoi qualcosa di ancora piů fetente c'č anche Process Monitor,
o ProcDump se hai dei blocchi.
[1] meglio ancora: scarica l'intera suite:
http://technet.microsoft.com/en-us/sysinternals/bb842062.aspx
ed espandila in una cartella. Segui il mio consiglio, vedrai
che mi ti ricordi la prima volta che hai bisogno di qualcosa
che arrivi dentro il sistema :-)
Bye, G.

 [1] meglio ancora: scarica l'intera suite:
[2] meglio ancora
segnati il link (non lo ricordo, ma si trova) da cui lanciarli via web, 
sempre aggiornati
l'amico sistemista era entusiasta, salvo quelli che depennano ed č meglio 
avere salvato prima

Newsgroup: it.comp.lang.visual-basic
Titolo: Re: Trasparenza controlli (VB6)

 Massimo
prova

 ha scritto nel messaggio
news:keloqm5ejtwi$.js4oxkeoiexx$.dlg@40tude.net...


 ha scritto nel messaggio
news:keloqm5ejtwi$.js4oxkeoiexx$.dlg@40tude.net...


 prova 2
Per le prove c'è il newsgroup it.test, grazie.
-- 
Due stringhe entrano in un bar. La prima dice al barista: "Barista, dammi 
una birra.u.5n$x5t?*&4ru!2[sACC~ErJ". E la seconda: "Perdoni il mio amico, 
non ha il terminatore NULL"
Newsgroup: it.comp.lang.visual-basic
Titolo: Ridimenzione di una FORM

Ciao a tutti!
Ho una form ridimensionabile che vorrei non diventasse piu' piccola dei
valori X e Y...
Pensavo di poter risolvere usando degli if in resize della form:
if form.Height =< X then form.Height
if form.Width =< Y then form.Width
Ma come risultato ho che il mouse ridimensiona la form al di sotto di X e Y
per un istante e poi prende le dimensioni minime da me scelte...
Come posso fare a fissare la dimensione minima della form evitanto l'effetto
sopra descritto (o altri effetti) ?
--
Massimo "Red Foxy" Ciccio'
Home Page: 
http://www.redfoxy.go.to/
Web Master di:
 - Libreria Ciofalo: 
http://www.ciofalo.it
 - Quantum Leap: 
http://ql.programmazione.it

sopra descritto (o altri effetti) ?
Guarda sul sito comune: c'è il mio ocx (con sorgenti) per il subclassing
(adHook).
Nell'esempio nella guida c'è proprio quello che cerchi.
Ciao


Avrei preferito non usare OCX :\
CMQ, vediamo un po'...

Newsgroup: it.comp.lang.visual-basic
Titolo: Ricerca ocx (risorse di rete)

Buongiorno a tutti!
Sono alla ricerca di un ocx che mi permetta di sfogliare le risorse di rete
permettendomi di vedere tutti i PC.
L'ocx di cui sono alla ricerca dovrebbe permettermi di creare
un'applicazione simile al backup di Windows 2000.
TIA e auguri a tutti.

 ha scritto


 ha scritto nel messaggio
news:b7oerg$2vfkr$1...@ID-51318.news.dfncis.de...


 ha scritto


Newsgroup: it.comp.lang.visual-basic
Titolo: RICERCA RECORD

Ciao a tutti,
sto implementando una ricerca utilizzando una semplice SELECT.
Vi spiego il problema :
Devo ricercare un record ed utilizzo il comando SELECT (.recordsource =
select ....) .
Il record lo trovo e me lo visualizza, perň dopo non riesco a muovermi sugli
altri utilizzando un data control anche se ripristino il recordsource
originale.
Come posso posizionarmi sul record e successivamente spostarmi su quello
precedente o successivo utilizzanto la datacontrol ?
Spero di essere stato chiaro.
Grazie a tutti
Luca Dottori
P.S. --Codice --
datacontrol.recordsource = SELECT .......
datacontrol.refresh
"sono sul record e me lo visualizza"
datacontrol.recordsource = vecchiosource
A questo punto sia facendo un refresh o no non mi si muove il record.

Io ho risolto ricaricando il Form in cui hai il Data ma senza che durante il
caricamento il data venga posizionato con una Query.Allora ti funzioneranno
i pulsanti avanti e indietro; se poi ci rifai una Query tu, i pulsanti si
ridisabilitano.
Fammi sapere se hai risolto e/o se trovi un altro sistema!
Giorgio.


select ....) .
Puoi fare anche in questo modo:
set TmpObj=tuo_datacontrol.recordset.clone
If Not TmpObj.EOF Then
eroqui=TmpObj.bookmark
TmpObj.FindFirst "[Campo_su_cui_effettui_ricerca]" & " LIKE '" &
StringaRichiesta & "'"
If TmpObj.NoMatch Then
      TmpObj.Bookmark = EroQui
      MsgBox "esito negativo"
     Else
      tuo_datacontrol.recordset.bookmark=TmpObj.Bookmark
End If
end if
successivamente puoi utilizzare il findnext per trovare le corrispondenze
successive.
Naturalmente non deve esserci alcuna operazione pendente sul datacontrol
(update,modify,ecc).
Ciao Marco

Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto!!!!!!!!, metodo Seek

Ho provato a usare il metodo Seek per trovare un record,
ma dopo che mi ha trovato il primo record non mi torva piu
il prossimo record che sodisfa i criteri di ricerca.
Se qualcuno mi puo aiutare lo prego di scrivere a 
giga...@ats.it

...


Se qualcuno mi puo aiutare lo prego di scrivere a 
giga...@ats.it
Infatti questo č il funzionamento.
Seek serve a trovare il primo record, movenext o moveprevious servono poi
per spostarti in avanti e indietro rispetto il reco trovato col seek.
esempio:
    SEEK Qualcosa
    if record.NOMATCH=true then
        BEEP! il record non l'ho trovato!, ritenta sarai piů fortunato.
    else
        DO while record.EOF=true
            Manipolazione dei dati del record (o quello che ti pare)
            record.MOVENEXT
        LOOP
    end if
Oppure:
    SEEK Qualcosa
    DO while record.BOF=true
        Manipolazione dei dati del record (o quello che ti pare)
        record.MOVEPREVIOUS
    LOOP
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] aprire immagini

Salve a tutti,
come posso da VB aprire un immagine (gif; jpeg ecc.) utilizzando il
programma abbinato al tipo di file?
Praticamente dovrei fare quello che fa windows se si clicca su un immagine
qualsiasi.
P.S. sul SC non ho trovato niente di interessante (o forse non ho cercato
bene).
Grazie.
Ciao.
Paolo.

Usa l'api Shell Execute

non hai cercato bene.....
:-)))
quello che ti serve, più generalmente, è la procedura che apri un certo
files con il programma ad esso associato......
.doc --> Word
.txt --> Blocco note e così via.....
L'API che ti serve è la Shell Execute......guarda bene!!!!!
Good Coding!!!
--
Damiani Liborio Igor
idam...@hotmail.com
 - 
igor.d...@light.it
http://www.igordamiani.it
ICQ : 11847262

Newsgroup: it.comp.lang.visual-basic
Titolo: Installazione programma fatto in vb

Ciao a tutti,
sto tentando di creare un'installazione con il pacchetto fornito con il
visual studio, dopo che ho realizzato il programmino, impacchetto tutto, ma
non so come creare delle directory e sottodirectory dove inserire dei miei
file, č possibile ? come posso fare ?
Ciao e grazie
Giuseppe


Ciao, grazie lo stesso ma ho risolto,
Se a qualcuno potesse servire la soluzione:
ho aggiunto i file contenuti nelle sottodirectory dal programma x creare
l'installazione e nel path di installazione dopo $appPath ho aggiunto
/miadirectory
Ciao
Giuseppe

Newsgroup: it.comp.lang.visual-basic
Titolo: VBA - Word dialog box personalizzata per salvare documenti.

Salve a tutti!!
In un a mia macro ho avuto la necessita di realizzare una mia dialog
box personalizzata per salvare il documento all'interno dell'evento
Document_Close.
...
        With Assistant
            .On = True
            .Visible = True
            .AssistWithHelp = True
            .AssistWithAlerts = True
            Set blnEnd = .NewBalloon
            With blnEnd
                Dim iAnswer As Integer
                .Animation = msoAnimationSaving
                .Mode = msoModeAutoDown
                .Text = "Vuoi Salvare il File '" & myDocument.Name &
"' ???"
                .Button = msoButtonSetYesNo
                iAnswer = .Show
            End With
        End With
        If iAnswer = vbYes Then
            With myDocument
                myDocument.Save
        end if
...
la mia routine funziona correttamente se decido di salvare il
documento, ma nel caso opto per non salvare il file word mi richiede
nuovamente se voglio salvare il documento. come faccio a risolvere
tale problema???

 ha scritto nel messaggio 
news:1178871622.6...@o5g2000hsb.googlegroups.com...

hai provato a mettere un
else
    mydocument.saved=true
end if
g

provato e funziona perfettamente... grazie dell'aiuto. ;)
g ha scritto:

Newsgroup: it.comp.lang.visual-basic
Titolo: icone barra strumenti ??

mi sapreste indicare un buon sito dove scaricare delle immagini .ico per
creare una toolbar personalizzata per la mia applicazione ???
grazie.


Io personalmente per editare icone uso Microangelo, il quale viene fornito
con numerose icone di esempio (tutte ad almeno 256 colori)
http://www.impactsoft.com/
sennņ prova su 
www.zdnet.com/downloads
 e cerca una frase tipo
icon collection
Ciao,
Välėrļö


prova qui':
http://utenti.tripod.it/Microbos/
ciao. buc

Newsgroup: it.comp.lang.visual-basic
Titolo: ERRORE 340 SU INSIEME DI OGGETTI

SALVE SONO FRANCESCO E SONO NUOVO IN QUESTO NEWS:
STO METTENDO A PUNTO DELLE LIBRERIE PER PROGRAMMARE IN VB5.
MI SI PRESENTA QUESTO PROBLEMA :
PER LA VISUALIZZAZIONE E IL SALVATAGGIO DEI DATI, HO CREATO UNA
CORRISPONDENZA POSIZIONALE TRA I CAMPI DELLE MIE TABELLE, E GLI OGGETTI CHE
HO DISPOSTO SUI MIEI FORM.
ES. IL CAMPO "CODICE" CHE E' IL PRIMO CAMPO DELLA MIA TABELLA, HA UNA
CORRISPONDENZA CON UN TEXTBOX, CON INDICE = 0, IL CAMPO "NOME" CHE IL
SECONDO CAMPO DELLA MIA TABELLA AVRA' UN ALTRO TEXTBOX CON INDICE = 1 E
COSI' VIA ...
FIN QUI NESSUN PROBLEMA SE NON CHE, ALCUNE VOLTE MA NON RIESCO A CAPIRE IL
PERCHE', AL MOMENTO DELLA VISUALIZZAZIONE MI ESCE FUORI "ERR.340 L'ELEMENTO
NON ESISTE NELL'INSIEME DI OGGETTI".
E' VB CHE FA CASINO (NON PENSO..) ? ALLORA IN COSA SBAGLIO ?
RIANGRAZIO A TUTTI IN ANTICIPO.

...



Innanzitutto, per favore NON scrivere in maiuscolo; una consuetidine dei
newsgroup (e di internet in generale) dice che scrivere in maiuscolo
equivale ad URLARE.
Poi, l'errore 340 e' causato dal tentato uso di un elemento (controllo) in
un array di controlli.
Es:
TextBox(10).Text = "xyz"
quando l'array TextBox() contiene 10 textbox (o meno), e quindi gli indici
corretti sono nell'intervallo [0..9].
--
Roal Zanazzi
z...@iol.it




Newsgroup: it.comp.lang.visual-basic
Titolo: [EXCEL] Errore critico

Salve NG,
vi prego aiutatemi, sono disperato...
ho un file Excel '97 con dentro dei grafici. Non appena agisco sui grafici
( anche se solo cambio il colore delle linee ) , Excel mi visualizza
l'errore critico nel file Excel.exe e si chiude; se lo stesso file lo apro
su un altro computer tutto bene.
Ho installato Win '98, Office '97 SP 2 su entrambi i PC. HELP ME ... :)

 ha scritto nel
messaggio news:9do9ps$39s$1...@pegasus.tiscalinet.it...


 ha scritto nel messaggio
news:9dqod1$in3$1...@newsserver.cilea.it...


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

Ho appena installato Visual Interdev (Visual studio 6) ma non riesco in
nessun modo a vedere le tre videate normale/HTML/anteprima.. riesco solo a
vedere il codice html o ASP.. e non vedo mai la finestra di anteprima.
qualcuno sa dirmi se esiste una opzione o se
ho sbagliato qualcosa in fase di installazione? (ho tentato l'installazione
7 volte..)
Grazie in anticipo
Marcello
--
--

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Controllo RS 232. Chi ne sa qualcosa?

Vorrei cortesemente chiedere il vostro aiuto riguardo al controllo di
un'interfaccia seriale.
Funziona con successo usando il QBasic.
Ora sono passato al Visual Basic 5.0, e non riesco più a farla funzionare.
5  REM Nuova Elettronica Interfaccia LX875 (c) 1991
10 ADR% = 0: REM Indirizzo Dell' Interfaccia LX 875 su Switch SI
15 REM Modo 2 Ricezione / Trasmissione ( S3 con levetta 2 in on)
20 CLS : REM Cancella lo Schermo
30 OPEN "coml :1200,n,8,1"   AS #1 : REM Velocita' su Switch S2
40 REM La Seriale Viene Dapprima Aperta con Nessuna Parita
50 OUT &H3FB, &H1B: REM Setta la Seriale CON 1 con Parita  Even
55 REM OUT &H2FB, &H1B: REM Setta la Seriale COM 2 con Parità Even
60 INPUT DTX%: REN Input del Dato da Trasmettere
70 PRINT #1, CHR$(ADR% OR 128) + CHR$(DTX% AND 127)
75 REM Trasmette Indirizzo e Dato alla Scheda
80 DRX1$ = INPUT$(1, #1): DRX2$ = INPUT$(1, #1) :  REM Legge dalla Scheda
90 DRX1% = ASC(DRX1$): DRX2% = ASC(DRX2$): REM Converte i Dati in Numeri
100 PRINT DRXI%, DRX2%: REM Visualizza i Dati Letti
110 IF DTX% < 128 THEN GOTO 60: REM Ripete la Sequenza se < = 127
120 CLOSE #1
Questo è un programma di test e funziona bene.
In VB5.0 per comunicare con la porta seriale occorre usare il controllo
MSComm.
MSComm.Output dovrebbe corrispondere a Print #1.
Ma qual è l'equivalente dell'istruzione OUT?
Potreste mandarmi il listato con le istruzioni equivalenti per poter
ottenere un programma come quello sopra?
Basta anche un esempio che spieghi come collegarsi, inviare e ricevere dati.
Ringraziandovi per aver prestato attenzione a questo messaggio, attendo
ansiosamente una vostra risposta.
Grazie
erde...@tin.it


Le linee che necessitano qualche aggiustamento sono la :
30  e la 50 che vanno trasformate nei corrispondenti settaggi
dell'oggetto mscomm
cerca nell'help dell'ogetto le seguenti proprita':
CommPort -> per settare la porta da usare ( COM1 , COM2 )
Settings -> per specificare velocita' bit di stop e parita'
PortOpen -> per attivare una comunicazione
Leggiti comunque tutto l'help per vedere se serve qualche altra cosa
Ciao 
Marco Colandrea


Sul Sito Comune di questo NG c'e' una DLL chiamata Win95io.zip contenente
una DLL che permette di fare IN e OUT sulle porte.
Questa, come tutte le DLL che conosco, funziona SOLO sotto Win95/98.
http://www.murialdo.it/it_lang_vb
Ciao
By -MES-   Maronese Ettore
http://ilmes.freeweb.org
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://www.murialdo.it/it_lang_vb

 Mailgate.ORG is maintained online by Dario Centofanti
sarei interessato,grazie
nicola
--
Posted from 
ssst.ssst.it
 [195.31.212.195]
via Mailgate.ORG Server - 
http://www.mailgate.org
Newsgroup: it.comp.lang.visual-basic
Titolo: Contrario booleano

Salve,
Sto cercando il miglior sostituto per
if Not( MiaVarOggetto is Nothing ) then...
che mi consigliate?
if MiaVarOggetto is Something then... ?
ROTFL
Andrea

 if Not( MiaVarOggetto is Nothing ) then...
if  MiaVarOggetto is Nothing=0 then...
if  MiaVarOggetto is Nothing=False then...

 ha scritto nel messaggio
news:bb1ugl$4sa0g$1...@ID-174464.news.dfncis.de...

Io mi farei una funzione isSomething
if isSomething(MiaVarOggetto) then
...
end if
public sub isSomething(byref Oggetto as object) as boolean
    isSomething = Not( Oggetto is Nothing )
end sub

 if  MiaVarOggetto is Nothing=False then...
If CBool(MiaVarOggetto is Nothing) = False then...
Giusto per leggibilità...
Ciao
Alberto
-- 
Santo cielo, Magnum, si può sapere cos'è questo baccano?
Higgins, posso spiegarle...
Credo non sia necessario.
Zeus, Apollo, a voi...

 Giusto per leggibilità...
... e anche un po' per ... pignoleria ;-) :-P


Sì.
Oggi mi sento rompicoglioni.
Però immagina se lo stesso concetto viene applicato con l'operatore =
anzichè Is:
If miaVar = AltraVar = False Then...
Per funzionare funziona.
Ma quanto a leggibilità...
Per cui, abituarsi a scrivere con 'usta' è sempre meglio :-)


 Per cui, abituarsi a scrivere con 'usta' è sempre meglio :-)
What's 'usta'?

 What's 'usta'?
Usta = raziocinio
Concorderai che è più gradevole, come termine.


 Giusto per leggibilità...
Allora perchè non
If CBool(MiaVarOggetto is Nothing) = CBool(False) then
?
Forse intendevi
If (MiaVarOggetto is Nothing) = False then
ma da qui a dire che questo sia più leggibile di
If Not (MiaVarOggetto is Nothing) then
ne passa :)
Ciao

 Concorderai che č piů gradevole, come termine.
Francamente, boh! In che lingua č?

 Francamente, boh! In che lingua è?
l'ho sentito usare anche nel mantovano
Salutoni
Sergio

 ne passa :)
Concordo. Anche io uso questa forma.
Ma visto che il thread chiedeva come fare per non usare il Not...


Newsgroup: it.comp.lang.visual-basic
Titolo: dati > 64k ?!?!?

E' proprio impossibile gestire dati piu' lunghi di 64k in visual
basic, come e' scritto nei books on line ? Non c'e' un modo di
dichiarare una stringa da >65535 caratteri ?
    bye, Alberto, 
a.ma...@inc.it
 
http://home.onestop.net/alberto/index.htm

Se stai sviluppando data base cob VB5 devi dichiarare il campo come MEMO che
ne contiene parecchi di piu' e visualizzarlo in una RichTextBox.
Saluti
Stefano
Newsgroup: it.comp.lang.visual-basic
Titolo: [.NET] WebClient e caratteri accentati

Ho notato uno strano comportamento del controllo webclient: se lo uso per
trasmettere un testo ad una pagina asp sostituisce alle vocali accentate
delle Â. Ad esempio:
'wc è un webclient
wc.querystring.add("testo","la palla è rossa")
wc.downloaddata("
http://www.miosito.net/pagina.asp
")
in pagina.asp
dim t:t=request.querystring("testo")
response.write t
ebbene, t vale la palla Â rossa.
Ad occhio e croce c'è qualcosa che non va nella codifica, ma non riesco ad
individuare a che livello si verifica il problema (di applicazione o di
pagina asp).
Spero possiate/vogliate aiutarmi.

wc.querystring.add("testo","la palla è rossa")
A naso credo devi codificare in utf-8 la stringa che passi come value,
cioe' dargli: "la+palla+%C3%A8+rossa"
Per codificarla puoi usare UTF8Encoding.
-- 
ciao, hal

 Per codificarla puoi usare UTF8Encoding.
Ho provato questa funzione:
    Private Function Encode(ByVal Quod As String) As String
        Dim b() As Byte : ReDim b(Quod.Length - 1)
        Dim k As Integer
        For k = 0 To Quod.Length - 1
            b(k) = CByte(Asc(Quod.Chars(k)))
        Next
        b = System.Text.UTF8Encoding.Convert(System.Text.Encoding.ASCII,
System.Text.Encoding.UTF8, b)
        Dim s As String
        For k = 0 To b.Length - 1
            s += Chr(b(k))
        Next
        Return s
    End Function
Ed un progresso c'è stato: adesso al posto delle A accentate appaiono dei
punti interrogativi: ?
Grazie per l'aiuto.

 ha scritto nel
messaggio news:OYQQa.57854$qa5.1...@news2.tin.it...



Ho trovato il topic e ho annotato l'encoding 1252 ma... dove devo metterlo?
Cioč, nella function che ho postato sopra, mi chiede due encoding: se il
GetEncoding(1252) č il secondo (di destinazione), che metto come primo
encoding?
Non funzionano: ASCII e UTF8.
Oppure, forse piů breve: dove trovo i codici esadecimali delle vocali
accentate?

Newsgroup: it.comp.lang.visual-basic
Titolo: Riconoscere ALT+TAB

Come posso fare per riconoscere la pressione dei tasti ALT+TAB da
visualBasic?
Grazie
Lorenzo

Prova L'api keyb_event..
tra un po', troverai un esempio su 
http://members.xoom.it/CesareRizzi
--
Posted from 
romeo.logikos.it
 [193.70.26.1]
via Mailgate.ORG Server - 
http://www.mailgate.org
Newsgroup: it.comp.lang.visual-basic
Titolo: OT consiglio su libro

Ci sto provando in tutte le maniere ad usare ado .net, ma il passaggio da 
dao (eh sì, io uso dao e mi trovo ancora bene, per i GRANDI gestionali che 
devo fare..;)))) ad 
ado.net
 mi risulta + ostico del previsto (nonstante 
webcast e guide on line)... quindi pensavo di prendermi un bel libercolo e 
guardanto sul 
www.bol.it
 ho trovato vari titoli.
Il migliore mi sembra
Microsoft Visual Basic .NET per i database di Microsoft Access | 1ª ed. | 
Italiano
ma visto il costo volevo sapere la vostra opinione, ma soprattutto se è un 
libro di facile comprensione per un "duro di comprendonio" come il 
sottoscritto.... altrimenti se avete altri libri da proporre....
grazie a tutti per l'attenzione 

  altrimenti se avete altri libri da proporre....
il classico e sempre utile "programmare in visual basic .net" di francesco
balena. Ha un bel kiletto di pagine dedicato a 
ado.net
 e almeno per me mi
sembra abbastanza chiaro. Ora non ancora mi butto a tempo pieno su 
ado.net
ma da quel che ho letto e dagli esempi che ho seguito mi pare spiegato molto
bene, il classico "...for dummies" non potrebbe farlo meglio! ^_^
ammetto che cmq non e' un libro incentrato su Ado.net quindi non so se possa
esserti suffic(i)ente!
-- 
[Gigio2k]
http://www.g2kweb.it
[ it-alt.comp.hardware.modding ] - 
http://www.g2kweb.it/ichm

 ha scritto nel
messaggio news:cnce9l$qnn$1...@fata.cs.interbusiness.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Inserire una pausa in un codice

Ciao,
premetto che sono abbastanza ignorante in materia di Visual
Basic.
Sto scrivendo una macro di Word con VB e non riesco proprio
a capire come dirgli di fare una pausa tra il comando di
stampa e il comando di chiusura di Word.
ringrazio in anticipo
Alessandra


Ciao!
Io faccio cosi':
Sub Delay(byval vnIntervallo as integer)
    Dim lTempo as long
    lTempo=timer
    While(ltempo-timer)<vnIntervallo
    wend
End Sub
So anche che c'e' un'APE (credo si chiami Sleep), ma non conosco bene il
suo impiego...
Ciao
Brando

Ciao e scusa, ma mi sono accorto di aver scritto una mezza castroneria.
Il problema che sorge usando il timer e' che a mezzanotte si riazzera,
per cui il codice va modificato un po':
Sub Delay(byval vnIntervallo as integer)
    Dim bTimeOut as boolean
    Dim lTempo as long 
    lTempo=timer
    btimeOut=False
 
    While Not bTimeOut
        if timer-lTempo<0 then       'Cosi' aggiri il problema
             lTempo=lTempo-86400
        endif
        if Timer-lTempo > vnIntervallo then
             bTimeOut=True
        endif
    wend
End Sub
P.S. Ho controllato, l'APE di cui ti parlavo e' la seguente:
Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As
Long)
Ciao
Brando
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Controllare la larghezza delle stringhe con VBA in Word97

Salve a tutti,
devo fare in modo che delle stringhe vengano allineate a cascata
indipendentemente dal numero dei caratteri, come fare? Mi spiego meglio:
date 5 stringhe, che l'utente inserisce di volta in volta e sempre diverse,
devo ordinarle in modo tale che la prima sia la più corta, poi mano a mano
sempre più lunghe. Con il controllo dei caratteri va bene, ma talvolta le
stringhe non vengono ordinate perfettamente giacché uso un carattere
grafico, il Black Chancery che ha ad esempio la R molto larga.
Qualcuno ha un'idea???
Grazie,
--
DoS
minic...@cheerful.com


Dai uno sguardo alla TextWidth
Ciao
Ven

Newsgroup: it.comp.lang.visual-basic
Titolo: comandi da vb

Salve, ho questo problema.
devo eseguire il seguente comando da vb
copy f:\cartella\nomefile.est c:\miacartella\nomefile.est /y
se tento di eseguirlo con la shell mi da errore di file not found,
giustamente, la shell cerca un eseguibile.
siccome il comando copy sopra, č contenuto in un file bat assieme a tanti
altri comandi da eseguire in sequenza,
come posso lanciarli da vb?
lo stesso errore lo genera il comando DEL
(sono comandi interni)
Grazie.
:-)

Non ho capito: non fai prima a eseguire il batch? (vedi su sito comune per
attendere che termini)
Per eseguire il copy shell "c:\
command.com
 /C copy.....", per NT devi usare
cmd al posto di 
command.com
, forse te la cavi leggendo COMSPEC.

 :-)
Beh, perché non lanci direttamente il file batch dalla Shell di VB?
O perché non ti crei vari batch del tipo Copia.Bat (che contiene il comando
copy), Cancella.Bat (che contiene il comando del), ecc.?
O perchè non usi le funzioni di VB tipo FileCopy, Kill, MkDir, RmDir, ChDir,
ecc.???
Ciao!
Esteban
Hosted by 
www.seber.it

 wrote in message
MlPM6.7357$jp1.4...@news.infostrada.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: chiudi sessione

Qual'è l'istruzione che mi permette di chiudere la sessione spegnendomi il
computer?

Sul sito comune c'è un sorgente esempio.

 spegnendomi il  computer?
http://www.aumha.org/a/shtrstrt.htm
http://www.aumha.org/a/shutcut.php#long
http://www.aumha.org/a/shutcut.php#xp
--
Fosco
Newsgroup: it.comp.lang.visual-basic
Titolo: hex <> dec

Ciao!
Come posso fare a trasformare un numero esadecimale in decimale?
Grazie per le eventuali risposte.
Guiky
Buon Natale!

 Come posso fare a trasformare un numero esadecimale in decimale?
Applicando la trasformazione che tiene conto dei pesi, simile a quella
binaria...
Es...
A0 = 0+ A*16 (A=10) = 160
C2 = 2 + C*16 (C=12) = 194
AB3= 3+ B*16 + A*16*16= 3 + 176 + 2560 = 2739
e cosě via....

Come posso fare a trasformare un numero esadecimale in decimale?
Se sta in un long: CLng
Se e' piu' grande: Val
-- 
hth, hal

 Come posso fare a trasformare un numero esadecimale in decimale?
CLng ("&H" & strHex)
Ciao, Silv:o)
Newsgroup: it.comp.lang.visual-basic
Titolo: Vi prego aiutatemi!!!!!

Ciao Sono un programattore non molto esperto di visual basic e ho
bisogno di un aiuto!!
Uso visual basic 6 sp3 e quando cerco di gestire un db di access 2000
il programma mi dice che e' impossibile aprire il db, cosa che non fa
se uso un db di access 98!!!
Come posso fare per risolvere il problema???
Ciao e Grazie
Keith

 Ciao e Grazie
Per accedere ad un mdb2000 ci si deve comportare in modo diverso da un mdb97
... l'argomento e' stato trattato migliaia di volte sul NG ... ricerca nei
post precedenti ed eventualmente anche tramite 
www.deja.com
--
Ciaps
Stracca
---------------------------------------------
    Le risposte alle tue domande le trovi
    sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
       ... e nell'help in linea !
---------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: Programmazione VBA in Excel...problemi....aiuto!!!

Sto costruendo dei fogli di calcolo in Excel ed avrei bisogno di un paio
di suggerimenti riguardo la programmazione VBA.
1) Nel foglio di calcolo ho delle celle contenenti delle formule. Puň
essere che i risultati di queste formule siano 0 oppure delle divisioni
per zero. Come posso programmare in VBA in modo che se una o piů di
queste celle hanno questi risultati il colore del font sia bianco in
modo da non venire visualizzati?
2) Come realizzare un form di immissione dati in modo da attribuire poi
a determinate celle del foglio di calcolo i dati immessi mediante il
form?
Grazie a tutti coloro che sapranno aiutarmi....
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 form?
    O bella, realizzandolo. A che punto si fermano le tue esperienze?
Ovvero, da che punto in avanti hai bisogno di aiuto? Ma, prima di tutto...
Hai studiato ben bene la guida a proposito degli UserForm? Hai almeno
tentato di sperimentare gli esempi proposti?...
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------

 tentato di sperimentare gli esempi proposti?...
Ho consultato la guida, in ogni caso le mie esperienze con la
programmazione VBA sono estremamente limitate essendo praticamente agli
inizi.
Avendo la necessità di realizzarlo, avrei bisogno di qualche utile
suggerimento.
Grazie


 suggerimento.
    Personalmente non ho nulla da suggerire. Pero' a domanda rispondo, se
ritengo di conoscere la risposta. Hai domande da fare?

Newsgroup: it.comp.lang.visual-basic
Titolo: Ricezione SMS

Salve,
ho necessità di poter scaricare i messaggi sms ricevuti dal cellulare sul
pc.
Qualcuno mi sa dire se esiste un programmino free o un ocx possibilmente con
istruzioni che facciano al caso mio?
Grazie.



Potevi almeno postare la marca ed il modello del tuo cellulare!!!

 wrote:

Non mi risulta, ma si tratta comunque di pilotare la seriale e di dare
una serie di comandi standard AT. Sul sito nokia trovi tutte le
specifiche.
Newsgroup: it.comp.lang.visual-basic
Titolo: utf-8 e xml in vb6

Ciao a tutti,
è la prima volta che scrivo, poichè non uso spesso vb, però spero che
qualcuno mi possa aiutare...
Problema: sto facendo uno sviluppo che - per una quantità di motivi -
deve essere fatto in VB6, l'anzianità del quale mi sta creando una
difficoltà che probabilment enon avrei avuto sviluppando in altri
ambiti.
Premessa: sono ignorante in materia di gestione utf8 e di unicode (di
solito sviluppo algoritmi e quindi non ho mai avuto modo di occuparmi
di tabelle codici).
La questione è semplice: ho un file .xml (in utf-8), che contiene, tra
le altre cose, anche dei caratteri scritti in alfabeto greco
all'interno di un paio di campi di testo.
Ho inoltre delle API, con cui posso interagire con un software che fa
da GUI a un db. Una di queste deve ricevere "in pasto" il dato che
contiene i suddetti caratteri greci.
Per aprire l'xml uso MSXML2, al momento (si accettano suggerimenti per
alternative), ma nel risultato finale il dato viene visualizzato con
tanti bei punti di domanda.
Notare che lo spazio di destinazione supporta la tabella codici,
perchè facendo copy&paste dal file originario (aperto con notepad++)
alla finestra di destinazione, i caratteri greci si vedono a
perfezione.
Mi sto chiedendo se il miei punti interrogativi derivano da VB6 che
usa unicode e si perde alphe bete e gamme per strada o da cos'altro.
E se, nel caso, avete idee su come fare una gestione del flusso di
dati in modo che la codifica rimanga UTF 8
Per la cronaca, questo è qualche esempio delle mie istruzioni
If XmlDoc.Load("file:///C:/myfile.xml") Then
Set nodlst = XmlDoc.selectNodes("NomeDelNodo")
'cicla sui nodi, a un certo punto poi....
myobject.PropertySet "Descrizione",
nodlst.Item(nodCnt).childNodes.Item(myobj).childNodes.Item(nrattrib).Text
end if
C'è modo di rendere trasparente questo passaggio di dati?...
Grazie mille a tutti,
Carlo

Questo può fare al caso tuo?
http://stackoverflow.com/questions/971495/read-utf-8-xml-with-msxml-4-0
Nicola

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

Salve,
uso VB6 e vorrei sapere come posso conoscere quando si sceglie un dato dalla
lista dropdown di un combobox settato in style 2 (quindi senza la
possibilità di inserire i dati nel text).
L'evento Change non viene generato in caso che il combo sia in style 2 e io
sono so come fare a rilevare la cosa. Aiutooooooooooo :)))
Grazie e ciao

Prova l'evento Click.
Fabio Pagano
Mirco Catalani ha scritto...


 io

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6 + Vista] Accesso errato al registry

Ciao a tutti,
ho installato correttamente vb6 su Vista Home Premium sul notebook,
però mi sorge il problema dell'accesso al registry da un'applicazione
già collaudata e funzionante sotto Xp ed inferiori.
Per accedere al registry uso un modulo "Mregistry" che accede alla
chiave HKLM in luogo della più banale HKCU e usa funzioni simili a
GetSettings e SaveSettings.
Tale modulo ha funzionato correttamente solo un paio di volte, poi
l'applicativo ha iniziato a restituire l'errore "Tipo non
corrispondente" nelle chiamate al registry: sembra quasi che sia
inibita sia la lettura che la scrittura...
Eseguo sia VB6 come amministratore che l'applicazione compilata, ma
nulla da fare...
La cosa più strana è che tutto ciò non accade sul pc desktop con Vista
Ultimate installato.
Qualcuno ha già avuto problemi simili?
Grazie
Claudio

 Qualcuno ha già avuto problemi simili?
Dalla tua descrizione, credo che la causa sia la virtualizzazione del 
registry (introdotta con Vista, appunto):
Registry Virtualization
http://msdn.microsoft.com/en-us/library/aa965884.aspx
Saluti
-- 
Gianluca Cannalire
Microsoft MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca
 

Saluti
Proprio lei!!
Comunque per ora ho risolto il problema in altro modo:
- disintallata l'applicazione
- disintallato VB6
- reinstallato VB6 con privilegi di amministratore
- reinstallata applicazione con privilegi di amministratore
- disabilitato UAC sulla macchina di sviluppo
Grazie Gianluca.

 Grazie Gianluca.
Beh, non lamentatevi poi se Windows Vista non è sicuro :))))))))


Newsgroup: it.comp.lang.visual-basic
Titolo: Combobox tipo selected

SQL = "SELECT * FROM Clienti"
   rs.Open sql, conn, 3, 1
    While Not rs.EOF
   CmbClienti.AddItem rs("Cognome")
   CmbClienti.ItemData(CmbClienti.NewIndex) = rs("IDCliente")
   rs.MoveNext
   Wend
Con questo codice popolo la mia combobox.
Ora vorrei che nella combobox appaia il nome corrispondente
all'IDCliente n. 5 già selezionato.
E' possibile. Non sono molto esperto quindi un esempio di codice è
gradito.
Saluti

io farei in questo modo:
Dim IdClienteDefault as Integer
IdClienteDefault=5	' cliente selezionato di default
While Not rs.EOF
    CmbClienti.AddItem rs("Cognome")
    CmbClienti.ItemData(CmbClienti.NewIndex) = rs("IDCliente")
if(CInt(rs("IDCliente"))=IDClienteDefault)Then 
CmbClienti.ListdIndex=CmbClienti.NewIndex
    rs.MoveNext
Wend
ho scritto il codice al volo, spero che possa aiutarti.
MARCOPO ha scritto:

-- 
Saluti.
Gregorio.
mailto:
gregorio.c
(a)
gcsoft.it
http://www.gcsoft.it