mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Per gli esperti API: Come creare un listbox con proprieta' BackColor = Trasparent

Come posso realizzare un listbox con il colore di fondo (backcolor)
trasparente?
Credo sia necessario utilizzare l'API sendMessage e company, ma non so
proprio come :-((
Ciao ciao.

trasparente?
Subclassi la finestra, intercetti il messaggio WM_CTLCOLORLISTBOX, crei un
Brush con il colore adatto e lo restituisci.
Es.
old è la winProc originale della finestra contenitrice del controllo lista
Public Function MyWnd(ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam
As Long, ByVal lParam As Long) As Long
    If wMsg = WM_CTLCOLORLISTBOX Then
        If lParam = Form1.List1.hwnd Then
            MyWnd = CreateSolidBrush(RGB(255, 0, 0))
        Else
            MyWnd = CallWindowProc(old, hwnd, wMsg, wParam, lParam)
        End If
    Else
        MyWnd = CallWindowProc(old, hwnd, wMsg, wParam, lParam)
    End If
End Function
Ciao Bruno

allora:
1) creo una form contenete un listbox.
2) nel form inserisco le dichiarazioni e la tua funzione:
Private Declare Function CreateSolidBrush Lib "gdi32" (ByVal crColor As
Long) As Long
Private Declare Function CallWindowProc Lib "user32" Alias "CallWindowProcA"
(ByVal lpPrevWndFunc As Long, ByVal hWnd As Long, ByVal Msg As Long, ByVal
wParam As Long, ByVal lParam As Long) As Long
Public Function MyWnd(ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam
As Long, ByVal lParam As Long) As Long
    If wMsg = WM_CTLCOLORLISTBOX Then
        If lParam = Form1.List1.hWnd Then
            MyWnd = CreateSolidBrush(RGB(255, 0, 0))
        Else
            MyWnd = CallWindowProc(old, hWnd, wMsg, wParam, lParam)
        End If
    Else
        MyWnd = CallWindowProc(old, hWnd, wMsg, wParam, lParam)
    End If
End Function
ora mi chiedo:
1. come richiamare la funzione MyWnd?
2. che valore va sostituito a old?
Come avrai notato non ci capisco molto di subclassing, intercettazione di
messaggi... colgo l'occasione per chiederti dove posso trovare
documantazione su questi argomenti.
Grazie 1000!



Mi trovo sempre in crisi quando mi si chiede un consiglio su di un libro, in
quanto questo dipende dalla cultura personale della persona, conosci
l'inglese, il c ecc?.
In generale comunque ritengo fondamentale "Programmare in Windows 3.1" del
Petzold (necessario per conoscere Windows), SDK*.hlp. Possono essere
interessanti anche una qualsiasi rivista del settore (CP, DAV, IoProgrammo
ecc), prima o poi un articolo sul subclassing lo mettono sempre. Puoi anche
provare a fare una ricerca sul WWW, sicuramente qualche articolo lo dovresti
trovare.
Ciao Bruno
Newsgroup: it.comp.lang.visual-basic
Titolo: Visual Installer

Il dubbio: ho creato un'installazione con Visual Installer da un progetto da
VB; Installer installa DB, EXE e report (Crystal) + altri file di sfondi ed
una pagina HTML.
Ora supponiamo di voler distribuire via internet un aggiornamento di un EXE
e magari di un report.
Cosa devo e come devo fare?
La mia preoccupazione è che inviando semplicemente i file modificati, poi
Installer mi li va a sostituire con quelli del package installato
originalmente.
Avete capito il quesito?
Grazie

Avete capito il quesito?
Mi sembra il quesito della Susy... :)
Io comunque distribuirei di nuovo tutto l'installer.
Saluti dalla pagina 34 della Settimana Enigmistica :)
-- 
      Gianni "bugbarbeq" Rondinini, 25, RA, 242, 152
  VBR - Vero Birro Romagnolo®, diffidate dalle imitazioni!
 Opel/ECC Calibrezio EVO-IV --- Kawasaki "Gas Gas" ZZ-R 1100
 ICQ# 36893168 - IRCNet: bugbarbeq, @ on #linux-it & #NetBSD

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

E' UN IDEA ...MA DOVENDO AGG. VIA INTERNET.....SIAMO CIRCA SUI 20MB!!!!!
Pazienza. Sara' il male di perdere un'ora in downloads.
Oppure prepari delle vere e proprie patches ai files che sono
cambiati, ma per Windows non conosco tool efficaci. Tipo il diff usato
in Unix, per intenderci.
Saluti.


 in Unix, per intenderci.
ce ne sono. mi sembra ci fosse anche qualcosa free:
http://www.thefreecountry.com/developercity/prgtools.html
nb il "mi sembra"

 ha scritto nel messaggio
news:Pu2b6.26245$lV5.3...@twister1.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: stampa html 2

Grazie, ho visto i sorgenti che mi hai consigliato, ma il mio problema
è quello di eseguire una stampa in automatico quanto la pagina html è
stata caricatam se scrivo ad esempio:
WebBrowser1.Navigate "C:\WebSite\vb-helper\howtoint.htm"
WebBrowser1.ExecWB OLECMDID_PRINT, OLECMDEXECOPT_PROMPTUSER, "", "" 
la seconda riga mi da errore "printer is disabled" perché viene
eseguita prima il file sia completamente caricato.
mettendo il comando detro il metodo:
Private Sub WebBrowser1_DownloadComplete()
WebBrowser1.ExecWB OLECMDID_PRINT, OLECMDEXECOPT_PROMPTUSER, "", "" 
End Sub
la stampa viene eseguita correttamente.
Il mio problema è che voglio caricare e stampare automaticamente una
serie di file html, scrivendo:
WebBrowser1.Navigate "C:\WebSite\vb-helper\1.htm"   
WebBrowser1.Navigate "C:\WebSite\vb-helper\2.htm"   
viene stampato solo il secondo file, come posso fare per stampare ul
elenco di file???
Ciao a tutti Roberto

 elenco di file???
Nell'evento:
Private Sub WebBrowser1_DownloadComplete()
'Inserisci una variabile statica
Static intPageCount as Integer
    intPageCount = intPageCount +1
    'Chiami da qui una funzione che occupa della stampa
    Call Stampa_Naviga(intPageCount)
    'e incrementi il conteggio delle pagine visitate
End sub
'Crei un array che contiene le pagine da visitare
Dim arrPagineDaNavigare(10000) As String
    'La pagina con indice 0 si suppone sia la prima, già "navigata"
    arrPagineDaNavigare(1) = "C:\WebSite\vb-helper\1.htm"
    arrPagineDaNavigare(2) = "C:\WebSite\vb-helper\2.htm"
    ...
    arrPagineDaNavigare(10000) = "C:\WebSite\vb-helper\10000.htm"
