mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB.NET] Aprire un form da un servizio

E' possibile aprire un form da un servizio ?
Avevo trovato un'articolo che spiegava come fare ma me lo sono perso.
Era una soluzione che conteneva il progetto di un servizio e un 
progetto di una form e alla partenza del servizio veniva aperto il 
form.
Mi potete dare qualche informazione ?
Grazie, Alverman


Sei sicuro che si trattasse di un servizio?
http://www.developerfusion.com/forum/thread/36993/
http://bytes.com/topic/c-sharp/answers/444788-opening-form-windows-service
Forse era un'applicazione residente nella system tray area...
Ciao, Vincenzo 

 wrote in
news:hjmdcj$2t4$
1...@tdi.cu.mi.it
: 

anche perche' un servizio non necessariamente ha la possibilita' di 
visualizzare una maschera.
se non ricordo male, tra le varie permission assegnabili a un utente, 
c'e' anche l'accesso interattivo: un utente che non ce l'ha, la form non 
la puo' visualizzare perche' il so lo impedisce....
oppure su un server: nessun utente loggato, la form a chi viene 
visualizzata?
-- 
Paolo opg
BE AWARE that this post uses a fake reply-to address
to contact me write to:
janickg ( at ) hotmail ( dot ) com
--

Adesso mi metto alla ricerca nella cronologia di explorer ma a memoria 
ricord che il progetto della form nella soluzione doveva essere 
impostata in class library anzichï¿œ windows form e dal servizio si 
richiamava con application.start la form.
Boh .... adesso vedo se riesco a reperirla.
Alverman

Boh ..... non lo trovo piï¿œ !!
Comunque ho provato ad aprire un'applicazione dal servizio.
Si apre ma mostra un messaggio di rilevamento servizi interattivi e se 
tra le opzioni clicco visualizza messaggio si apre una finestra con 
sfondo azzurro e al centro il programma che ho fatto lanciare.
Ora il servizio ï¿œ installato come localsystem e quindi ho potuto 
selezionare la voce interagisci con il desktop, ma se seleziono user 
questa voce non ï¿œ siponibile.
Significa che se lo installo come user administrator interagisce senza 
richiedere conferme ?
E poi ho provato ad installare il servizio come user, quindi nella form 
di richiesta nome e password ho inserito il mio account (che ï¿œ admin) ma 
non lo prende e quindi il servizio non si installa.
Ho provato anche ad inserirlo da codice ma anche li non parte.
Che cosa devo fare per installarlo come admin ?
Grazie, Alverman

Dovevo mettere il domain :)
Newsgroup: it.comp.lang.visual-basic
Titolo: Rendere Trasparente una Immagine: Effetto Chroma-Key

Qualcuno sa come si può rendere trasparente una immagine ad es. ImageBox ad
una immagine di sfondo della finestra?
Ho visto che per quanto riguarda una Label ciò è possibile grazie alla
proprietà:
NomeLabel.BackStyle = Trasparent
ma con un controllo immagine che contiene ovviamente una immagine è
possibile fare un effetto di trasparenza con lo sfondo, in gergo televisivo
Chroma-Key (pronuncia "cromachi") ?
Grazie.

 una immagine di sfondo della finestra?
Non conosco un modo per rendere un Image trasparente, ma costruire un Ocx
che contenga una immagine ed un colore trasparente è abbastanza semplice.
Prova per esempio a inserire queste linee di codice nell'
UserControl_initialize:
Private Sub UserControl_Initialize()
nomepic = "c:\documenti\daniele\immagini\mappa\30001.bmp"
'nomepic contiene l'immagine da caricare
UserControl.BackStyle = 0
UserControl.Picture = LoadPicture(nomepic)
UserControl.MaskPicture = LoadPicture(nomepic)
UserControl.MaskColor = vbBlack
'Maskcolor è il colore da rendere trasparente
End Sub
Ciao
Daniele
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: Vendo Visual Studio 6.0 Enterprise Edition

Vendo Visual Studio 6.0 Enterprise Edition + SP4full
totale 4 cd a lire 50.000


Interessante, con licenza?
E dove risiedi?
--
 
federic...@planet.it
Eliminare NOSPAM dall'indirizzo! Delete NOSPAM from address!

E dove risiedi?
Sono pienamente d'accordo con te!!!!
...non so se è maleducazione chiedere queste cose, ma cosa significa fdp??

Dove l'hai rubato ?????
Ciao
Leo


Originale con licenza?
-- 
Don't Let Your Fears Stand In The Way Of Your Dreams
DEly...@dely-net.com
http://www.dely-net.com/
ICQ# - 8761263
-- 

 >Interessante, con licenza?
si', di uccidere...
guarda il nick...


> Originale con licenza?
Di gomma! :-)
e poi Visual Studio sono 7CD!


A me risultano essere 5 CD (3+2MSDN), non e' che hai gia' la versione 7.0?
:-)

 wrote


cioe', vs9 avra' 9 cd, vs11 11 cd, ecc. ecc. ecc. ?

 wrote in message 8oim2c$q22$1...@fe2.cs.interbusiness.it...


totale 4 cd a lire 50.000
Se la somma che pagherai per patteggiare fosse così bassa... ^___^
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

Per MSDN lo fanno, basta chiedere.
Prob ci sara' una release in DVD anche per VB7.
Ciaotutti,
Alessandro
-> Dave <- <da...@hate.spam> wrote in message
news:8oin7e$alc$1...@bw107zhb.bluewin.ch...



E' l'acroněmo del mio nome e cognome. Ciao


No, VS6 = 7 CD.



VS6 Enterprise, preso dalla subscription MSDN Universal = 5CD (3VS+2MSDN)
La versione in vendita ne ha 7? Cosa c'e' negli altri 2?
Potrei supporre 1CD per l'ultimo SP, ma rimane comunque un CD...??!?

 Potrei supporre 1CD per l'ultimo SP, ma rimane comunque un CD...??!?
l'ultimo CD contiene sicuramente Visual J++ 6.0
ciao

 ciao
mi sembrava ci fosse gia' in vs6pro (2 + 2 msdn)
ciao, a.

 ciao, a.
boh, il mio vs6pro ha 2 cd per vs, 2 cd di msdn, 1 cd di vj++, 1 cd per sp2
= 6 cd totali
probabilmente la versione enterprise ha 3 cd di vs invece di 2
ciao

 probabilmente la versione enterprise ha 3 cd di vs invece di 2
yes you're right (*), a parte il sp che da me non c'e' mi ero scordato che
vj++ sta a parte.
ciao, a.
(*) come al solito :)
Newsgroup: it.comp.lang.visual-basic
Titolo: ancora io e gli screensaver

Ciao,
no non ero al corrente dei parametri ed infatti il mio
programma/screensaver da un po' di matto.
Puoi dirmi quali sono i parametri/specifiche per farlo andare
correttamente.

...

Ciao,
se ti posso dare un consiglio fai una cosa
fai un piccolo programma di test che quando chiamato ti
mostra i parametri che gli arrivano sulla linea di comando
che sono diversi se lo SS viene eseguito, configurato (forse
c'é un parametro anche quando viene provato ma non
lo ricordo) per esempio quando lo scrin-sever :-) viene eseguito
l'exe (in questo caso il file SCR) viene eseguito con il parametro /s
....
Ciao
P.S. quando rispondi fallo sempre nello stesso tema altrimenti
diventa difficile seguire il filo logico e rischi che chi ti ha gia risposto
non
veda il nuovo messaggio......
Roberto Corti
Amministratore di rete
rco...@NOSPAMMONItinet.ch

- 
fras...@franco.geocities.com
 -
Ciao,  non c'é problema, in una discussione ogni
persona civile puo dire la sua anzi dovrebbe.....
E' vero nella directory che dici c'é un esempio...
non avevo mai guardato !!
--
Roberto "Loba" Corti
Amministratore di rete
rco...@NOSPPAMONItinet.ch

Newsgroup: it.comp.lang.visual-basic
Titolo: Creazione Database

Sto creando una applicazione utilizzando come database access2000.
Come posso fare per creare un database di altro tipo, e poi quale mi
consigliate (SQL)?
Va bene il data manager di Visual Basic o mi serve un applicativo a parte
per la creazione?
Ciao Simo

 per la creazione?
se il db č access io uso access, se il db č sqlserver uso l'enterprise
manager etc...
Comunque, ma non ho mai provato, dovrebbe funzionare un normalissimo
cn.execute "CREATE DATABASE PIPPO"
poi puoi andare con un filo di gas usando i vari "create table", "drop
table", "alter table"
bye


--------------------------------
Inviato via 
http://usenet.libero.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Come si fa un ActiveX?

Mi hanno chiesto di fare un ActiveX di uno strumento di misura.
So che la domanda e del tutto generica ma vorrei sapere coem si fa oppure
dove reperire del materiale per riuscire a risolvere il mio problema.
Se qualcuno ha dei "link" o qualche titolo di libro relativo a questo
argomento , o addirittura del codice di esempio , gli sarei eternamente
grato
Grazie in anticipo per l'aiuto
Marius

grato
Sul sito comune trovi dele recensioni di libri che potrebbero fare al caso tuo.
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

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

 nostra pagina non è un gran bella cosa... (questo vale anche per
flash!!!!!)
Io gia' non la vedrei perche' uso netscape :-P
Ciao
Aldo
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] Resize di una form ed una Textbox al suo interno

Ciao,
Ho una semplice form con al suo interno un textbox multilinea.
Il textbox a design-time è posizionato in modo da coprire tutta l'area della
form: dall'angolo in alto a sinistra a quello in basso a destra.
Quando faccio il resize della form, nell'evento resize ricalcolo le
proprietà "height" e "width" del textbox in questo modo: Text1.Height =
Me.Height - xxxx   e   Text1.Width = Me.Width - xxxx, dove xxxx sono dei
valori fissi che ho visto che funzionano. O almeno mi pareva.
Con Windows XP nessun problema, ma con Windows 2000 la Textbox non si
ridimensiona allo stesso modo (coprendo tutta l'area della form), ma rimane
un po' più piccola sia in altezza, lasciando quindi vedere in basso ed a
destra una parte della form... una schifezza.
Il motivo non mi è chiaro, qualcuno mi può dare indicazioni sulla causa e
magari un suggerimento per la soluzione che vada bene ovunque ?
Grazie.

 magari un suggerimento per la soluzione che vada bene ovunque ?
La causa continua a non essermi chiara, ma in compenso ho trovato la
soluzione "calcolando" lo spazio occupato dai singoli pezzetti della form
con l'API "GetSystemMetrics", adattando al contrario questo esempio:
http://vbnet.mvps.org/code/forms/autoresizeform.htm


Text1.Height = Me.ScaleHeight
Text1.Width = Me.ScaleWidth
Bye
Raf 

 Text1.Width = Me.ScaleWidth
Azz... grazie.

Newsgroup: it.comp.lang.visual-basic
Titolo: Personalizzazione msflexgrid

Salve a tutti,
vorrei sapere se e' possibile personalizzare il titolo di una colonna
(o di una riga) della griglia msflexgrid, ovviamente senza doverla
cambiare all'interno del database.
grazie

cambiare all'interno del database.
Che c'entra il database?
-- 
ciao, hal

 Si' :-)
hal, bentornato !
sai mica anche che ore sono ?
"si'" :P

"si'" :P
:->
-- 
ciao, hal.VBI

Che c'entra il database?
C'entra perche' nella flexgrid sono visualizzati dei dati provenienti
da un database (collegato via ADO) ed a me servirebbe poter cambiare
il titolo delle colonne (non vorrei utilizzare quelli originali del
database)
Ho fatto varie prove pero' mi sembra che non sia possibile variarli in
nessun modo.
Newsgroup: it.comp.lang.visual-basic
Titolo: Interrogare Netbios? - 2

Da applicazione VB ho necessità di interrogare NetBios delle altre macchine
connesse alla mia stessa lan.
Come posso fare, e a quali "domande" NetBios interrogato da VB può
rispondere?

 wrote in message
news:wo6f7.5834$4b5.1...@news6.giganews.com...

MSDN->
Platform SDK->
Networking and Directory Services->
Network Protocols->
The NetBIOS Interface
Ciaotutti,
*

Newsgroup: it.comp.lang.visual-basic
Titolo: Text box - option box

Ciao a tutti.
Volevo chiedere questo: sto realizzando un programma (agenda) dove, tramite
un'option button scelgo se mettere nuovo testo. Il form possiede 11 textbox
(relative ad orari diversi); il problema è questo: come posso fare a
inserire il testo nella textbox da me scelta? Quando cerco di farlo, mi da
errore runtime 424, penso che sia perchè non ho spoecificato in quale
casella scrivere, come posso fare?
Grazie in anticipo
Mauro
le...@NOSPAMtin.it  Togliere nospam dall'indirizzo

...


Newsgroup: it.comp.lang.visual-basic
Titolo: [HELP] PictureBox

E' possibile:
1) Scrivere dei numeri all'interno di una PictureBox in una posizione
particoare?
2) Salvare su BMP l'immagine contenuta in una PictureBox?
Come posso fare?
Grazie a tutti...
GiAn

 Come posso fare?