Public Function Stampa_Naviga(PageCount As Integer)
    WebBrowser1.Exec _
        WB OLECMDID_PRINT, _
        OLECMDEXECOPT_PROMPTUSER, _
        "", ""
    DoEvents
    WebBrowser1.Navigate arrPagineDaNavigare(PageCount)
    'Oppure, in alternativa all'array, se le pagine hanno
    'una numerazione sequenziale
    'WebBrowser1.Navigate _
            "C:\WebSite\vb-helper\ & Format$(PageCount) & ".htm"
End Function

Newsgroup: it.comp.lang.visual-basic
Titolo: Acquisto Solo VB6.0

Ho iniziato a fare qualche lavoro con VB6.0 e volevo regolarizzarmi con la
licenza.
Dove posso trovare in rete la possibilità di acquistare solo la licenza di
VB6.0??? e non di altri aplicativi che non mi interessano....
Grazie1000

[*Slim* : 
Slim...@tin.it
] ha scritto:

Pare che VB6 non sia ufficialmente più in vendita.
Pare anche che acquistando ?.NET vengano legalizzate le licenze di VB...
Vedi qui:
http://msdn.microsoft.com/vbasic/previous/downgrade.aspx
Newsgroup: it.comp.lang.visual-basic
Titolo: Domanda su Inno Setup