leggere la guida...

 leggere la guida...
E prima che lui faccia la prossima domanda: le altre cose da leggere
sono gli help delle proprietą Image e AutoRedraw :-)
Bye, G.
Newsgroup: it.comp.lang.visual-basic
Titolo: MEETING - Problemi per l'iscrizione!

Ciao a tutti! Forse non sarò molto conosciuto sul newsgroup perchè spesso
osservo senza scrivere molto, ma se sfoglierete i post vecchi troverete un
po' di miei messaggi...
Sono andato ad iscrivermi al meeting ma guradate cosa mi esce quando clicco
su "Invia":
                                            Esito iscrizione al meeting
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in
query expression ''E' stata un'impresa convincere i miei... quindi vediamo
di non farlo saltare 'sto meeting! - KJK::Hyperion'.
/meeting/resmeeting.asp, line 72
Che devo fare?
Avete deciso il ristorante?
Ciao
Ghigo    :)
PS    Se non sbaglio qualcuno partirà da Torino in treno, vero? Se volete un
po' di compagnia (spero di sì perchè non voglio fare tutto il viaggio in
silenzio) fatemi sapere...
gh...@fastwebnet.it
ICQ#    50376812

 tutto il viaggio in silenzio) fatemi sapere...
ecchime! e c'è anche sasim, se non decide di andare in macchina

 Avete deciso il ristorante?
Quasi. Nessuno ha messo divieti per il posto che abbiamo messo in votazione,
quindi a brevissimo dovrebbe essere confermato.
Ci vediamo al meeting
*Roby*


:) C'è un piccolo bug nel codice di registrazione del messaggio: gli apici
danno fastidio a SQL (e pensare che è una superfaq :PPP ).
O rinunci agli apici o li raddoppi: es: "E'' stato".
Ciao

Ok Grazie a tutti!
Ghigo    :)

 tutto a posto.
abbe', se poi ti eri scritto r'oby piazzol'la, cavolacci tuoi :>
a.

Certo che è destino che non mi iscriva al meeting: Dopo che ho tolto gli
apostrofi ho fatto "invia" e mi si è bloccata la pagina di explorer!!!
Qualcuno conosce una sub per rimettere tutto a posto?
Io ho provato con
Public Sub Esorcizza()
ma non funziona :(
Ghigo    :)

 ha scritto

mancano i parametri
/noie /nowin

Ci proverò... Cmq ho visto che il cervellone mi ha inserito nella lista...
Youhhuuuu!
Ci vediamo tutti a Bologna!!!
Ciao
Ghigo    :-)))
PS    Io proporrei una razione extra per il senex e lo iuvens del meeting!

 ha scritto

ok, cominciamo ad accaparrare noi due...
grazie, a.
grazie, j.

 ha scritto nel messaggio
news:a5t84b$9qkvc$1...@ID-51318.news.dfncis.de...

Zorry... cosa volevi dire?
Ghigo    :)

 Zorry... cosa volevi dire?
a = 45
j = 2
almeno una delle extra dovremmo prendercela :)
ciao, a.
Newsgroup: it.comp.lang.visual-basic
Titolo: Eseguire un programma...prima di tutti all'avvio di Windows

Salve,
volevo far eseguire un'applicazione, come da oggetto, all'avvio di
Windows...prima di qualunque cosa, ho provato a metterla nel registro in:
HKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\WINDOWS\CURRENTVERSION\RUNSERVICES
e in effetti parte prima di tutto...anche prima della richiesta della
password di RETE...proprio come volevo...però io volevo anche un'altra
cosa...che tutto il mondo (vabbè tutto il mondo mi pare un'esagerazione, che
tutto il sistema) si fermasse in attesa che l'esecuzione della mia
applicazione terminasse, invece...chiaramente mi continua a caricare le
altre cose.
Chiaramente mi interessa tutto questo sotto sistemi WIN95/98/ME
Penso che esista un modo...perchè a volte è Windows stesso a utilizzarlo che
blocca tutto finchè non finisce quello che deve fare.
Grazie
Gianni Moretti


Hai provato a metterlo in autoexec.bat? 
ciao
	maxx


No...non è quello che mi serve...io voglio eseguire un programma WIN32, non
un programma DOS.
Gianni Moretti

C'è una possibilità...
Devi effettuare il boot del sistema non con le procedure normali ma con un tuo
applicativo...
Così ottieni 2 risultati: quello di sapere cosa esegui e quello di evitare che
qualcuno ti modifichi le procedure di partenza...
Io ho scritto un prg per gestire l'accesso e la sicurezza in W 9x/me, ed ho
fatto così...
Da me trovi 'Application Launcher' e 'IPLverify'.
Il primo consente di eseguire in sequenza i programmi che ti servono a far
partire il pc, aspettando un tot di secondi tra uno e l'altro... Non aspetto il
termine del processo perché se un prg si pianta non avvii più il pc... Di questo
ci sono i sorgenti.
Il secondo controlla se qualcosa o qualcuno ha modificato le procedure di boot.
I sorgenti di questo non li pubblico.
In pratica, tutte le chiavi del registro che contengono dei run sono
disattivate, e l'esecuxione di tali programmi la fa 'Application Launcher'.
'IPLverify' controlla se la configurazione di avvio della macchina è stata
cambiata (config.sys, autoexec.bat, win.ini, registry).
--
GbC
http://www.chiappori.net
http://www.gbcweb.com
--
Newsgroup: it.comp.lang.visual-basic
Titolo: alle prime armi

Ho scritto questa robba...
Private Sub Command1_Click()
Dim sql As String
nome = nome.Text
pwd = pwd.Text
Set oConn = CreateObject("ADODB.connection")
    'oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=
C:\Documents and Settings\Administrator\Desktop\vb\prova.mdb"
Set oRS = CreateObject("ADODB.recordset")
    sql = " select nome,cognome from nome where nome_u=" & nome & " and
pwd =" & pwd
    oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=
C:\Documents and Settings\Administrator\Desktop\vb\prova.mdb"
    oRS.Open sql, oConn
 
'nome = ors.Fields(0)
'pwd = ors.Fields(1)
MsgBox sql
End Sub
Pero' ho un problemino...
mi dice nessun valore per alcuni parametri specificati.
e si blocca  qui oRS.Open sql, oConn
Qalcuno puo' aiutarmi a capirne qualkosina??
GRazie
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 mi dice nessun valore per alcuni parametri specificati.
Se ho capito bene il tipo di errore, penso che, molto semplicemente, tu
abbia scritto male alcuni nomi di campo nella SELECT; gia' il fatto che la
tabella abbia lo stesso nome di un campo mi "puzza" un po'...
A scanso di equivoci, crea una query direttamente in Access con il testo
esatto che usi via codice (con valori di prova al posto delle variabili, of
course); se cosi' funziona correttamente il problema e' altrove, altrimenti
e' come pensavo...
Ciao
-- 
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

 pwd =" & pwd
Prova (riprendendo anche i dubbi di Luca Dormio) con (adeguando nomi di
tabella e campi):
sql = " select nome, cognome from nome_della_tabella where
nome_del_campo_da_testare='" & valore_stringa_del_campo_da_testare & "' and
pwd ='" & valore_stringa_della_pwd_da_testare & "'"

 pwd =" & pwd
Se nome_u e pwd sono testo, mancano gli apici..
[CUT]
bye
Enrico

Newsgroup: it.comp.lang.visual-basic
Titolo: Alternative al VB

Qualcuno mi saprebbe segnalare il sito da dove scaricare una buona
alternativa al VB? (ad esempio Blitz Basic & co.).

 alternativa al VB? (ad esempio Blitz Basic & co.).
in che senso 'scaricare'?
p2p?

In qualunque modo, sono assetato di programmazione.
Newsgroup: it.comp.lang.visual-basic
Titolo: [Salvare dati con un ciclo]pf,non riesco...

come da oggetto dovrei salvare alcuni dati in campi differenti nominati
T01Famiglia
T01Famiglia1
T01Famiglia2
etc. fino a T01Famiglia10.
Bene,i dati da salvare sono in una listbox dove posso scegliere quali
salvare,1 due fiano a dieci.
Come posso,con un ciclo salvarli nei campi ?
Ci vorrebbe una sorta di codice come questo ?
For FamigliaX = 0 To 9
?????-->    rst![T01Famiglia...???] = frmModifica.lstFamiglia.Text
Next
Grazie a tutti per l'eventuale aiuto
R.Zanni
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Next
Ma vanno a 1 a 10 o da (niente) a 10? Regolati...

Scusa,in effetti non sono molto chiaro nell'esposizione,vedo di esserlo
maggiormente
ho 10 campi T01Famiglia1....T01Famiglia10 in una tabella ACCESS.
Dentro ad un form ho una listo box popolata,da una tabella a parte di
alcuni dati,la listbox
ha la selezione multipla.
Dovrei,una volta selezionati gli item dalla listbox salvarli nei
rispettivi campi.
Come posso fare ?
Grazie nuovamente


Grazie Lupo,ho provato e con quese righe parrebbe funzionare:
For FamigliaX = 0 To 9
 If frmNuovo.lstFamiglia.Selected(FamigliaX) = True Then
  rst("T01Famiglia" & (FamigliaX + 1)) =
frmNuovo.lstFamiglia.List(FamigliaX)
 End If
Next
Grazie nuovamente per l'imbeccata


Newsgroup: it.comp.lang.visual-basic
Titolo: Colonne invisibili in un FlexGrid

E' possibile in Visual Basic 5.0 rendere invisibili alcune delle colonne
di un controllo MSFlexGrid?
Ringrazio tutti coloro che mi risponderanno.
Ciao,
                        Daniela.

Certo basta che metti il colwidth(indice colonna)=0
Ciao


E-Mail: 
lig...@alo.it
Web: 
http://www3.pelagus.it/ligasoft
ICQ: 11362849

Newsgroup: it.comp.lang.visual-basic
Titolo: eseguire un file

Premetto che sono un principiante.
Sapete qual'č la funzione per eseguire un file? e puo' essere applicata
nelle macro di WORD?

 wrote in message
37063908...@ctonline.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: VB6 & Access Bug o Errore?