Avendo sempre utilizzato la creazione dei pacchetti di
installazione con l'utility standard di VB6
(Strumenti Visual Studio\creazione guidata pacchetti di installazione
ho provato ad installare inno Setup.
Quali sono le 'manovre' da fare per creare il pacchetto di installazione ?
Devo indicare l'exe di VB6 ? ..e tutti i file di dipendenza ? ..dll ????
grazie.

gianni88 (Ex T.Lemon) wrote:

Ne stiamo discutendo in questi giorni: un post è del 13 e uno è di ieri.
Oltre ad Inno Setup installa anche ISTool, che è una sorta di frontend 
grafico per preparare lo script usato da Inno per compilare il pacchetto 
di installazione.
Su ISTool trovi la sezione Files, in cui puoi aggiungere i file 
individualmente o per estensione, specificare se registrare i file che 
ne hanno bisogno, specificare la cartella di destinazione e un sacco di 
altre cose.
Entrambi gli applicativi sono forniti della loro documentazione.
-- 
S.

 installazione ?
Allora io h fatto cosi:
- setup normale di vb6
- da istoll importi il file .list
senza toccare altro altro crei il pacchetto e installi e salvi il file 
script che ha creato.
Poi piano piano comincia a guardare quel file scritp per capire come lavora. 
Carica il files di esempio, pure li c'è qualcosa di utile da guardare.
-- 
Greg 

 Entrambi gli applicativi sono forniti della loro documentazione.
Ti ringrazio ma dove lo trovo il download di ISTool ?
è gratuito ??

 ha scritto nel messaggio 
news:g8hhlm$80o$1...@tdi.cu.mi.it...

grazie.

 č gratuito ??
Si
-- 
Greg 

 ha scritto nel messaggio 
news:g8hjf6$9o5$1...@tdi.cu.mi.it...

Potresti indicarmi un link non riesco a recuperarne nemmeno uno... :-(

 Potresti indicarmi un link non riesco a recuperarne nemmeno uno... :-(
Link InnoSetup:
http://www.innosetup.com/isinfo.php
Link programmi terze parti (IsTool compreso):
http://www.innosetup.com/is3rdparty.php
-- 
Greg

Newsgroup: it.comp.lang.visual-basic
Titolo: stringhe > 256 caratteri

Ciao a tutti.
Sto creando una stringa sql da passare poi all'oggetto connession in
questo modo:
dim str as string
str = ...........
connessione.execute str
Il problema nasce quando la stringa sql supera i 256 caratteri e mi
viene troncata.
Come faccio ad avere una stringa che possa contenere più di 256
caratteri per poi passarla all'oggetto connession?
Grazie!!!
Max
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 l'oggetto connession
Sei tifoso di sochmacher?
Alberto

 Sei tifoso di sochmacher?
In tal caso al posto di un motore di ricerca, potresti usare
il motore della Ferrari F-tre-gnove-gnove, e poi fare la faccina
sconsolata e chiedergli "mi piacerebbe fare una ricerchina..."
:-)PPP
--
Er Roscio.
Newsgroup: it.comp.lang.visual-basic
Titolo: Richiesta di aiuto su query SQL

piccolo problema con vb5
nella ricerca di stringhe nel database access(tramite query SQL), ho
problemi se nella
stringa sono contenute virgolette ( " ).
lo stesso problema lo avevo con gli apici:
    ... like ' " & variabile_con_apice & " ' "
che ho risolto:
    ... like """ & variabile_con_apice & """"
ma se la variabil contiente ( " ) come faccio?
P.S.: cerco di evitare di sostituire il carattere con *
grazie Daniele
sec...@secoges.com

...


 grazie Daniele
Penso che ti devi fare una funzioncina che raddoppia tutti i doppi-appici (").
es:
SQL$="SELECT ..... link """ & DoppiaAppici( Variabile_con_apice ) & """"
Se Variabile_con_apice contiene: "Pippo disse "Ciao mamma"
Variabile_con_apice viene tramuata in: Pippo disse ""Ciao mamma""
Sinceramente non ho provato, ma penso che funzioni.
-- 
Hi, Ciao
Ettore                 By -MES-
http://www.aspide.it/freeweb/ilmes

Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto !! come posso chiudere DOS da VB6

Ho realizzato un programma in VB6 che ad una determinata ora  mi spegne il
PC. Ma....
se c'č un programma DOS in funzione non riesce a chiuderlo in automatico,
cioč
- chire una conferma di chiusura - .
Ho utilizzato l' API  ExitWindowsEx&
' ExitWindowsEx& --> permette di spegnere il PC
Declare Function ExitWindowsEx& Lib "user32" (ByVal uFlags As Long, ByVal _
dwReserved As Long)
'dwReserved č sempre zero, uFlags č una combinazione di uno o piů dei
'EWX_FORCE, forza a essere terminati tutti i processi che non rispondono.
'EWX_LOGOFF, Termina tutti i processi e poi fa il log off.
'EWX_SHUTDOWN, Spegne il sistema.
'EWX_REBOOT, fa il reboot del sistema.
Grazie
quag...@tin.it

 wrote in message 857tq1$1ao$1...@nslave2.tin.it...

Se lavori con winnt devi "terminare" wowexec

Newsgroup: it.comp.lang.visual-basic
Titolo: convertitori di sorgenti VB in Java

Ciao, Conoscete convertitori di sorgenti VB in Java? free o anche
trial. Grazie, Paolo

 trial. Grazie, Paolo
Ne conoscevo uno che convertiva qualsiasi sorgente ma non riesco piů a 
trovarlo ... 

 
Ma LOL!
-- 
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it
Sinapsi Antispam. Antispam Gratuito.
http://www.nicolaottomano.it/sinapsi.htm
email spamtrap: 
spam...@nicolaottomano.it

 trovarlo ...
Si chiama Levissima
dalla sorgente alla tavola!

 trial. Grazie, Paolo
Qualche link:
http://www.diamondedge.com/products/Convert-VB-to-Java.html
http://www.vb2java.com/vb2java.html
Ciao!
-- 
Gianluca Cannalire
Microsoft MVP/MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca
Newsgroup: it.comp.lang.visual-basic
Titolo: Come congelare la schermata corrente

Ciao a tutti.
Ho un problemino: sto lavorando su un programma (VB6) dove ho una form
"molto pesante" in termini di controlli contenuti (e gestiti: circa 280..).
Sulla base di determinate azioni che l'utente puņ compiere, una parte di
questi controlli cambiano la loro posizione nella form. L'effetto visivo che
ottengoo durante tali azioni č che vedo questi controlli che si spostano.
C'e' qualcuno che mi sa dire se č possibile "congelare" la shermata attuale
(da VB o tramite API) e, successivamente, poterla aggiornare sulla base
delle eventuali variazioni effettuate?
Grazie a tutti.
Ciao,  Roberto.

Prova con l'API LockWindowUpdate.
Ciao
Corrado
Newsgroup: it.comp.lang.visual-basic
Titolo: - TABULAZIONI IN TEXTBOX

- TABULAZIONI IN TEXTBOX
come posso fare x inserire una tabulazione in una textBox,dato che premendo
'tab' il focus passa ad un'altro controllo.
rispondete sul ng

 wrote in message 7q9cuu$po0$8...@nslave1.tin.it...

Inserisci il codice ascii 009
"testo"+chr$(009)+"tabulato"
Ora non mi va di caricare il VB per controllare ^___^;;;
ma probabilmente esiste una costante che ha il valore ascii 009, così come
esistono costanti che hanno il valore 013+010 (CrLf) cioè la costante vbcrlf
--
Ciao!
==================================
Daniele Pinna
Email: 
dap...@lycosmail.com
Nell'indirizzo Email eliminare la parola OOPS
Sito Web: Il DoCFa in Pillole: 
http://dapinna.freeweb.org
ICQ UIN: 24567484
______________________________________
  La fantascienza come Star Trek non e' solo un buon divertimento, ma
assolve anche uno scopo serio, che e' quello di
espandere l'immaginazione umana.
  Limitare la nostra attenzione a questioni terrestri equivarrebbe a fissare
dei confini allo spirito umano.
Stephen Hawking

 wrote in message
7qc6oe$1hj$4...@aquila.tiscalinet.it...


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

Salve a tutti,
devo convertire una serie di programmi da Basic a Visial Basic.
É un lavoro davvero oneroso e volevo sapere se c'è qualche "scorciatoia" 
per velocizzare il mio lavoro...
oppure devo mettermi di buona lena a trascrivere il codice da capo?
Grazie.

oppure devo mettermi di buona lena a trascrivere il codice da capo?
  La seconda che hai detto.
-- 
  Ciao :-)
  Massimo
Nell'indirizzo, sostituire "micio" con "mc"

 ha scritto nel messaggio news:P2nbe.1291036

Secondo me ti conviene farti un bello schemino della logica che sta dietro 
al programma basic e poi riscriverlo da zero in VB.
Ne guadagnerai sicuramente in tempo e in qualità del prodotto.
Ciao 

Sig!
grazie lo stesso.
mi si prospetta innanzi un lungo lavoro...
ciao.  :-)


ha scritto:

Beh, dipende da cosa devi fare.
Mi spiego meglio.
Se il tuo programma scrive sullo schermo dei dati con Print e usa
Input$ per immissione dati allora puoi usare una Label al posto del
Print e una InputBox al posto dell' Input$.
Se usa grafiche sullo schermo (si usavano metodi grafici anche con
GWB) con metodi Line e Circle, si possono usare su un form, magari
l'effetoo è diverso.
Inoltre VB è event driven e il basic è sequenziale, ma si può anche
simulare una sequenzialità tenendo tutto il codice in un modulo .BAS e
non gestendo gli eventi.
Più brutto ma più funzionale allo scopo.
Ti metto il link alla risposta a uno che doveva convertire un prog da
QB a VB, per darti un idea
http://shorterlink.com/?7S21Q4
ciao
  Stefano
Newsgroup: it.comp.lang.visual-basic
Titolo: [?]Inviare codice HTML al browser direttamente senza scrivere file

Ho realizzato un'applicazione che contiene una finestra con fuzioni di
browser.
Riesco facilmente a indirizzarla a leggere un file sul disco e riprodurlo,
ma vorrei potergli
inviarli il codice HTML direttamente, come se reindirazzasi la URL al
contenuto di una variabile
di memoria.
Si può fare?

Si può fare?
Si si puo fare ma non in VB che manca l'output su console come nel C.
in pratica all'inizio ci deve essere la riga 
content type:text/html o simile
Sidewinder
---------------------------------------------------
"C'e' una luce in fondo al tunnel....
   ... E' Tux con il casco da minatore!"

>
Webbrowser? Interessante.... corro a vedere se va bene per quelle mie
cose...


Nel mio caso (vb) io la uso normalmente in vb5. Insieme anche ad una serie
di sostituzione dinamiche dei link.

WebBrowser1.document.Close
E' una cosa meravigliosa però..
.. A ME NON FUNZIONA!
Dove sbaglio? Sembra che le opzioni Open, Write e Close non siano supportate
dall'oggetto.
Bisogna dichiarare qualcosa prima?
Uso VB6

 E' una cosa meravigliosa perň..


Newsgroup: it.comp.lang.visual-basic
Titolo: fm20 (Forms 2.0) come farle installare dal setup wizard?

ho riscontrato che allegando il componente Forms 2.0 in un progetto vb6
quando creo il pacchetto di inst. non trova le dipendenze del file FM20.dll
(appunto quello delle Forms 2.0)
Per risolvere il problema sulla macchina di destinazione ho dovuto
installare Access (e toglierlo) dopodichè funzionava tutto!!!
Non funzionava neppure installando solo il vb6.
aiuto !!
Sul sito microsoft al knoledge base
 non ho trvato niente!!!
--
Marco Ceccarelli
Razional Informatica S.r.l.
Piazza Usilia, 24 - 53036 Poggibonsi (SI)
Tel 0577 936439
Fax 0577 936469

I Microsoft Forms sono componenti di Office e non di VB.
Quindi non hai la licenza per distribuirli in nessun programma fatto in
VB...
Se li utilizzi devi avvertire che il tuo programma necessita di Office
installato.
Byee,
Maurizio
"Marco Ceccarelli" <mc_razional@hotmail.***> ha scritto nel messaggio
news:8t9l33$ghd$1...@nslave2.tin.it...


 > installare Access (e toglierlo) dopodichč funzionava tutto!!!


 ha scritto nel messaggio
news:gF2K5.33047$3K3.8...@news.infostrada.it...


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

Qualcuno mi sa dire come si fa con l'oggetto picturebox a far sě che la
parabola risultante inserendo una costante A e una costante B sposti gli
assi del piano cartesiano in base alla grandezza della costanti?
Parabola=(a*x^2)+b
Grazie
LUCA


Newsgroup: it.comp.lang.visual-basic
Titolo: Prestazioni Collection

Ciao a tutti
(scusate se apro 2 post in poco tempo).
Vorrei cominciare ad utilizzare le collection per rendere più leggibile e
flessibile il codice.
Praticamente mi leggo da una tabella i nomi dei campi e creo una collection
con quei nomi. Successivamente utilizzerei:
Fcontab("DATAREGIST")=miaData ecc.
Alla fine della routine potrei automatizzare una insert into/alter grazie
ai nomi dei campi caricati.
L'alternativa sarebbe creare NVariabili con nomi improbabili, oppure un
vettore di NElementi, ma "indicizzabile" solo per indice e non per nome,
oltre ad essere statico (se aggiunto un campo devo ridimensionarlo), e a
dover "collegare" manualmente l'indice al nome del campo.
E' un'uso esatto delle collection? O sono nate per fare altre cose?
Grazie :)
Di seguito il codice:
-*-*-*-*-*
Dim vv As String
Dim FContab As Collection
Set FContab = New Collection
vv$ = ""'variabile di appoggio
'Mi carico la collection della tabella
RsApp.Source = "SELECT FIRST 1 * FROM FCONTAB"
RsApp.Open
For i = 0 To RsApp.Fields.Count - 1
  FContab.Add vv$, RsApp(i).Name
Next i
RsApp.Close
...
FContab("CODCLIFOR") = CodCF$
-*-*-*-*-*

 Grazie :)
Mi sa che non lo posso utilizzare comunque, in quanto una volta aggiunto
l'item alla collection non lo posso modificare come volevo fare:
FContab("CODCLIFOR") = CodCF$
Vabbč :\

 FContab("CODCLIFOR") = CodCF$
Se vuoi una soluzione alternativa prova le mie XCollection presenti sul sito 
comune.
Ma sinceramente in questo caso non vedo il vantaggio nell'uso di una 
collection.
Io le ho usate ad es. se hai un recordset con una coppia di campi 
"nome"/"valore".
In questo caso la ricerca del valore corrispondente risulta più comoda (e 
credo anche più veloce) rispetto ai vari filter fatti sul recordset.
Ciao 

 collection.
Quindi useresti tipo un vettore?
Comunque grazie, ma credo tu abbia ragione, qui forse è superfluo :\


Puoi modificarlo facendo un .Remove e un .Add, ma comunque resta un utilizzo 
scomodo
E' molto piu' pratico usare la collection in accoppiata con oggetti: ovvero 
modelli una classe le cui proprieta' rappresenta il tuo set di dati, e per 
ogni record creai un istanza che aggiungerai poi alla collection, 
possibilmente utilizzando come key il campo o i campi che fungono da chiave 
primaria nella tabella.
Leggermente piu' laborioso da predisporre, ma poi il codice file via 
estremamente chiaro.
Ciao
-- 
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown
Newsgroup: it.comp.lang.visual-basic
Titolo: Come generare barcode bidimensionale da codice ???

Devo stampare oltre a del testo anche dei barcode pdf417 o altro tipo 
bidimensionale.
Sapete come farlo esclusivamente da codice, senza usare controlli aggiuntivi 
?
Ciao e grazie
RobertoA

?
Ci sono degli esempi sul sito comune:
http://shorterlink.com/?OSTZ9F
--
ciao
  Stefano

 --
Ti ringrazio per la risposta, ma nessuno dei codice trattati e' 
bi-dimensionale.
Tipo il PDF417 per capirci, il Codablock, il Maxicode, il Datamatrix, il QR, 
il MicroPDF417, e non so quali altri.
Ciao e grazie
RobertoA


wrote:



Grazie per l'indicazione ma, '...senza usare controlli aggiuntivi...'  credo 
sia abbastanza chiaro.
Ciao
RobertoA

Newsgroup: it.comp.lang.visual-basic
Titolo: Programma Per Creare Query in Modalità SQL e Struttura

Salve Gente.
Volevo Sapere chi di voi E a conoscenza di un Programma, il quale una Volta
selezionato un Database, potesse come Access Costruire Query in Modo Visuale e Ovviamente
Mostrarne il Codice SQL ( In Poche Parole Come Access )
Grazie Giò

 ha scritto nel messaggio
news:1103_10...@news.virgilio.it...


> "Giò" [...]:

MSQRY32.EXE ?
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

Newsgroup: it.comp.lang.visual-basic
Titolo: access - asp - euro

ragazzi nel mio db access ho dei campi valuta impostati ad euro con 2
decimali.
quando c'è un campo che nel db ha valore 5,00€ e lo stampo in una pagina asp
non visualizza 5,00 ma 5. Come posso evitare questo arrotondamento? Grazie


wrote:

A parte il fatto che 5 non e' l'arrotondamento di 5,00 ;-)
se usi VBScript puoi ricorrere a FormatNumber.
-- 
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: dimesioni immagini

Ciao a tutti, dmandina facile facile...
come faccio a recuperare le proprietą di un oggetto?
tipo:
    file grafico... dimensioni in kb, dimensioni pixel x pixel...
    file generico... nome, dimensioni in kb... ecc
grazie un sacco
:)

>     file generico... nome, dimensioni in kb... ecc
FileSystemObject
Però per sapere le dimensioni in pixel dei file grafici li devi aprire,
credo.
Forse c'è un insetto (vedi API) che fa al caso tuo, ma non ci metterei la
mano sul fuoco.
Ciao
Bald0z

Baldoz ha scritto:

E imho fai bene perche' l' espressione "file grafico" e' un pochetto generica.
Sparo alcuni formati: bmp, jpg, gif, wmf, png, dib, ...
Pero' figio potrebbe provare a caricare il file grafico, convertendolo in StdPicture
e leggerne cosi' le dimensioni (previa conversione da HIMETRIC a pixels.
Ad esempio, si abbia un form:
Dim stdPic As StdPicture
Set stdPic = LoadPicture(App.Path & "\ciccio.gif")
Me.Caption = CStr(CLng(Me.ScaleX(stdPic.Width, vbHimetric, vbPixels))) & _
                    " x " & _
                    CStr(CLng(Me.ScaleY(stdPic.Height, vbHimetric, vbPixels)))
Set stdPic = LoadPicture()
-- 
hth, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: Bmp

Buongiorno a tutti,
    sto cercando bmp da mettere nei comandi del mio programmino. Qualcuno sa
dirmi dove posso trovarne ???
Grazie mille.
Paolo.

Paolo.
Aran Banjo
<math> 2 + 2 = 5 for sufficiently large values of 2</math>

 <math> 2 + 2 = 5 for sufficiently large values of 2</math>
hai votato ? ^_^
-- 
<un Gigio2K in campagna elettorale>
Sito Comune
Nokia -> I.T.H.N. -> 
http://www.ithn.it/
VB -> I.C.L.VB -> 
http://www.it-lang-vb.net/
Newsgroup: it.comp.lang.visual-basic
Titolo: Utilizzo di Msflexgrid

Salve,
Mi trovo per la prima volta alle prese con MsFlexGrid.
Prima utilizzavo unicamente stringhe Sql passate al database via Vb, ma per
questo progetto mi hanno chiesto di utilizzare le Msflexgrid.
Cosa che non so fare.
Mi date una mano a visualizzare una tabella nella griglia ?
Per il resto ci penso io, quello che non so fare è visualizzare i dati nella
griglia.
Grazie, so che mi aiuterete :)

 ha scritto nel messaggio
news:EktRa.81818$qa5.1...@news2.tin.it...


 wend
Cosě č lentissimo, se invece usi
flex.datasource=rstx
č infinitamente piů veloce.
Ciao


prova a farlo? non con rst Dao, ma Ado. fammi sapere.
Ciao
Alfredo
Vb6+Sp5+Win2k


L'avrò fatto un milione di volte, con ado, dov'è il problema?

 ha scritto nel messaggio
news:bf5r9u$audk8$1...@ID-110499.news.uni-berlin.de...


     Tipo non corrispondente (Errore 13)
Mai successo, comunque, anche se non credo possa influire sul tipo di errore
da te descritto, ti sei scordato di dirgli che il cursore lo vuoi lato
client.

    Tipo non corrispondente (Errore 13)
Non vorrei dire una baggianata ma mi sembra che ciň funzioni con una
MSHFLXGD piuttosto che con una MSFLXGRD.
Ciao!

 ha scritto nel messaggio
news:bf5rst$bcpsj$1...@ID-110499.news.uni-berlin.de...


"ErPotenza" <no....@thank.you> ha scritto nel messaggio
news:jfschvko3lk61prhd...@4ax.com...


No, non ci metto la mano sul fuoco, perň sono quasi sicuro che sia la stessa
cosa.



Effettivamente su MSDN afferma che puoi usare anche "ADO Recordset
objects".
Perň ho fatto una prova con:
[
    mRs.CursorLocation = adUseClient
    mRs.Open "SELECT * FROM ANAGRAFICAARTICOLI", mCnn, _
                      adOpenForwardOnly, adLockReadOnly
 
    'Set flxProva.DataSource = mRs
    Set hfxProva.DataSource = mRs
]
Con mRs dichiarato a livello di form con:
[
    Dim mRs As New ADODB.Recordset
]
Con la flex ho il seguente errore:
[
Errore di run-time '91':
Variabile oggetto o variabile del blocco With non impostata
]
Boh!?!
Comunque ... VB6 + SP5 + Ado2.7 + WXP.
Ciao!

erPotenza, se provi a togliere il set dal datasource hai il mio errore.
--
Ciao
Alfredo
Vb6+Sp5+Win2k
"ErPotenza" <no....@thank.you> ha scritto nel messaggio
news:skuchvstuc008pjl0...@4ax.com...


     Tipo non corrispondente (Errore 13)
Devi usare la set.
set fxgdetails.datasource=rstx

"ErPotenza" <no....@thank.you> ha scritto nel messaggio
news:skuchvstuc008pjl0...@4ax.com...


Secondo me sbagli qualcosa.

 ha scritto nel messaggio
news:bf6826$bei12$1...@ID-110499.news.uni-berlin.de...



Mah???
Possibile però ti faccio notare che nel mio esempio:
1- Non uso DAO ma ADO
2- Non uso un DataControl.
Da una ricerca con Google l'unica soluzione che ho trovato è usare la
MSHFLXGD. 

[*ErPotenza* : no....@thank.you] ha scritto:

Ho letto al volo tutti i post e mi pare che manchi un'informazione che può
non essere marginale. Che io sappia David non usa Access, ma (forse) SQL
Server. E Voi? Che possa dipendere da questo?

 ha scritto nel messaggio
news:bf6hsq$bnpdk$1...@ID-174464.news.uni-berlin.de...



Provato con Access, Sybase, SQL Server.
Ciao!
Newsgroup: it.comp.lang.visual-basic
Titolo: Un consiglio...

Ho una database creato con access,all'interno si trova un campo che contiene
il nome di vari prodotti,vorrei poter visualizzare all'interno di una
form,una picturebox ( o image list),che visulizzi l'immagine del
prodotto,quando mi posiziono sul suo record.Le immagini dei prodotti si
trovano all'interno di una cartella sul desktop.E' possibile creare una
finestra di dialogo in cui posso selezionare il file dell'immagine,e il
percorso venga memorizzato nel record del prodotto (in un campo chiamato per
esempio "PERCORSO") in modo tale da poter cambiare immagine al  prodotto a
piacimento?
Ciao!

 che visulizzi l'immagine del prodotto,quando mi posiziono sul suo
record.Le immagini dei prodotti si trovano all'interno di una cartella sul
desktop.E' possibile creare una finestra di dialogo in cui posso selezionare
il file dell'immagine,e il percorso venga memorizzato nel record del
prodotto (in un campo chiamato per esempio "PERCORSO") in modo tale da poter
cambiare immagine al  prodotto a piacimento?
Considera la possibilita` di usare il componente:
Library MSComDlg
    <...>\COMDLG32.oca
    Microsoft Common Dialog Control 6.0
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------
Newsgroup: it.comp.lang.visual-basic
Titolo: MCI e MP3

Ciao
non volendo usare l'OCX di M$ , ho provato a suonare un MP3 con i comandi
MCI tramite l'opportuna API.
Questo è possibile avendo il media player 5.2 o succ, poiche lo fa
ActiveMovie tramite il driver mciqtz.drv .
Ho però un piccolo problema.
Mentre con l'OCX il file suona alla perfezione,
tramite mcisendstring si sente come un "fruscio" di fondo.
Forse si devono impostare bit rate particolari ?
Se si, qualcuno sa come e in che modo ?
Grazie
CIAO
---------------------------------------------------------------------
MERCANTI Davide (
d.mer...@sygest.it
)
---------------------------------------------------------------------

 MCI tramite l'opportuna API.
guarda un po qui
Part 3 :- Playing MP3 Files
---------------------------
Private Declare Function mciSendString Lib "winmm.dll" Alias
"mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As
String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
Private Declare Function GetShortPathName Lib "kernel32" Alias
"GetShortPathNameA" (ByVal lpszLongPath As String, ByVal lpszShortPath As
String, ByVal cchBuffer As Long) As Long
Private Declare Function mciGetErrorString Lib "winmm.dll" Alias
"mciGetErrorStringA" (ByVal dwError As Long, ByVal lpstrBuffer As String,
ByVal uLength As Long) As Long
Private Sub Command1_Click()
PlayMP3 ("c:\Celine_Dion.mp3") ?Path of MP3 File
End Sub
Public Function PlayMP3(Filename As String)
Dim dwreturn As Long
Dim ret As String * 128
Dim tmp As String * 255
Dim lenShort As Long
Dim ShortPathAndFie As String
?send a filename to the function
If Dir(Filename) = "" Then
MsgBox "Error with input file"
Exit Function
End If
lenShort = GetShortPathName(Filename, tmp, 255)
ShortPathAndFie = Left$(tmp, lenShort)
glo_hWnd = hWnd
cmdToDo = "open " & ShortPathAndFie & " type MPEGVideo Alias mpeg"
dwreturn = mciSendString(cmdToDo, 0&, 0&, 0&)
If dwreturn <> 0 Then ?not success
mciGetErrorString dwreturn, ret, 128
MsgBox ret, vbCritical
Exit Function
End If
?then to play just send this
dwreturn = mciSendString("play mpeg", 0&, 0&, 0&)
If dwreturn <> 0 Then
mciGetErrorString dwreturn, ret, 128
MsgBox ret, vbCritical
Exit Function
End If
End Function
************************** End Of Article ***********************
Autore di questo codice:
Ajay Chadha ....
Bye man!
:-)

 tramite mcisendstring si sente come un "fruscio" di fondo.
Sul sito comune trovi un ocx scritto in C++ che permette di sounare i files
mp3, ne esiste un'altro in grado di suonare il files .ogg. Non richiedono
nessun media player installato! ;)
hth

 ha scritto nel messaggio
news:eieV9.33191$0v.9...@news1.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?][.Net] Listview e proprietà forecolor

Salve a tutti
stavo leggendo sul libro del balenottero, che la listview in 
vb.net
 consente
di impostare un colore personalizzato anche per i vari subitems. Questo
significa che ad ogni subitems posoo assegnare un colore diverso?
Ho fatto un test con il seguente codice ma non mi ha fatto nulla:
dim lv as listviewitem
lv=listview.items.add("Colonna 1")
with lv.subitems.add("Colonna 2")
    .forecolor=color.red
end with
speravo che la 'Colonna 1' avesse il testo di colore nero mentre la 'Colonna
2' di colore rosso, ma cosě non č stato. Ho sbagliato qualcosa, oppure non č
possibile ottenere quello che volevo?
Ciao
Fabio

 qualcosa, oppure non è possibile ottenere quello che volevo?
Fabio è possibile però devi porre a false la proprietà
UseItemStyleForSubItems
del tuo ListViewItem:
Dim lv as ListViewItem  = lv.items.add("Colonna 1")
lv.UseItemStyleForSubItems = false
lv.SubItems.Add("Campo1").ForeColor = Color.Red
Comunque puoi utilizzare anche:
lvSubItems.Add("Campo1", Color.Black, Color.Green, BoldFont);
Non credo di dovertelo commentare. ;-))
HTH,
Antonio Cangiano
-- 
Webmaster & Content Manager 
www.visualcsharp.it
Il portale italiano della programmazione C# e .NET
A breve: 
www.windowserver.it
Il portale italiano dei sistemisti Microsoft Windows

Prova con Listview.UseSubItemStyleForSubItems=True
--
Corrado Cavalli [Microsoft MVP-MCP]
UGIdotNET - 
http://www.ugidotnet.org

 lvSubItems.Add("Campo1", Color.Black, Color.Green, BoldFont);
č chiaro, ma avevo gia provato ad usarlo, ma, come adesso, ho prblemi con la
definizione del font impostandolo come di seguito:
lvSubItems.Add("Campo1", Color.Black, Color.Green, Font.Italic);
Grazie di nuovo
Fabio
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] [?] casella mail gratuita

Ciao a tutti,
Poco tempo fa chiesi la stessa cosa ma non trovo più il mio post, quindi
"recidivisco" con l'OT :)
Qualcuno conosce un servizio mail gratuito che consente di inviare e
ricevere mail dal client di posta e non tramite webmail?
E che magari funzioni?
Ho provato quello di Lycos, ma secondo me si perde dei messaggi, sia in
entrata che in uscita.
Qualcuno mi aveva proposto una casella gmail, ma come dicevo, avendo perso
il thread non mi ricordo di chi si tratti...
Grazie, ciao


Hai posta!

 ricevere mail dal client di posta e non tramite webmail?
Io uso Yahoo e funziona. Non performante, ma il suo dovere lo fa!
Umbe

 Io uso Yahoo e funziona. Non performante, ma il suo dovere lo fa!
Cioč tu usi yahoo con pop3 e smtp gratis ?


Ti ringrazio, cercherò un account libero e mi registrerò.
Toglimi una curiosità, tu sei lo stesso Paolo che venne al meeting di
Bologna un paio d'anni fa e che constrinsi a riaccompagnarmi a casa? :)
Ciao

 Bologna un paio d'anni fa e che constrinsi a riaccompagnarmi a casa? :)
No, non sono io :-)

 No, non sono io :-)
Meglio, mi sarebbe aumentato il debito personale :)
Ciao

 ha scritto nel messaggio
news:CJzAe.146416$75.63...@news4.tin.it...

Sissignore...se tu mi scrivi una mail al mio indirizzo, la leggo con
l'outciuc e ti rispondo pure con lui...
Umbe

 ha scritto nel messaggio 
news:WaAAe.11360$QV1.1...@twister2.libero.it...

Anzi...ti posto pure i server:
Pop3: 
pop.mail.yahoo.it
Smtp: 
smtp.mail.yahoo.it
se vuoi ho pure i record mx..ma questa č un'altra storia...;-)
Umbe 

 ha scritto nel messaggio
news:WaAAe.11360$QV1.1...@twister2.libero.it...

Anzi...ti posto pure i server:



Questa non la sapevo. Sono registrato su 
yahoo.com
 e lě pare che sia a
pagamento...

 se vuoi ho pure i record mx..ma questa è un'altra storia...;-)
E che storia è il record mx?
--
Greg


Per consegnare la posta dal tuo host a un altro, il server cercherà l'host
remoto nel DNS per determinare la macchina server che riceverà la posta per
il destinatario. Lo stesso processo avviene quando un host remoto invia dei
messaggi di posta alla tua macchina server di posta.
Il DNS è responsabile della corrispondenza tra nomi host ed indirizzi IP, e
memorizza anche informazioni specifiche per la consegna della posta,
informazioni conosciute come record MX. Il record MX (Mail eXchanger)
specifica quale/i host dovranno ricevere la posta per un particolare
dominio.
Mi fermo qui, visto che siamo Ot rispetto ad un Ot. La classica deriva del
3d.....
Ciao
Umbe

 pagamento...
Se fa...se fa...chi cerca trova...loggati da webmail e da qualche parte ti 
spiegano come fare.....se non ricordo male bisogna fare un'altra 
registrazione, ma č tutto agggratissss..
Ciao
Umbe 

 ha scritto nel messaggio
news:7DzAe.58076$h5.24...@news3.tin.it...


 deriva del 3d.....
Hai ragione, grazie
--
Greg
Newsgroup: it.comp.lang.visual-basic
Titolo: Formulas Da Visual Basic

Qual è la sintassi per inviare a Crystal Report, in una formulas, il valore
di una label?
-- 
Posted from 
smtp3.libero.it
 [193.70.192.53] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:000501c0cf6d$8be1f480$06531497@giovanni...


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] List View - AIUTO !!!!

come seleziono tutti gli elementi di una List View ???
grazie
eMOeL

Provare per credere...
Dim oItem As ListItem
lwMain.MultiSelect = True
For Each oItem In lwMain.ListItems
   oItem.Selected = True
Next
lwMain.SetFocus
Ciao,
Corrado

 wrote in message
84sln9$64f$1...@fe1.cs.interbusiness.it...






Il metodo esiste, eccolo quá
Ciao,
Corrado
*===========================================================*
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" _
   (ByVal hwnd As Long, _
    ByVal Msg As Long, _
    ByVal wParam As Long, _
    lParam As Any) As Long
Private Const LVM_FIRST = &H1000
Private Const LVM_SETITEMSTATE = (LVM_FIRST + 43)
Private Const LVIS_SELECTED = &H2
Private Const LVIF_STATE = &H8
Private Type LVITEM
   mask As Long
   iItem As Long
   iSubItem As Long
   state As Long
   stateMask As Long
   pszText As String
   cchTextMax As Long
   iImage As Long
   lParam As Long
   iIndent As Long
End Type
Private Sub Command1_Click()
Dim LV As LVITEM
   With LV
      .mask = LVIF_STATE
      .state = True
      .stateMask = LVIS_SELECTED
   End With
   Call SendMessage(ListView1.hwnd, LVM_SETITEMSTATE, -1, LV)
End Sub
Private Sub Command2_Click()
Dim LV As LVITEM
   Dim numSelected As Long
   With LV
      .mask = LVIF_STATE
      .state = False
      .stateMask = LVIS_SELECTED
   End With
   Call SendMessage(ListView1.hwnd, LVM_SETITEMSTATE, -1, LV)
End Sub
Private Sub Form_Load()
Dim lPnt As Long
ListView1.View = lvwReport
ListView1.MultiSelect = True
ListView1.HideSelection = False
For lPnt = 1 To 10
   ListView1.ListItems.Add , , "Item" & CStr(lPnt)
Next
End Sub
Newsgroup: it.comp.lang.visual-basic
Titolo: Caricare in una textbox un file di testo .txt o di word

Vorrei caricare in una textbox il testo contenuto in un file:
questo è il mio codice:
If tempotrascorso = 0 Then
        cmdFine.Visible = True
        imgLogo.Visible = True
        lblDescrIngr.Visible = True
        lblTitBil1.Visible = True
        lblTitBil2.Visible = True
        Open "f:\Testi\m3.txt" For Output As 1
        Do Until EOF(1)
            Line Input #1, LineOfText$
            Text$ = Text$ & LineOfText$ & Wrap
        Loop
        txt_m3.Text = Text$
        FormattDescrizione txt_m3, desc_m3
        tempotrascorso = tempotrascorso + 1
    End If
Dove sbaglio?
Con questa procedura il file diventa completamente bianco!
E'  la riga
            Line Input #1, LineOfText$
 che dà problemi?
Forse questa inserisce dei dati nel file invece di estrarli?
Purtroppo non ho un manuale d'aiuto!
Grazie per l'assistenza
Paolo
p.s E' molto complicato pensare di inserire un file di word mantenendo la
sua impaginazione (formattazione)?

         Loop
dovresti fare
Open "f:\Testi\m3.txt" For Input As #1
altrimenti te lo apre in scrittura cancellandone il contenuto
Ciao
Faber

Scusate se mi intrometto ma volevo sapere se quando apro un file word mi
rimane la formattazione del testo (inteso come a capo e/o grassetti,
sottolineature...) e anche qual'è il miglior modo per assegnare un file word
ad una textbox o ad altro controllo simile
Grazie
Elisa

         Open "f:\Testi\m3.txt" For Output As 1
                                                   ^^^^^^
Cambia in "For Input"


se usi una TextBox sicuramente non puoi mantenere la formattazione. penso
che dovresti usare il controllo Rich Text Box ma non ho mai provato...
Faber

 ha scritto


non ho provato, ma dubito che un file word come .doc riesci ad aprirlo.
dato che il richtextbox usa l'rtf puoi:
-- salvare il .doc come .rtf
-- selezionare e copiare in word, incollare nel rtb, mi sembra di averlo
fatto e che tenga quasi tutte le formattazioni (possibili casini col
giustificato, che direi l'rtf non consideri, e con tabelle ecc.).
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Transazioni e connessione interrotta

Lavorando con Oracle su altro PC in rete (ma penso sia la stessa cosa con
altri DBMS) ho notato che, qualora si interrompa la connessione durante una
transazione (ad es. staccando il cavo di rete per simulare un guasto),
questa rimane "in sospeso" anche dopo una nuova connessione, impedendo altre
operazioni sulla tabella bloccata.
Durante l'interruzione della connessione è ovviamente impossibile eseguire
il rollback della transazione, visto che non esiste la connessione stessa di
riferimento; tra l'altro quest'ultima (l'oggetto) non può essere chiusa se
prima non si chiude la transazione; in ogni caso con la nuova connessione
non dispongo più degli oggetti precedentemente interessati, quindi non
riesco comunque ad eseguire il rollback della transazione interrotta.
Il blocco delle tabelle sembra risolversi solo tramite un'azione diretta sul
DBMS tramite gli specifici strumenti di amministrazione, anche se spero sia
possibile impostare Oracle in modo che annulli automaticamente le
transazioni in caso di interruzione della connessione.
Ringrazio vivamente chi mi suggerirà il modo migliore per gestire da codice
tali situazioni.
Rogis

 operazioni sulla tabella bloccata.
Con Sql-Server è possibile (anzi, è di default) impostare 
l'auto-rollback.
Alla caduta della connessione, Sql-Server aspetta un tempo t 
configurabile, dopodichè dice byebye, uccide lo spid e rollbacka la 
transazione.
Oracle è uno strumento molto completo, sono sicuro abbia la stessa 
potenzialità.
Ciao
Alberto
-- 
Ma noi no

Newsgroup: it.comp.lang.visual-basic
Titolo: Forcing mouse pointer to move to a co-ordinate

Hi there.
I am trying to make a macro-recorder like application in Visual Basic
5, and I need to be able to send the mouse pointer to a particular
screen co-ordinate (without the need to physically touch the mouse of
course), simulate mouse-clicks and stuff like that.
I'm sure it can be done, but I don't have any idea how.
Could you please help? Thanks
Regards,
Clyde.
Sent via Deja.com 
http://www.deja.com/
Before you buy.

 wrote in message news:7usvd5$149$1...@nnrp1.deja.com...


Now I'm curious... How do get the current mouse coordinates?
Thanks.
Rick Rothstein wrote in message ...


 wrote in message
news:4vuQ3.3886$Rs2.1...@news.uswest.net...

Newsgroup: it.comp.lang.visual-basic
Titolo: start service

Ciao
sono un new biew di 
vb.net
oserei chiedere un consiglio: come faccio a far startare un servizio alla
mezzanotte di tutti i giorni?
grazie
Martino

mezzanotte di tutti i giorni?
Con una operazione pianificata (scheduled task).
Ma visual basic non c'entra ;-)
-- 
ciao, un hal di passaggio

 Ma visual basic non c'entra ;-)
che ignorante che sono!!! :-)
grazie comunque

Newsgroup: it.comp.lang.visual-basic
Titolo: Installazione e permessi directory

Ciao a tutti,
ho programmato una piccola applicazione con visual basic 6 che mi
permette di gestire un database access.
Tramite il wizard di vb6 ho quindi creato i file di installazione per
poter distribuire questo applicativo e qui nasce il problema.
Su macchine win2000 e/o Xp l'installazione avviene da utente con
permessi da amministratore, ma l'utilizzo del programma è a carico di
utenti normali.
A questo punto, selezionando ad esempio come directory di installazione
 c:\programmi, gli utenti non avranno il permesso di scrittura e quindi
non potranno modificare il db.
E' possibile far in modo che il programma di installazione cambi i
permessi della directory contenente il db?
Anche un link che ne parla sarebbe gradito.
Ho trovato qualcosa in rete sull'argomento ma sono tutti metodi rozzi
che richiedono l'intervento dell'utente, io avrei bisogno di
automatizzare la procedura.
Grazie.

 ha scritto nel messaggio
news:1134570800.2...@o13g2000cwo.googlegroups.com...

Il consiglio generale è quello di NON mettere database nella cartella di
installazione del programma, se si prevede che gli utenti possano avere diritti
limitati.
Il tuo programma dovrebbe appoggiarsi ad una folder speciale di Windows, ad
esempio "C:\Documents and Settings\All Users\Application Data" e creare
all'interno di essa una subfolder in cui mantenere i propri database, ad es:
C:\Documents and Settings\All Users\Application Data\MyProgram\MyDatabase.MDB
Per ottenere da programma il percorso esatto di quella folder ti rimando al link
citato in un thread di poco fa:
http://www.vbcity.com/forums/faq.asp?fid=9&cat=Shell#TID102871
Bye
Raf

 Users\Application Data\MyProgram\MyDatabase.MDB
Aggiungo solamente che tale folder, come spiegato da Rafunk, deve essere 
utilizzata per la memorizzazione di dati 'condivisi' tra tutti gli utenti.
Eventuali file di configurazione specifici per ogni singolo utente (ad 
esempio, posizione finestre, path predefiniti, colori, ecc. ecc.) devono 
essere memorizzati in C:\Documents and Settings\[nome utente]\Application 
Data\.
Ciao
-- 
Gianluca Cannalire
Microsoft MVP/MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca

Grazie mille a tutti, siete stati molto gentile e mi avete proposto una
soluzione a cui non avevo pensato.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: [?][FAQ][SEMI OT] 2 superfaq non strettamente attinenti a VB

Ciao a tutti.
Riassumo velocemente 2 domande per le quali non ricordo una risposta
definitiva.
1) Bollino SIAE: se si distribuisce un SW è necessario?
Il SW nella fattispecie sono degli ActiveX che potrebbero essere di pubblica
utilità.
2) Il metodo con il miglior rapporto affidabilità/semplicita per la
protezione di un componente?
    Avevo intenzione di lasciar usare il componente solo a chi dichiarava di
possedere la licenza (con ad. es. una funzione di verifica) ma la cosa ha
molte lacune nella possibilità di implementazione...
    So anche che sul SC c'è qualcosa del genere, ma mi interessava
implementare del codice senza oggetti di terze parti.
Ciao

 ha scritto
| 1) Bollino SIAE: se si distribuisce un SW è necessario?
| Il SW nella fattispecie sono degli ActiveX che potrebbero essere di pubblica
| utilità.
Su PCProfessionale ho letto (ma non ricordo esattamente) che per il software distribuito via
internet non e' necessario alcun bollino. Il bollino va applicato solo sui supporti (floppy o CD).
D'altro canto come faresti ad apporre il bollino ad un software inviato via internet? :-P

 D'altro canto come faresti ad apporre il bollino ad un software
inviato via internet? :-P
sono cosě s*****i che sarebbero capaci di fartelo mettere come jpg nella
pagina del download  >:-|
Faber
Newsgroup: it.comp.lang.visual-basic
Titolo: Come creare una directory in runtime?

Ciao a tutti
Come da oggett.
if dir(miadir) = "" then creadirectory
end if
Come fare?
Grazie.
ByeZ!
Alkondor
Togliere NOSPAM per rispondere in e-mail

Alkondor
Semplice.... :-))
MkDir App.Path & "\" & NomeDirectoryScelta
________________________
     Logon Technologies
   Area Sviluppo Software

Come fare?
If Dir(miadir) = "" Then MkDir miadir
Ciao
--
Luca Dormio
l...@sig-la.com
ldo...@tin.it


Hai perso ancora l'help?
MkDir
P.S. L'EndIf li' proprio non ci vuole...
--
Roal Zanazzi
z...@iol.it

MkDir App.Path & "\" & NomeDirectoryScelta
Ok, grazie.


P.S. L'EndIf li' proprio non ci vuole...
Oooops........
Ho fatto il copia e incolla di una condizione piů lunga (quindi col
ritorno a capo) ed ho lasciato l'end if...
Pardon



Ci arrivi con un minimo di deduzione.
cerchi Dir, guardi su "See also"
vedi ChDir, guardi su "See also"
indovina un po'?
Si, lo so, ultimamente sono un po' (solo un po'?) scontroso, ma:
1) ultimamente ci sono persone su questo NG che non dovrebbero esistere
sulla Terra (no, non sei tu, Alko)
2) il newsgroup non e' fatto pr rispondere a domande la cui risposta si
trova _abbastanza_ semplicemente sull'help in linea o sui manuali.
Senza offesa,
--
Roal Zanazzi
z...@iol.it

Senza offesa,
Non preoccuparti. :)


a chi chiede aiuto si può rispondere oppure no, in ogni caso probabilmente
la risposta più indicata è sempre la più lontana da: lo trovi sull'help.
dir ti serve per sapere se la directory esiste. evidentemente se non esiste
tu la vuoi creare. mkdir da errore se vuoi creare directory annidate, l'API
create directory non crea le directory annidate ma almeno non devi gestire
l'errore. per creare delle directory annidate devi costruirti un algoritmo
che analizza il path in entrata e costruisce l'albero passo a passo (sono
poche istruzioni se vuoi te le mando).
esempio:
if dir(miadir, vbdirectory)= "" then
    mkdir miadir
endif
ciao andrea