Ciao a tutti,
ho installato VB6 sul mio pc dove risiede anche Access 2K. Sto realizzando
un progetto dove uso, come di consueto, un DB Access. Quando lancio la form
e arriva al comando:
Set DbColl = OpenDatabase("C:\ColMaS\Db\dbcoll.mdb")
(ho settato una Global DbColl As Database nel modulo e nella form ho
inserito l'oggetto DATA)
Mi da un errore di DATABASE NON CONOSCIUTO....
Ma non è che per caso devo installare la SP4? Oppure?
Gracias
Kripton

 ha scritto nel messaggio
news:8tc9ml$n19$1...@nslave2.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: applicazione client-server con vb6

Ho il seguente problema:
Sto realizzando un'applicazione client con VB6 che accede ai dati di un
database MS SQL Server remoto. Per l'accesso ai dati del database utilizzo
ADO 2.6.
La stessa applicazione oltre a utilizzare i dati del server remoto, deve
poter creare, modificare ed eliminare file che risiedono in una cartella del
server remoto
Stavo quindi pensando di realizzare un'applicazione da installare sul server
remoto comandabile dalla mia applicazione.
In effetti quello che mi servirebbe sarebbe un servizio windows con possa
eseguire comandi sul file system del server remoto.
Qualcuno di voi ha già affrontato problemi simili? e come li avete risolti?
vanno bene anche dei consigli o delle idee.
Grazie a tutti
Paolo

 server remoto
Se ti interessa creare una struttura client-server perchč lo ritieni comodo
per altre cose, direi che ci sono parecchi esempi su MSDN (io ne ho fatto
uno di prova, e praticamente il codice l'avevo preso tutto da lě).
Se invece devi solo eseguire sul server remoto, direi che la soluzione piů
rapida č far eseguire quello che ti serve direttamente da Sql-Server (vedi
xp_cmdshell).
Ciao
Alberto

Newsgroup: it.comp.lang.visual-basic
Titolo: Immagini e PictureBox

Come posso fare per muovere un immagine all'interno di un PictureBox o di un
Image?
Mi spiego meglio: io NON voglio che l'angolo in alto a sinistra del mio
picturebox sia il punto 0,0 dell'immagine, ma un punto a scelta 20,20 (per
fare un esempio).
Spero che mi sia spiegato...
Come posso fare?
Damiani "Bromarock" Omar

...


La picturebox ha il metodo PaintPicture, che permette di specificare le
coordinate. Guarda nell'help in linea per i dettagli.
Saluti,
Domenico


 wrote in message
7idf13$cnt$1...@nslave1.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: MSDN Library x VisualStudio 6

Ciao a tutti,
    sono rimasto alla versione italiana datata gennaio 2001...
Fino a che mese sono arrivati??? Io intendo l'help in pratica
Grazie!!!

 Fino a che mese sono arrivati??? Io intendo l'help in pratica
Per l'Help di VS/VB, sono arrivati ... fin là.
Escudendo, ovviamente, MSDN library che è un altro prodotto.

 ha scritto nel messaggio
news:bluhvn$glrv8$1...@ID-174464.news.uni-berlin.de...

Per inciso, l'ultima MSDN library che si integra direttamente con VB6
(quindi fornisce l'help contestuale su keyword ecc.) se non sbaglio e'
quella di Ottobre 2001; quelle successive sono invece integrate con 
VS.NET
,
mentre la guida di VB resta naturalmente disponibile, ma occorre partire
dall'indice.
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 faccio a?????????

Salve a tutti qualche anima gentile mi puo' aiutare?
Con il codice qua sotto gli sto dicendo che deve scriver il numero 100 nella 
prima cella libera della cartella dati ecc ecc .
Adesso mi serve che scriva il numero 100 in tutte le celle vuote o piene 
dalla numero 1 alla numero 120 sempre nella prima colonna. come cambia il 
codice?
Vi ringrazio infinitamente, se non risolvo questo non posso continuare il 
mio progetto.
Private Sub cmdScrivi_Click()
Dim temp As Integer
On Error GoTo errore
Set FoglioExcel = FileExcel.Worksheets("Dati")
temp = 1
    Do
    Set CellaFoglioExcel = FoglioExcel.Range("A" & temp)
            If CellaFoglioExcel = "" Then
            CellaFoglioExcel = "100"
            Exit Do
        End If
    temp = temp + 1
    Loop
MsgBox txtTesto.Text & vbCrLf & " scritto nella cella  A" & temp
Set CellaFoglioExcel = Nothing
Set FoglioExcel = Nothing
Exit Sub 

Vedi se funziona il codice che ti ho scritto qua sotto.
gian
---------
Private Sub cmdScrivi_Click()
Dim temp As Integer
On Error GoTo errore
Set FoglioExcel = FileExcel.Worksheets("Dati")
temp = 1
    Do
      Set CellaFoglioExcel = FoglioExcel.Range("A" & temp)
      CellaFoglioExcel = "100"
      temp = temp + 1
    Loop Until (temp<=120)


 Exit Sub
Io non sono un esperto di VBA per Excel, ma CellaFoglioExcel o è una cella o 
è una stringa.
Già mi stupisco che il codice originale di Paola potesse funzionare.
Poi, un bel for i = 1 to 120 anzichè il  do loop?
Ancora meglio: se tutte devono contenere valore 100 non puoi semplicemente 
fare:
Set CellaFoglioExcel = FoglioExcel.Range("A1:A120")
...
?
Ciao 


Dim rng As Range
With Worksheets("NomeDelTuoFoglio")
    Set rng = .Range("A1:A120")
        rng.Value = 100
    Set rng = Nothing
End With
oppure
With Worksheets("NomeDelTuoFoglio")
    .Range("A1:A120").Value=100
End With
oppure
Worksheets("NomeDelTuoFoglio").Range("A1:A120").Value = 100
oppure
NomeDelTuoFoglio.Range("A1:A120").Value = 100
-- 
---------------------------
Mauro Gamberini
http://www.riolab.org/
Newsgroup: it.comp.lang.visual-basic
Titolo: non si apre acrobat reader

Se si clicca sulla voce di menù "manuale d'uso" , dovrebbe partire acrobat
che legge il file manuale.pdf.
Invece non si apre nulla.
Mi pare dipenda dal fatto che esistono più versioni del sw acrobat
installate in percorsi diversi del computer . Vi risulta sta cosa ?
per rimediare bisogna disinstallare le vecchie versioni di acrobat e poi
reinstallare la nuova , che dovrebbe finire nel percorso corretto , giusto?
Grazie e saluti
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it



Newsgroup: it.comp.lang.visual-basic
Titolo: [?] input NON deve utilizzzare la "," come separatore

Ho un problema.
Vorrei importare da un file, dei dati, ma in questo file ci sono spesso ","
che mi si intromettono nel funzionamento anzichč essere dei semplici
caratteri.
Come faccio???
GRAZIE 1K (pari a 51,6centersimi di ?)

Premessa:
-ogni riga del file da aprire si chiama 'record'
-ogni 'record' può contenere uno o più 'campi'
-un file di dati 'strutturato' contiene lo stesso numero di campi per
ogni record
-un file dati con numero di campi variabile da record a record si dice
'non strutturato'
Soluzioni:
Dim A as string, l as integer, f as integer
ReDim B(5) as string
f = freefile
open DataFile for input as #f
    while not eof(f)
        'A) File dati 'strutturato'
            'Se il record contiene un solo campo lo puoi
                ' leggere con il 'line input'
            line input#f, A
            'Se il record contiene vari campi (es. 5) li
                ' leggi in sequenza
            for l = 0 to 4
                input#f, B(l)
            next l
        'B) File dati 'non strutturato'
            'devi usare il line input e poi suddividere la stringa
                ' in ragione delle necessità
            line input#f, A
    wend
close #f
-> GbC
http://www.gbcweb.com

 ha scritto nel messaggio
news:F7968.580$dd4....@twister1.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO!!!! Textbox

Ho un Textbox con proprietā MULTILINE=TRUE e SCROLLBARS=VERTICAL
Volevo sapere come posso leggere il testo contenuto riga per riga, perchč se
uso la proprietā TEXT mi restiruisce l'intero contenuto del TextBox
Grazie a tutti!
--
Īš°`°šĪø,ļļ,øĪš°`°šĪø,ļļ,øĪš°`°šĪø,ļļ,øĪš°`°šĪø
                       Home Page
 
http://www.maziar.3000.it
 
maz...@inwind.it
                     C6: 83goku83
                    ICQ: 78428181
Īš°`°šĪø,ļļ,øĪš°`°šĪø,ļļ,øĪš°`°šĪø,ļļ,øĪš°`°šĪø


Il testo non è in effetti diviso riga per riga, ma continua ad essere
una stringa unica senza interruzioni di tipo VbCrLf. Viene solo
portato automaticamente a capo in run time. Quindi non credo vi sia
modo di recuperare la divisione delle righe effettuate dal controllo
Textbox.
--
 
federic...@planet.it
Eliminare NOSPAM dall'indirizzo! Delete NOSPAM from address!

 Volevo sapere come posso leggere il testo contenuto riga per
riga, perchč se uso la proprietą TEXT mi restiruisce l'intero
contenuto del TextBox
Consulta:
DOCUMENT:Q141073  03-JUN-1999  [vbwin]
TITLE   :Using Windows API Functions to Better Manipulate Text
Boxes
PRODUCT :Microsoft Visual Basic for Windows
PROD/VER:Windows: 4.0
OPER/SYS:WINDOWS
KEYWORDS:kbcode
DOCUMENT:Q147887  14-OCT-1999  [vbwin]
TITLE   :HOWTO: Scroll VB Text Box Programmatically and
Specify Lines
PRODUCT :Microsoft Visual Basic for Windows
PROD/VER:WINDOWS:4.0
OPER/SYS:WINDOWS
KEYWORDS:kbprg kbVBp400 kbWndw PrgCtrlsStd VB4WIN vbwin
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
Newsgroup: it.comp.lang.visual-basic
Titolo: Creare dinamicamente matrici di controllo

Salve,
dopo aver risolto il problema con la creazione dinamica di controlli
(grazie google!! ), vorrei fare un passo avanti.
Vorrei essere in grado di creare una matrice di controlli, e chiaramente
gestire anche gli eventi lrgati a questi controlli.
In particolare vorrei riuscire a creare una matrice di label,
incrementando una label ogni qualvolta l'utente clicca su un commandbutton.
Da una ricerca su google, e' uscito fuori che non e' semplicissimo,
specialmente per quel che riguarda la gestione degli eventi.
Qualche idea?
Tanto per chiarezza, attualmente la label creata dinamicamente, la faccio
cosi':
Nelle dichiarazioni del form
Dim WithEvents lblText as Label ' si, lo so che il nome puo' portare ad
equivoci :-))
Nell'evento Form_Load (tanto era una prova)
Set lblText = Controls.Add ("vb.Label","lblText")
Grazie... Maurizio
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

metti una label (lblText)  con proprieta' "Index" = 0 e visible =
"false"
nella tua routine per caircare le label...
Dim i as integer
i = lblText.Count + 1
Load lblText(i)
lblText(i).visible = true
lblText(i).move 10, 10
ovviamente, posizione a tua scelta....

 Load lblText(i)
...
Ok, avevo trovato questa soluzione, ma mi sembrava funzionasse solo con
VB4.
Domanda... come faresti a gestire gli eventi della label, considerando la
matrice?
Ciao... Maurizio


 matrice?
...
Provato, funzionante e soddisfacente :-)
Grazie ancora... Maurizio


beh...
visto che hai posizionato la label sul form, hai "gratis" gli eventi,
con l'indice di chi lo scatena...
Quindi, se vuoi routines diverse per diversi controlli, ci metti
semplicemente un Select case sull'indice e poi mi sembra
sia facile.
Newsgroup: it.comp.lang.visual-basic
Titolo: formato exe creati da vb

Scusate,
in che formato vengono creati gli exe di vb?
Ho guardato un po' di specifiche e mi pare che Portable Executable non li
siano (l'header dovrebbe iniziare con "PE/0/0") e nemmeno windows executable
format (dovrebbe iniziare con "NE"). Quello che ho io inizia con "MZ".
grazie ciao
-- 
A.S. Tronzo (544503)  - VII.33
Stagione 23: 4° in VII.33
elimina unsampdoriano per rispondere via email

 grazie ciao
E vabbé, trovato.
Per chi ne avesse bisogno č DOS exe format.....
bye!


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

Ad essere sincero ho già fatto questa richiesta, ma si è divagato
allontanandosi dall'obiettivo.
Presupponendo che andrò ad utilizzare la combo form 2.0 multicolonna, ho la
necessità di popolarla andando a leggere da un file txt, scritto nel
seguente modo:
1,Luigi
2,Mario
3,Paolo
4,Fabio
etc...
riportando la stessa struttura all'interno delle due colonne del controllo
combo.
Ancora grazie per l'aiuto.

 wrote in message
9coc2u$fn9$1...@serv1.albacom.net...


 Ciao Simone
Ciao!
Ignoravo il comando Line e fino ad ora avevo fatto a mano la gestione dei 
files testuali per esempio .INI . E'un comando interessante, ho guardato la 
guida ma non riesco a trovare il modo per leggere una determinata linea, 
c'è?
Grazie.
-- 
WulfMp3
wul...@email.it
"Poni ciò che sei nel minimo che fai."

 wrote in message
90959AA75wu...@212.41.208.70...


 riportando la stessa struttura all'interno delle due colonne del controllo
combo.
  Un esempio:
    With ComboBox1
        .ColumnCount = 2
        .AddItem "Pippo"
        .Column(1, .ListCount - 1) = "Pluto"
        .AddItem "Paperino"
        .Column(1, .ListCount - 1) = "Topolino"
        .ListIndex = 0
    End With
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

Newsgroup: it.comp.lang.visual-basic
Titolo: Quale Testo per imparare VB?

Parto da zero e vorrei imparare Visual Basic.
Chi mi puo' consigliare un testo valido ed aggiornato?
So che girando su internet trovo siti sull'argomento ma vorrei un parere in
piu' da voi esperti del newsgroup visto che i libri di informatica non
costano 2 lire.
ricordo che non so assolutamente niente di programmazione...
Grazie
enrico

Se vai nel sito comune del newsgroup c'è una sezione proprio sui libri, con
la descrizione esatta. Scegli tra quelli.
L'indirizzo è :   
http://www.murialdo.it/it_lang_vb
Ciao Ciao, Giacomo 
ande...@tin.it

 wrote in message
89hj95$885$1...@nslave1.tin.it...


 ha scritto

Direi che prima di parlare di titoli di libri dovresti chiarire quali sono i
tuoi obiettivi e le tue potenzialita'. Per esempio, se hai 14 anni o 90 le
cose cambiano. Se il tuo scopo e' di mantenerti facendo il programmatore o
lo fai per cultura generale o lavori in un ambiente informatizzato,
eccetera. Quanto tempo hai a disposizione e in quanto tempo vuoi raggiungere
un certo livello.
--
Ciao.
Maurizio
Newsgroup: it.comp.lang.visual-basic
Titolo: Stampa HTML - Forse a doppio

Salve a tutto l'ng... ho spedito poco fa un messaggio ma siccome non ho 
visto comparire nulla ve lo mando dinuovo, sperando di non crearne 
involontariamente un doppione...
Allora, in un mio progetto sto realizzando dei report in html che poi 
visualizzo con il browser IE integrato nella mia applicazione.
Quando però faccio sul browser CTRL+P e alla schermata della stampa dò 
il "via", la stampa parte ma non mi vengono stampati gli sfondi delle 
celle che ho colorato nella tabella del report.
Infatti i file html che visualizzo nell'applicazione non sono altri che 
tabelle create in run-time con l'htm su un file temporaneo e che 
possiedono le righe con colore di sfondo grigio chiaro/scuro per 
semplificare l'individuazione della riga interessata durante la lettura. 
Solo che la tabella mi viene stampata senza colore di sfondo.
Quale problema pensate che possa essere? Un problema di IE? Un'opzione 
standard del browser? Posso o non posso stampare 'sti sfondi colorati?
E poi... è possibile eliminare il percorso del file html originale dalla 
stampa? Stampando una pagina html infatti mi compare in basso a sinistra 
il famigerato "file://percorsohtml...". Può essere omesso?
Thx in anticipo!!!
-- 
Rivolterò il mondo per trovarlo, e anche se andasse in Indocina uno dei 
nostri starà nascosto in una ciotola di riso pronto a sparargli nel culo.
(Pulp Fiction)

 celle che ho colorato nella tabella del report.
opzioni avanzate di ie.
stampa colori di sfondo.
solo che poi una pagina web ti costa una cartuccia...
forse ti conviene usare dei bold, italic, face diversi ecc.
ciao, j.

 ciao, j.
ciao e grazie ancora!!!


Newsgroup: it.comp.lang.visual-basic
Titolo: Che libro sulle Api mi consigliate ?

Ciao
ho provato a guardare in libreria un testo sulle api ma non c'era nulla.
Se devo ordinarlo quindi, mi serve almeno il titolo.
Ringrazio anticipatamente per il tempo "perso" a rispondermi.
Ciao
Giorgio

 Se devo ordinarlo quindi, mi serve almeno il titolo.
[...]
Sul sito comune
http://www.murialdo.it/it_lang_vb/
c'è una sezione libri completa delle informazioni per poter effettuare un
ordine.
Ciao
---
--
-
Maurizio Santaniello
MIX
170 links a siti VB
http://space.tin.it/computer/gaais/
http://web.tiscalinet.it/VBLINKS/
-
--
---
Curatore della "zona links" de:
Il sito comune di it.comp.lang.visual-basic
http://www.murialdo.it/it_lang_vb/
Leggete le regole di questo newsgroup:
http://www.murialdo.it/it_lang_vb/docs/Manifesto.txt
Newsgroup: it.comp.lang.visual-basic
Titolo: ActiveX e registrazione in WindowsXP

Ciao a tutti,
    purtroppo ho una applicazione che, sviluppata in parecchi anni, fa un
uso pesante di
activeX creati con VB6.
Tutto andava bene fino all'arrivo di winXP perchè gli utenti "user" non
possono scaricare
e registrare gli activeX.
Per risolvere velocemente il problema ho fatto 'accesso come administrator,
ho lanciato
le applicazione (vari motori e pagine web) e poi sono rientrato come utente
normale
e tutto funzionava correttamente perchè questi utenti possono usare gli
activex già scaricati.
Il problema si ripresenterà quando farò degli aggiornamenti al software
perchè vorrei evitare ogni
volta di entrare come administrator.
C'e' una qualche policy per attivare il download degli activex a tutti gli
utenti?
Qual'e' il problema base, che non possono accedere ai registri di sistema?
Grazie mille
Ciao

 sistema?
Direi proprio di sě. Solo utenti con diritti amministrativi possono
installare nuove applicazioni e/o anche registrare componenti...
Vedi anche il topic "[?] Accesso ai registry e Windows XP."
Newsgroup: it.comp.lang.visual-basic
Titolo: Rivviare il pc

C'č un comando che riavvii il pc!?! :-)

Ecco qua:
----------------------------
Private Const EWX_SHUTDOWN = 1
Private Const EWX_REBOOT = 2
Private Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long,
ByVal dwReserved As Long) As Long
Public Sub WinClose()
   'Chiuditi sesamo!
   ExitWindowsEx EWX_SHUTDOWN, 0
End Sub
Public Sub WinReboot()
   'Riavviati sesamo!
   ExitWindowsEx EWX_REBOOT, 0
End Sub
--------------------------
 _    _
 >    <
    []
 \___/......(Ciao!)
Pasquale
mine...@libero.it

 C'č un comando che riavvii il pc!?! :-)
--
!------------------------------------------------!
!ICQ     : 8281944
!E-Mail  : 
Dan...@levon.it
!
!"Il Paradiso e' pieno di santi che NON
! hanno avuto abbastanza occasioni di peccare."
!
!HomePage : 
http://www.levon.it/daniele
!
!------------------------------------------------!

   Void :-)
Se per "Riavvia il sistema da msdos" intendi "Riavviare il sistema in
modalità MS-DOS", sono daccordo con te, che io sappia non si può fare con
gli uFlags.
Però mi sembra che la domanda di Wizard fosse: "C'è un comando che riavvii
il pc?" e non "C'è un comando che riavvii il pc in modalità MS-DOS?"
 __     __
<o>  <o>
      []
  \____/   ......(Ciao!)
Pasquale
mine...@libero.it

Newsgroup: it.comp.lang.visual-basic
Titolo: aiuto!!!!: API Windows

Cari amici, sono un programmatore alle prime armi, quindi mi scuso fin da
adesso se la domanda vi sembra molto STUPIDA:
cercavo qualcuno che mi sapesse dire come posso aggiornare il desktop
tramite il linguaggio VISUAL BASIC 5.0 in win98.
immagino che si faccia tramite API ma non so quale devo usare.
Inoltre:
c'è un testo valido in italiano che spieghi il funzionamento delle
principalei API x win 98??
Grazie x l'aiuto, Giuseppe

 Grazie x l'aiuto, Giuseppe[...]
W98 utilizza ancora la maggior parte delle API di W95, se devi cominciare
può esserti utile il libro di Daniel Appleman (guarda la sezione libri del
"sito comune", nonchè quella del mio sito in cui è presente l'indice).
Ciao
---
--
-
Maurizio Santaniello
MIX
170 links a siti VB
http://space.tin.it/computer/gaais/
http://web.tiscalinet.it/VBLINKS/
   <---  Nuovo server !
-
--
---
Il sito comune di it.comp.lang.visual-basic
http://www.murialdo.it/it_lang_vb/

 Inoltre:



wrote:


Newsgroup: it.comp.lang.visual-basic
Titolo: Mail automatiche con allegato

Ciao a tutti.
In azienda mi hanno richiesto di fare un programmino che spedisca in
automatico delle mail con allegato ad un elenco di indirizzi.
Avete dei link o delle basi da modificare in VB6  ( purtroppo conosco un
pò solo il VB6 ) ?
Grazie a tutti.
Indriano
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

www.aspemail.com
la versione free, mi pare, manda anche allegati.

Newsgroup: it.comp.lang.visual-basic
Titolo: X AlexMessoMalex

Ciao,
volevo ringraziarti del suggerimento a proposito della stringa SQL, e ne
approfitto per spiegarti meglio l'importazione del file di testo.
Da visual basic io ho aperto un file di testo (open text ), con dei record
messi in riga. Tramite un array ho memorizzato l'inizio dei singoli campi
dopo di che ho fattoun ciclo per leggere ogni riga e generare la stringa
SQL.
Tutta questa procedura avviene tramite la pressione di un pulsante su un
form.
Quello che vorrei sapere è se esite un modo migliore per fare questo tipo di
importazioni, visto che anche se funzionale è molto lento.

Ci sono softwarini appositi che fanno importazioni di quel tipo.
Se il file di testo č fatto bene con colonne rispettate e tutto quanto, puoi
addirittura importarlo in excel, aggiustare le eventuali imperfezioni e poi
esportarlo in qualsiasi altro formato.
A me č capitato di fare cose simili, e il passaggio č stato TXT ->
XLS ->DBF -> ACCESS .......
Puoi manipolare a piacimento.
Comunque non pensare sia molto piů veloce.
Pensa che per alimentare un DB bancario da un file di testo di 10Mb e piů,
lascio partire un programma fatto come il tuo il venerdě sera e Dio solo sa
quando finisce.
Comunque per cose cosě lunghe ti consiglio vivamente di creare un file di
LOG in cui scrivi la data di inizio, fine, eventuali errori ecc...
Ciao
P.S. Data la presenza di alcuni che non gradiscono i miei messaggi,
risponderň ancora per poco in modo pubblico, e se queste persone
continueranno a trattarmi come un essere inferiore, inizierň a suggerirti
solo privatamente.


Newsgroup: it.comp.lang.visual-basic
Titolo: mi serve una correzione

Ciao a tutti,
ho scritto un primo abbozzo per una  funzione che mi dovrebbe servire
a trovare le directory e sottodirectoy in una unità  a disco.
LA funzione è la seguente : 
Sub ContaDir(sPath As String)
Dim MyName As String
MyName = Dir(sPath, vbDirectory)
Do While MyName <> ""
    If MyName <> "." And MyName <> ".." Then
        If (GetAttr(sPath & MyName) And vbDirectory) = 16 Then  
            Debug.Print MyName
            ContaDir sPath & "\" & MyName
        End If
    End If
MyName = Dir
Loop
End Sub
Il primo valore che passo a sPath è "C:\".
La funziona chiama sè stessa,ma GetAttr mi dà delle difficoltà : in
pratica la prima directory che viene rilevata è "windows"...quando la
funzione fà la prima chiamata a sè stessa,getattr non funziona perchè
sPath vale "C:\windows" , e myname vale "windows",e quindi getattr si
trova a verificare se "C:\windows\windows" è direcotory....m aquesta
direcotry non esiste.
In paratica mi servirebbe un'altra soluzione per rendere ricorsiva la
funzione. Mi potete aiutare? C'è anche una funzione API per rilevare
le directory e soodir a partire da un percorso o da una detrminata
unità?
Inoltre,vorrei sapere come si usa il comando Release con le variabili.
Ho provato a d usarlo,ma VB mi avvisa con:
errore di compilazione
Per la funzione o l'interfaccia sono state impostate delle restrizioni
oppure la funzione utilizza un tipo di automazione non supportata in
Visual Basic.
Ciao e grazie a tutti,
Alberto.

 ha scritto nel messaggio
news:3d0fa76a...@powernews.infostrada.it...


 End Sub
La DIR, per dirla in breve, ha un suo vettore che viene inizializzato quando
si chiama Dir con argomenti, scorso (scorrito, scorruto, e poi mi fermo...)
quando si chiama DIR senza argomenti.
Il fatto che la Sub chiami se stessa (pratica più che lecita), fa in modo
che la seconda (ricorsiva) DIR con argomenti "distrugga" quanto la sua
"gemella" ha composto.

"gemella" ha composto.
Ho capìto ... proverò a vedere di far qualcosa.
Ciao e grazie,
Alberto.

Newsgroup: it.comp.lang.visual-basic
Titolo: VBSCRIPT - Uso activeX

Avete esempi su come usare gli activex usando vbscript, che verra' poi
interpretato dal browser internet explorer 4?
Saluti, grazie
--
demis 
Head of M.T.D. group
[Internet: chi cerca trova]

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Ottenere l'ID della tabella in fase di inserimento dati

In fase di inserimento dati in una tabella di Access, come posso
ottenere il valore numerico casuale assegnato come chiave primaria
subito dopo il salvataggio del record?
Dim MiaX as long    'variabile che dovrà contenere il valore _
'del contatore intero lungo casuale
Dim xExt As String = f.Extension
Dim xN As String = f.Name.ToString
........................................
Dim myinsertquery1 As String = "INSERT INTO Foto ( nome,CDn) Values('" + xN
+ "', " + Str(xCD) + ")"
Dim myCommand1 As New OleDbCommand(myinsertquery1)
myCommand1.Connection = myConnection
myCommand1.ExecuteNonQuery()
MiaX=?????????????

pi ero wrote:

così non credo tu possa.
devi invece aprire un recordset sulla tabella, magari specificando una 
condizione di where che non restituisca dati (se stai inserendo non ti 
serve che vengano restituiti. ovviamente la condizione mettila su un 
campo indicizzato!...); a questo punto fai un .AddNew, inserisci i 
valori e poi un .Update: dovresti riuscire a leggere il valore...

 valori e poi un .Update: dovresti riuscire a leggere il valore...
Hai un esempio dove posso andare a vedere come aprire
un recordset di una tabella?
Nell'help in linea non lo trovo piů e non mi ricordo come si faceva.
Posso usare gli stessi metodi di VBA di access?
Grazie
P.

 
parando di ADO:
dim cn as adodb.connection
dim rs as adodb.recordset
set cn = new adodb.connection
set rs = new adodb.recordset
cn.cursorlocation = aduseclient (con "server" non so se riesci a fare 
qul che ti serve)
cn.open "qui metti la stringa di connessione"
rs.open "qui metti la sql", cn
dovrebbe essere tutto.
ciao



(senza chiudere la connessione)
myCommand1.CommandText = "SELECT $$IDENTITY"
dim k as integer = CTYpe(myCommand1.ExecuteScalar,Integer)
(spero di averlo tradotto bene perchè in c# funziona!)
        // SQL command to retrieve the identity value created
        OleDbCommand cmd = new OleDbCommand("SELECT @@IDENTITY",
            da.SelectCommand.Connection);
        int k = (int)cmd.ExecuteScalar( );
=======================================================================
Se mi vuoi scrivere togli le maiuscole
Sveltolampo 
cteniza...@hotmail.com
=======================================================================