mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Dimensioni BackGround

Salve,
qualcuno sa dirmi dove posso prelevare le informazioni rigurdo la grandezza
dello schermo??
Es 1024x768...!!!
C'e' qualche funzione?? API?? registro di configurazione??
GRazie mille :)
xoooox
--------------------------------
Inviato via 
http://usenet.libero.it

 Es 1024x768...!!!
c'è un post, in inglese, di a.p, di qualche giorno fa...
size of desktop del 24/03
guarda se può esserti utile...
--
Salutoni
Sergio

C'e' qualche funzione?? API?? registro di configurazione??
Niente di tutto questo.. basta un:
screen.Width/screen.TwipsPerPixelx per la larghezza
screen.Height/screen.TwipsPerPixely per l'altezza
Non so invece come fare nel caso del desktop su + monitor.. cioè non ho la
possibilità di provarlo (cosa restituisce screen?)
--
Regards LaZ
.·´¯`·.¸.·´¯`·.¸ ><((((º> ....... <º))))>< .·´¯`·.¸.·´¯`·.¸
Mi riservo, con fermezza, il diritto di contraddirmi. (Paul Claudel) 
.·´¯`·.¸.·´¯`·.¸ ><((((º> ....... <º))))>< .·´¯`·.¸.·´¯`·.¸

Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi con posizionamento degli oggetti nelle form (VB6 e XP)

Salve, ho installato VB6 SP5 su Win XP e riprendendo un vecchio progetto mi
accordo che ad esembio una progress bar che ho posizionato in automatico
sopra una status bar non viene posizionato nel posto giusto.
In più se complito il tutto ed eseguo il programma su un SO diverso dal XP
le dimesioni delle form non coincidono, e gli oggetti (come già detto) non
vengono posizionati bene.
Grazie

 ha scritto nel messaggio
news:r3WY7.19702$s04.9...@news.infostrada.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: aprire file e trasferirne il contenuto in una Text

Vorrei prelevare da un file .txt una riga e trasferire questa riga
all'interno di Text1.Text per far apparire nel form la riga prelevata dal
file .txt
Per quanto riguarda l'apertura del file, tramite l'istruzione
indicativo_file = ShellExecute(hwnd, "open", "C:\prove\prova.txt"....)
Il file viene correttamente aperto e ho il focus sul file appena aperto,
quello che non riesco a fare č trasferire il contenuto di una riga nel form.
Uso Visual Basic 6, in passato ho usato dei comandi VB per la creazione
delle macro in word e l'istruzione da usare era sendkey(....) ma in Visual
Basic 6 quest'istruzione non funziona perchč mi dice che l'istruzione
sendkey necessita di un oggetto.
Grazie a tutti
Ciao



ShellExecute ? 
Per me dovresti usare:
dim nfile as long
dim mystring as string
nfile = freefile()
open myfile for input as #nfile
line input #nfile, mystring 
close #nfile
textbox.text = mystring
Attenzione che č letta solo la prima riga del file, per leggere tutto
il file dovresti mettere:
do until eof(nfile)
line input #nfile, mystring
loop
=======================================================================
Se mi vuoi scrivere togli le maiuscole
Sveltolampo 
ctenizaMALED...@hotmail.com
=======================================================================

 file .txt
http://www.gbcweb.com/free/vbsamples/samples_files_ReadWriteFILE.zip
-> GbC|
www.gbcweb.com

 Attenzione che è letta solo la prima riga del file, per leggere tutto

Newsgroup: it.comp.lang.visual-basic
Titolo: [MS] - Informatica - PROGRAMMATORI VB

Stiamo urgentemente selezionando programmatori da inserire stabilmente nel
nostro organico nella sede di Marina di Carrara (MS).
Le figure professionali che cerchiamo hanno esperienza come programmatori in
almeno uno di questi campi
C/C++, VB, MFC, VC++, DAO, DBRMS, WIN32, firmware, driver Windows.
Gli interessati possono mandare il loro CV a 
mcol...@c-map.it
Marco Colonna

c e il mare?

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

ero convinto rallentasse sempre.
poi stavo facendo un po' di timing fra addnew e insert into, leggendo un
file di testo con due campi divisi da ";"
con addnew ho provato un doevents:
    While Not EOF(fNum)
        Line Input #fNum, s
        sArr = Split(s, ";")
        With rs
            .AddNew
            a = Val(sArr(0))
            !cnt = a
            !cnttxt = sArr(1)
            .Update
        End With
        If a Mod 1000 = 0 Then
            Caption = a & " - " & Format(Timer - time1, "###000.000")
            DoEvents
        End If
    Wend
lo stesso codice, senza l'if, e' *sempre* piu' lento di circa 1", sia in ide
sia dall'exe.
Create 10000: 000,070
AddNew DoEvents 10000: 039,043
AddNew NoEvents 10000: 040,438
Insert Into 10000: 027,277
anche se la caption la cambia poco, l'if lo deve valutare a ogni ciclo.
cos'e' che non colgo ?
grazie, a.

         End If
Verifichi se con a Mod 100 e' piu' lento o piu' veloce, per
favore?
Lokar
-- 
Sito Comune: 
http://www.it-lang-vb.net/
Manifesto: 
http://www.it-lang-vb.net/docs/Manifesto.txt
Statuto: 
http://www.it-lang-vb.net/docs/Statuto.txt
UGIdotNET - 
http://www.ugidotnet.org

 favore?
ide:
Create 10000: 000,070
AddNew DoEvents 10000: 035,914
AddNew NoEvents 10000: 036,773
Insert Into 10000: 025,469
exe:
Create 10000: 000,090
AddNew DoEvents 10000: 031,293
AddNew NoEvents 10000: 030,941 <---
Insert Into 10000: 023,555
Create 10000: 000,070
AddNew DoEvents 10000: 031,715
AddNew NoEvents 10000: 031,957
Insert Into 10000: 023,766
Create 10000: 000,090
AddNew DoEvents 10000: 031,879
AddNew NoEvents 10000: 031,383 <---
Insert Into 10000: 023,441
Create 10000: 000,070
AddNew DoEvents 10000: 031,164
AddNew NoEvents 10000: 032,238
Insert Into 10000: 025,266
boh. se e' cosi', un qualche feedback conviene darlo.
pensavo anche che all'aumentare delle righe (alla fine sono 120k, con indice
su id) rallentasse abbastanza decisamente. vabbe' che sono solo tre campi
piccoli, comunque...
il pc e' mediamente carico. durante il test non facevo nient'altro, ma oe ha
ricevuto un mail. photoshop e' stato swappato tutto. progetto1.exe e' ancora
aperto e si sta prendendo 51m di ram e 46 di swap.
ciao, a.

 boh. se e' cosi', un qualche feedback conviene darlo.
Quello che "immagino" e' che comunque il s.o. tenti di
eseguire un qualche refresh sulla finestra "bloccata" (dal
ciclo), e nel farlo impegni piu' risorse/tempo che se lo si
facesse manualmente.

Newsgroup: it.comp.lang.visual-basic
Titolo: Ado -Data1

Ciao, ho sempre usato per l'accesso ai dati il compontene ado "data" (Data1) 
come lo chiama di default vb
poi , come di seguito scrivevo il mio codice..
Codice che hopreso da un progetto di altri.. e non ho mai approfondito.
Esempio codice:
Data1.DatabaseName = ConnettiSTR
sql = "SELECT * from PIPPO"
 Data1.RecordSource = sql
Data1.Refresh
While Not Data2.Recordset.EOF
 ....
 Data2.Recordset.MoveNext
wend
Data1.Recordset.Close
Set Data1.Recordset = Nothing
1) domanda "Set Data1.Recordset = Nothing" questo distrugge il recordset? 
quindi va fatto alla fine della routine, giusto?
2) domanda "Data1.Recordset.Close" questo chiude il recordset? quindi anche 
questo va fatto alla fine della routine, giusto?
3).. ma sono obbligata a usare l'oggetto data nella form?  se volessi 
mettere qualcosa in un modulo .. stupidamente l'oggetto non lo posso 
disegnare
quindi come si fà?
Vi spiego..spesso ho necessità di duplicare delle sub perchè vengono 
lancaiate in form differenti con variabili diverse.
altrettanto spesso ho pensato di mettere una sola sub nel modulo e 
richiamarla.. ma siccome devo usare una tabella del db non so come 
"raggiungerla"
poichè non ho l'oggetto data.
Spero di essermi spiegata e aspero che qualcuno di buon cuore mi possa dare 
i suggerimenti di cui sento il bisogno.
Grazie a tutti ciao Miky.



Prima di tutto...spero di aver capito la tua domanda
Personalmente non ho mai usato il controllo data, perchè ho sempre  
preferito essere "sganciato" da activeX che alla lunga cristallizzano il  
progetto.
Chiaramente per accedere ai dati non hai necessariamente bisogno di  
utilizzare un controllo data. Servono unicamente le librerie di ADO..in  
caso tu voglia utilizzare ADO come tecnologia.
Esempio classico di connessione al database.
Dim rs as ADODB.Recordset
Dim cn as ADODB.Connection
Set cn = New ADODB.Connection
'puoi settare se il cursore relativo alla connessione cn sia lato client o  
server a seconda 'delle tue esigenze adesso utilizziamo per esempio il  
cursore lato client
cn.CursorLocation= adUseClient
Set rs = New ADODB.Recordset
cn.Open.... ci metti la tua stringa di connessione al database
rs.Open "Select * from Pippo",cn,adOpenStatic,adLockOptimistic
'adOpenStatic opzione sul tipo di cursore scelto
'adLockOptimistic opzione sul tipo di blocco
If rs.EOF Then
Else
Do Until rs.EOF
...
..
.
rs.MoveNext
Loop
End If
rs.close
cn.close
Comunque come consiglio personale, da uno che comunque non è assolutamente  
un genio della programmazione, ti dico di andarti a leggere attentamente  
le parti riguardanti l'oggetto connection e l'oggetto recordset in msdn.  
Troverai una miriade di esempi e di info.
Ciao
IAK
-- 
Using Opera's revolutionary e-mail client: 
http://www.opera.com/mail/
Newsgroup: it.comp.lang.visual-basic
Titolo: Spostare il cursore [con tabindex?] in run time...come?

...eseguo un'evento dopo un clik di 1 lstbox, poi vorrei spostare il cursore
su text3 per
un'inserimento...
ho usato
    Text1.TabIndex = 0
ma del cursore nessuna traccia...
cursore o inserimento + F1 non mi hanno dato risposta...
e voi?
come faccio a mettere il cursore lampeggiante su text3 quando voglio io
SENZA usare tab?
--------------------------------------------
molte onorevoli grazie a Voi
^____^
Luca

text3.setfocus
--
Ivan Castellaro
Mettere un punto tra nome e cognome per l'e-mail.
ivancas...@libero.it

 ha scritto nel messaggio
news:9r336n$dsl$1...@fe2.cs.interbusiness.it...


     Dim selezionato As String
Dim Selezionato as Integer
prova cosi'


 ha scritto nel messaggio
news:9r3kj1$d76$1...@fe1.cs.interbusiness.it...

...che vergogna...
scusate...
la cappella non era x Integer o String, ma
Private Sub lstGruppi_Click()   <---- solo che io cliccavo 2 volte......
sob...
grazie qmc x il sostegno morale....
Luca
Newsgroup: it.comp.lang.visual-basic
Titolo: Catturare l'evento wheel-scroll del mouse in VB6

Ciao a tutti.
Ho provato a "catturare" l'evento wheel-scrool del mouse per una mia
applicazione VB6 ma ho incontrato un problema. Con la mia macchina che
usa un mouse logitech classico con wheel, il codice che ho trovato in
numerosi siti e groups funziona correttamente (il codice è incluso in
un wheel.bas dal progetto):
Option Explicit
Private Declare Function SetWindowLong Lib "user32" Alias
"SetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal
dwNewLong 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 Const WM_MOUSELAST = &H209
Public Const WM_MOUSEWHEEL = (WM_MOUSELAST + 1)
Public Const GWL_WNDPROC = (-4)
Private OldHandle As Long
Private Handle As Long
Public Sub StartWheel(ByVal H As Long)
    On Error Resume Next
    Handle = H
    OldHandle = SetWindowLong(H, GWL_WNDPROC, AddressOf WindowProc)
End Sub
Public Function WindowProc(ByVal hWnd As Long, ByVal uMsg As Long,
ByVal wParam As Long, ByVal lParam As Long) As Long
    Dim X As Integer, Y As Integer
 
    On Error Resume Next
    If uMsg = WM_MOUSEWHEEL Then
        Y = lParam \ 65536
        X = lParam And 65535
        If wParam < 0 Then
            Debug.Print "ScrollDown", X, Y
        Else
            Debug.Print "ScrollUp", X, Y
        End If
    End If
 
    WindowProc = CallWindowProc(OldHandle, hWnd, uMsg, wParam, lParam)
End Function
Public Sub StopWheel()
   Call SetWindowLong(Handle, GWL_WNDPROC, OldHandle)
End Sub
Ho provato lo stesso codice su un portatile con un mouse, sempre
logitech, mouseman traveler (quelli piccoli per portatile) e non
funziona niente.
Da un analisi dei messaggi inviati scopro che nel mio caso catturo
correttamente il messaggio WM_MOUSEWHEEL = H&20A. Mentre nel caso del
mouseman il messaggio corrispondente al mouse-wheel sembra essere
H&115.
Qualcuno sa dirmi come fare a rendere compatibile il mio codice con
"tutti" i mouse dotati di wheel?
Grazie

 "tutti" i mouse dotati di wheel?
da quello che ho potuto vedere il codice &H115 corrisponde a wm_vscroll,
quindi non dovresti avere conflitti modificando l'istruzione
    If uMsg = WM_MOUSEWHEEL Or uMsg = WM_VSCROLL Then
dove chiaramente
Public Const WM_VSCROLL = &H115.
ho notato comunque che se sul form e' presente una textbox settata a
multiline che ha il focus l'evento non viene piu' intercettato
indipendentemente dal container.
beppe
Newsgroup: it.comp.lang.visual-basic
Titolo: aiuto

devo associare l'evento della pressione del tasto destro ad un oggetto della
lista. il metodo mousedown non ha come parametro l'indice dell'oggetto della
lista .Come devo fare per risolvere questo problema?
--------------------------------
Inviato via 
http://usenet.libero.it

 lista .Come devo fare per risolvere questo problema?
Bhè... Stiamo parlando di un controllo listbox, giusto? In tal caso usa la
proprietà list1.selecteditem per ottenere l'indice dell'elemento
selezionato... Solo ke così se tu clikki col destro su un elemento non
selezionato quest'ultimo non verrà selezionato... E' un pò macchinosa come
cosa, ma su 2 piedi è la prima cosa ke mi viene in mente.
Antonio Mirarchi

Newsgroup: it.comp.lang.visual-basic
Titolo: Virgola o punto per separare i decimali ??

La calcolatrice di Windows converte automaticamente il carattere "."in
"," nel carattere di separazione dei decimali.  
Se utilizzo il carattere "." la funzione CDbl("1.2")  ritorna 12,
mentre CDbl("1,2")  ritorna 1,2.
Be'.... qualcuno può passarmi 4 righe di codice (così imparo qualcosa)
per subclassare un controllo textbox perchè converta automaticamente
il tasto "." in "," così come fa la calcolatrice ??
Grazie e buon lavoro.
Marco Grignoli
EMAIL: 
sinfosofNO...@tin.it
   >>Togliere NOSPAZZATURA<<

il tasto "." in "," così come fa la calcolatrice ??
ecco qua!
Private Sub Text1_KeyPress(KeyAscii As Integer)
    If KeyAscii = 46 Then
        KeyAscii = 44
    End If
End Sub

>
Questo implica che per ogni controllo textbox inserisca queste righe
di codice o la chiamata auna sub che comunque le contenga. Intendevo
creare un nuovo controllo textbox (MyTextBox) che abbia le stesse
proprietą di TextBox, quindi sia posizionabile allo stesso modo sul
form, ma consenta la gestione della virgola come suddetto.
RiCiao !


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

What is the new name for MS95 property wordObject.existingbookmark in
MS2000?
Sent via Deja.com
http://www.deja.com/

 MS2000?
From msdn:
Exists Method
Determines whether the specified bookmark or task exists. Returns True if
the bookmark or task exists.
Syntax
expression.Exists(Name)
expression   An expression that returns a Bookmarks or Tasks object.
Name   Required String. A bookmark or task name
If ActiveDocument.Bookmarks.Exists("start") = True Then
    ActiveDocument.Bookmarks("start").Delete
End If
--------------------
hth
Bye
Aldo
ExistingBookmark(name) x = ActiveDocument.Bookmarks.Exists(name)

Newsgroup: it.comp.lang.visual-basic
Titolo: Ado : Seek ed Index ?

C'è qualcuno che ha già utilizzato i nuovi metodi (ado 2.1) index e seek
con un recordset creato con provider per msjet ?
A me non funzionano (ho installato vb6 sp3), ottengo un errore che mi dice
che il provider non supporta le seek.
(altra domanda : Il metodo find utilizza gli eventuali indici sottostanti ?)
Marco.

...

Newsgroup: it.comp.lang.visual-basic
Titolo: cerco libreria Imageutils

Salve, nel sito comune esiste un sorgente per salvare le immagini in formato
jpg  "picresize.zip"
dice che è necessaria una dll di nome "ImageUtils"
sapete mica dove reperirla ?
grazie anticipate.

 wrote in message
a17fm8$ht2$1...@serv1.albacom.net...

prova su: 
http://www.componentsource.com
ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Sempre su DBGRID ... abbiate pieta'... ! :-)

SITUAZIONE :
Su di un form ho due controlli data:
il primo ha come recordsource la tabella "clienti" di un db.
A questo controllo ho associato :
- una dbGrid che svolge la funzione di riepilogare sinteticamente alcuni
campi dei records.
- una serie di textbox (tante quanti i campi della tabella (escluso
l'idCliente)) che svolgono la funzione di visualizzare tutti i dettagli del
record selezionato nella dbgrid.
il secondo, invece, ha come recordsource una query SQL che ha come sorgente
la tabella "fatture", e prende come criterio il valore contenuto nella
colonna "idCliente" dalla riga selezionata nella griglia dei clienti.
Il risultato di questa select, viene visualizzato attraverso un'altra
dbgrid.
Poi ho impostato sull'evento "RowColChange" della prima griglia, la stessa
query con relativo refresh.
In questo modo, quando si seleziona un record nella prima griglia, nella
seconda vengono aggiornati i valori relativi.
Spiegato in parole semplici .... :
se seleziono il nominativo "Rossi" nella prima griglia, vedo tutte le
fatture associate a lui nella seconda griglia.
Il meccanismo funziona perfettamente sino a che .....
PROBLEMA:
Ho messo un cmdButton per aggiungere un nuovo cliente, utilizzando il metodo
AddNew.
Quando clicco sul pulsante, mi viene segnalato un errore di sintassi in
quanto manca un operatore (idCliente) nella query e scopro con stupore che
il programma e' "saltato" sull'evento "RowColChange" della griglia, anziche'
trovarsi nella routine associata al cmdButton di inserimento.
Sapete spiegarmi perche' ????
Forse il metodo "addnew" modifica la selezione nella griglia e, quindi,
viene attivato l'evento "RowColChange" ??
Se cosi' fosse, come posso evitarlo ?
Grazie a tutti.... come sempre !
Aldo

 Se cosi' fosse, come posso evitarlo ?
prova a usare un flag tipo :
grid_RowColChange()
    if flag then exit sub
    .....
    ....
end sub
cmdButton_Click()
    flag=true
    .............
    ............
    ...........
    ..........
    flag=false
end sub

 prova a usare un flag tipo :
---cut----
Grazie mille !
Ho risolto con il tuo consiglio.
Eppure era cosi' semplice la soluzione....
Chissa perche' si cercano sempre le cose piu' incasinate... mah ?!?!
Ciao
Aldo
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] lettore barcode

Salve a tutti, dovendo realizzare un gestionale per un'edicola, ho aquistato
un lettore di codici a barre, non so di che marca sia perchč non c'č scritto
niente sulla scatola.
Il problema č che non riesco a farlo funzionare, ho provato a passarlo su
alcuni codici di giornali tenendo word in primo piano, ma pur sentendo il
bip il documento non riceve il codice.
Qualcuno potrebbe darmi gentilemente qualche indicazione sulla
configurazione di questo attrezzo.
Grazie.

 configurazione di questo attrezzo.
Purtroppo sei il primo a porre questa domanda e temo che nessuno sia in 
grado di risponderti.
ciao
http://groups.google.com/groups?q=group%3Ait.comp.lang.visual-basic&hl=en&btnG=Google+Search
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

 grado di risponderti.
noto una sottile vena sarcastica..... :-)
--
Salutoni
Sergio

Il 3/27/2003 2:41 PM, CSSoft scrisse:

Bisognerebbe tassare i post inviati su questo NG!
:-)
	maxx


 scritto in news:b5uugb$lds$1@ID-
186564.news.dfncis.de
:

Dipende se il lettore lo colleghi su porta seriale o sulla porta della 
tastiera. Questo 2° emula la tastiera e quindi non devi fare nulla, 
altrimenti devi fare un programmino (o utilizzare il driver che hai nella 
scatola o sul sito) che atende i dati dall aporta rs232 e mandarli sul 
controllo o il foglio attivo sullo schermo.
Saluti
-- 
Vincent
VB6+SP5 Windows 2000 SP3
MSDE 7

 > Il problema è che non riesco a farlo funzionare, ho provato a passarlo


 
di solito quello in emulazione tastiera scrive il codice seguito da un 
invio.
Dovrebbe funzionare in modo trasparente. Ma ho il sospetto che abbia 
l'rs232
saluti


 ha scritto nel messaggio
news:b5uugb$lds$1...@ID-186564.news.dfncis.de...


 scritto in news:b620s7$un96$1@ID-
186564.news.dfncis.de
:

che ti possino..... :-P

Newsgroup: it.comp.lang.visual-basic
Titolo: Ma faccio domande troppo difficili per voi?

Osservazione come da oggetto, visto che ho chiesto un pň di post fa se
qualcuno ha idea di come interagire con IIS (creazione nuovi siti,
configurazione dei permessi, e cosě via).
Se sono domande roppo difficili ditemelo, cosě non posto piů!

 wrote in message
news:915arj$5fi$1...@serv1.iunet.it...


 ha scritto nel messaggio
news:915dt8$fvl$1...@fe1.cs.interbusiness.it...


precisamente, lavorando con Windows 2000 Server devo:
allora informati su IIS
imparati come funziona il server e poi torna qui a fare domande piu'
specifiche, non siamo tenuti a conoscere IIS, noi

 Se sono domande roppo difficili ditemelo, così non posto più!
sono domande troppo difficili; addio

 ha scritto nel messaggio
news:Xns9008D4...@127.0.0.1...


comunque scusami pensavo di essere approdato sul NG Visual Basic
fai qualche domanda sul VB, allora.
Io di IIS non ne so nulla. So come creare un intero sito con il Sambar Server 
o con Apache, so come configurare questi due server, come riavviarli o 
chiuderli da remoto... ma su IIS non ho la più pallida idea, non saprei da 
dove cominciare. Per la cronaca: per l'upload dei file si usa il metodo PUT 
dell'HTTP, per la configurazione dei permessi a livello di cartella bisogna 
fare l'upload di un file di configurazione chiamato .htaccess, che contenga 
solo le impostazioni che devono differire da quelle predefinite, per tutte le 
altre operazioni basta uno script o un programma richiamabile come CGI. 
Questo ovviamente presuppoendo che IIS funzioni come il 99% degli altri 
server in circolazione... L'accesso via FTP semplifica notevolmente le cose. 
Come vedi, non un solo problema riguardante VB. Anzi, la maggior parte di 
questi strumenti viene fatto in Perl

 ha scritto nel messaggio
news:915arj$5fi$1...@serv1.iunet.it...


Scusa Raffaele,
io, come parecchi altri, posso risponderti su tutto
quello che tu vuoi, ma credo che sia opportuno
prima di tutto che tu ti scusi con tutto il NG, perché nessuno
qui è tenuto a risponderti, soprattuTto con un NG molto
generoso
 
poi sentire quello che ti vien detto, perché le tue domande
sono imprecise ed improprie.
Vuoi un esempio?
Il sito è una Intranet o su un dominio Internet ?
Che ti serve VB se IIS lo puoi configurare in loco
oppure in remoto con un tool come PcAnywehere ?
La configurazione di IIS è sempre preceduta da una conoscenza
su Administering Win NT/2K server e una base sui rudimenti
TCP/IP. 
Non mi sforzo di più ...
ciao e buon lavoro
Noseda

Newsgroup: it.comp.lang.visual-basic
Titolo: Boomark per muoversi nell'editor... quali tasti ?!

Sapete quali sono i tasti per impostare dei Bookmark all'interno del codice
e
muoversi tra di loro. Senza dover usare le icone sulla toolbar per
intendersi.
grazie
ciao
stefano

 intendersi.
se usi la versione italiana di VB 6 puoi fare:
- Alt M B I per impostare il Bookmark alla riga corrente
- Alt M B S per andare al successivo
- Alt M B P per andare al precedente
basta farci l'abitudine  :P
Faber

 basta farci l'abitudine  :P
ARGH... c'è da spaccarsi le dita ...
e pensare che in vc++ è una cavolata e si può pure personalizzare la
combinazione dei tasti !#@
mah...
faber, grazie cmq per la dritta... :)
intanto se qualcuno ha trovato un sistema + semplice (macro, plugin, feature
nascoste)
si faccia vivo !
ciao
stefano

combinazione dei tasti !#@
Evvabbe', l'ambiente di sviluppo e' questo... a me basterebbe far
funzionare lo scroller del mouse ^_^'
-- 
Giovanni "Gyo" Perdicaro
E-Mail: 
gperd...@sicilyonline.it

 funzionare lo scroller del mouse ^_^'
a me funziona...
Faber

 ha scritto nel messaggio
news:9f7rui$2jf04$1...@ID-66268.news.dfncis.de...

a me no... acc :-(
---------------------------------------------------------
             ASSA
http://assatarram.yohoo.it
Bookmark download:
http://www.redangel.it/beta_zone/Click_p.asp?ID_P=19
Napster: Assatarram3
---------------------------------------------------------

a me funziona...
hai dei driver specifici o quelli standard di win?


 wrote in message
news:h42fhtcdkf4r04qu6...@4ax.com...


 hai dei driver specifici o quelli standard di win?
sembra essere il driver standar fornito con W2000, il mouse (come tutto
il resto) è HP
Ciao
Faber

 funzionare lo scroller del mouse ^_^'
Se hai un mouse Logitech, installa i driver della Logitech e vedrai che lo
scrolling della finestra del codice con la rotellina funziona. Con i driver
standard di Windows invece non va, anche se va lo scrolling della finestra
di progetto.
Ciao
*Roby*

di progetto.
sisi, infatti, č seccante che non funzioni nella finestra principale e
invece vada bene nelle altre ^__-
ma alla fine... chissene! ;)

Newsgroup: it.comp.lang.visual-basic
Titolo: Ottenere la posizione del cursore nella RichTextBox

Come posso fare per trovare la posizione del cursore nella RichTextBox?
Grazie per aver letto
Klaus Dobermann

 Klaus Dobermann
 Se per posizione in intendi il num. di caratteri a partire dal primo allora
  RichTextBox1.SelStart
 Nota :
   Parte da 0.
Ciao
--------------------------------
Inviato via 
http://usenet.libero.it

 ha scritto nel messaggio
news:80Z117Z236Z4Y1...@usenet.libero.it...


 ossia effettuando una ricerca con INSTR() dei caratteri endline e ecc.
Cerca in google -> gruppi, ho postato la soluzione più volte.
Ciao
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

 No, intendo riga-colonna.
 Per le righe cerca info rigardo EM_EXLINEFROMCHAR
 Per le colonne appena mi ricordo posto.



 Mi sono ricordato ( anche con l'aiuto dell' MSDN ;P ) EM_LINEINDEX
 Ah sono da usare con SendMessage eh!!!


Newsgroup: it.comp.lang.visual-basic
Titolo: Evento Unload di VB5

Scusate un po', ma mi sembra strano.
Ho su di un form un datacontrol di cui controllo l'EditMode del 
rispettivo Recordset. Quando chiudo la form (evento Unload o 
QueryUnload) vorrei verificare l'EditMode per consentire la chiusura del 
form stesso. Pero' dopo l'Unload il datacontrol non viene piu' gestito, 
come mai? Coma c...o faccio.
Grazie a chi mi rispondera', preferibilmente anche in e-mail
-- 
--> Cpt. Future <--
Per rispondermi, togliere NO-SPAM dall'indirizzo
Remove NO-SPAM from e-mail address to reply.

se ho capito, suppongo che allo scaricamento del form vb annulli i relativi
oggetti.
prova a usare
rs.close e set rs=nothing
sia prima che dopo l'unload
e guarda cosa succede.
se e' questo, devi fare qlo che ti serve nel qryunload, eventualmente
annullando l'unload.
ciao, andrea
Pino DM <pi...@NOSPAMgeocities.com> wrote


 come mai? Coma c...o faccio.

Newsgroup: it.comp.lang.visual-basic
Titolo: LICENZA MSDN

Ho acquistato un alicenza MSDN; ogni mese ricevo i miei cd e fin qui tutto
ok.
Ho ricevuto anche il nuovo 
VS.NET
 e mi č sorta una domanda: posso
utilizzarlo solo per test o č utilizzabile anche per rivendere eventuali
programmi sviluppati con esso?
Grazie
Flavio

programmi sviluppati con esso?
Sicuro che li puoi rivendere :-)
La licenza che hai e' per sviluppatori. Ovviamente non va bene per
installare, che so, Office o Sql Server in ambiente di produzione.
-- 
ciao, hal
p.s. Non scrivere _mai_ in tutto maiuscolo su usenet: equivale a
gridare.


Hal, scusa se mi intrometto, ma la domanda appare chiara: Secondo me la
licenza MSDN (pur con tutte le sue limitazioni in termini di installazioni
locali e divieto di distribuzione della stessa), autorizza pienamente a
distribuire i programmi con essa sviluppati.

distribuire i programmi con essa sviluppati.
Yesss :-)
-- 
ciao, hal

 Purtroppo non lo era la mia risposta :-(
c'era effettivamente uno smiley che sembrava volgere la frase in presa in
giro, pero' il seguito a me sembrava abbastanza chiaro.

 utilizzarlo solo per test o è utilizzabile anche per rivendere eventuali


 > utilizzarlo solo per test o č utilizzabile anche per rivendere eventuali


 utilizzarlo solo per test o è utilizzabile anche per rivendere eventuali


Newsgroup: it.comp.lang.visual-basic
Titolo: Anteprima di Stampa ?

Salve
Per realizzare un'anteprima di stampa cosa mi consigliate come oggetti ?
Grazie
--
Fulvio

 Grazie
cerca "anteprima" su 
http://www.it-lang-vb.net/
e' di gbc ( 
www.gbcweb.com
, che pero' al momento temo sia in vacanza
insieme al suo fondatore)

> Per realizzare un'anteprima di stampa cosa mi consigliate come oggetti ?
picturebox :)
--
Fibia "Sakamoto" FBI
E-mail: 
fibi...@hotmail.com
ICQ UIN 63586057
Sito Personale: 
http://www.geocities.com/fibiafbi
VB Simple: 
http://vbsimple.virtualave.net
Membro #25 delle Mitiche Brigate Takahashi sezione Sud

 Membro #25 delle Mitiche Brigate Takahashi sezione Sud
dal punto di vista takahashi, direi
---> Sezione Ovest
:)

 ---> Sezione Ovest
prrr.. non c'è la sezione ovest
a proposito.. hanno riorganizzato l'elenco dei membri: non sono piu'
il membro 25 ma il 26.
--
Fibia "Sakamoto" FBI
E-mail: 
fibi...@hotmail.com
ICQ UIN 63586057
Sito Personale: 
http://www.geocities.com/fibiafbi
VB Simple: 
http://vbsimple.virtualave.net
Membro #26 delle Mitiche Brigate Takahashi sezione Sud

 il membro 25 ma il 26.
aaargh ! fibia degradato ! vuoi che gli facciamo un email bombing ?
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB] Blocco record su MDB (Urgente)

Qualcuno conosce il sistema per bloccare solo UN RECORD in una tabella di
acces utilizzando visual-basic 6 (sp4)
Nonostante l'utilizzo delle proprietą della tabella settando in acces
"Blocco record modificato", si ottiene un blocco di pagina di 2K, ovvero non
solo il record ma n record successivi fino al raggiungimento della pagina.
Nulla cambia utilizzando le altre impostazioni.
La necessitą sorge quando due utenti accedono a due record attigui, il primo
che arriva blocca i record attigui impossibilitando gli atri a modificarne i
contenuti.il
 blocco lo si ottiene con metodo 'edit' sul record corrente.
Se qualcuno ha gią avuto di questi problemi, e gentilmente puņ farmi avere
la soluzione ne sarei molto grato.
GRAZIE ANTICIPATAMENTE

"Blocco record modificato", si ottiene un blocco di pagina di 2K, ovvero non
Per la precisione 2048 byte: Jet blocca pagine di tale dimensione e
mai un record solo ... così è!
ErreBi

 Se qualcuno ha già avuto di questi problemi, e gentilmente può farmi avere


Se qualcuno ha gią avuto di questi problemi, e gentilmente puņ farmi avere


 > Se qualcuno ha già avuto di questi problemi, e gentilmente può farmi





 >"Blocco record modificato", si ottiene un blocco di pagina di 2K, ovvero
non


Bene. ma a questo c'è rimedio o bisogna darsi pace ?
Mi sa tanto di no ...
ErreBi

record! 
Mi sono perso qualche puntata ?
ErreBi

 OK fai riferimento ad un sito .. qual'č?
Qual e` il Sito comune?
 
http://www.murialdo.it/it_lang_vb
--
Ciao.
Maurizio
--------
?SPQR(C)
 X

Newsgroup: it.comp.lang.visual-basic
Titolo: Dimensionare le ScrollBar

Sapete come si puņ ridimensionare una scrollbar?
Devo riuscire ad ottenere lo stesso risultato che si ottiene modificando
l'aspetto di windows dal pannello di controllo solo che deve essere limitato
alla mia applicazione.
Alessandro

alla mia applicazione.
Mai provato con Width e Height?
Ciao


In questo modo dimensioni l'altezza e la larghezza delle scrollbar. Io la
devo ridimensionare... mi spiego. (puoi provare anche da solo
ridimensionando le scrollbar da VB e dalle proprietą dello schermo di
WINDOWS)
Ridimensionando le scrollbar da pannello di controllo il rettangolo con il
disegno delle freccie si dimensiona in proporzione.
Se io allargo le scrollbar da VB l'altezza dei pulsanti con la freccia
rimane invariata.
Provare per credere. :)

 > >Sapete come si può ridimensionare una scrollbar?


Grazie mille HellBoy per la tua risposta, solo che vorrei chiederti qualcosa
di più... se posso.
Diciamo che voglio ridimensionare la scrollbar verticale di un listbox ma
lasciare tutte le scrollbar degli altri controlli invariate. Quali sono i
passi? Puoi essere così gentile da descrivermeli dettagliatamente?
Ti ringrazio in anticipo

 ha scritto nel messaggio
news:fNyW4.32800$EY1.3...@news.infostrada.it...


 ha scritto nel messaggio
news:_rAW4.33880$EY1.3...@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] OCX Intermec

Mi trovo a dover pilotare delle stampanti Intermec serie 301-401-501.
Mi sono scaricato i driver e gli OCX per farle funzionare da VB.
Ho varie difficoltà ad utilizzare gli OCX da codice : nessuno ha mai
avuto a che fare con queste famigerate stampanti ??
	Salute e saluti
		Massimo
 

...

Non ho mai provato a gestirle via OCX però via seriale funzionano benino.
Qual è il problema?
Dove l'hai trovato l'OCX?
Ciao

Dove l'hai trovato l'OCX?
http://www.intermec.com/products/interdrv.htm
	Ciao
		Massimo

>Non ho mai provato a gestirle via OCX però via seriale funzionano benino.
Scusa la rottura di scatole, ma sto ancora impazzendo con queste
Intermec.
Ti chiedevo, se non è di troppo disturbo, se hai un pò di
documentazione su come gestire le varie 401,501 etc via codice SENZA
ocx, visto che mi sono ridotto a qeusto, + che altro per un prbl di
velocità di stampa. Se non ho capito male, si pilotano puttando dei
comandi direttamente su seriale con i vari parametri, ma non ho
documentazione sui comandi accettati dalle stampanti. Ho provato anche
via internet, ma nix.
Se per caso avessi qlc, e fossi così gentile da spedirmelo via mail te
ne sarei molto grato.
	Tia
		Massimo

 ha scritto nel messaggio
news:hjbmtsc6k4bfomfv6...@4ax.com...

Newsgroup: it.comp.lang.visual-basic
Titolo: Quando un'installazione crea problemi di librerie...

Ho creato alcune installazioni da programmi da me sviluppati
ed in molti casi su PC diversi da quello su cui ho sviluppato mi
causa errori nell'installazione che posso comunque ignorare
ma che per una distribuzione su larga scala non rappresentano
di certo un pubblicita' positiva.
I file che causano errori sono i seguenti:
msxbse35.dll msrdo20.dll expsrv.dll.
Posso immaginare un problema di versioni ma come posso
risolverlo e capire magari quale versione utilizzare?
Grazie

Pressupongo che il problema sia causato dalla registrazione delle librerie
in questione non dovuta:
Apri con il notepad il fiel Setup.lst
Trova le righe dei file in questione
Rimuovi da queste la stringa $(DLLSelfRegister)  vedi esempio sotto
File2=1,,xxxxxxx.dl_,xxxxx.dll,$(WinSysPath),$(DLLSelfRegister),$(Shared),6/
29/1999 1:05:30,570128,3.51.1608.0,"","",""
diviene
File2=1,,xxxxxxx.dl_,xxxxx.dll,$(WinSysPath),,$(Shared),6/29/1999
1:05:30,570128,3.51.1608.0,"","",""
Bye
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] SMTP - Winsock1.SendData "To:" / "Cc:"

Ciao,
sto provando a modificare un mailer smtp e dovendo far pervenire il mex in
copia ad un secondo utente, nella riga di invio "TO:" ho provato a
modificare nel seguente modo senza esito: ne ricevo sempre uno solo.
All'interno del dialogo winsock ho il seguente testo
originale:
Winsock1.SendData "To:" & txtRecipientName & " <" & txtRecipient & ">" &
vbCrLf
---
modificato:
Winsock1.SendData "To:" & txtRecipientName1 & " <" & txtRecipient1 & ">," &
vbCrLf & txtRecipientName2 & txtRecipient2 & vbCrLf
---
provato anche
Winsock1.SendData "To:" & txtRecipientName1 & " <" & txtRecipient1 & ">" &
vbCrLf
Winsock1.SendData "Cc:" & txtRecipientName2 & " <" & txtRecipient2 & ">" &
vbCrLf
Infatti il messaggio in arrivo, proprietà, in pratica riporta il doppio
email come quando lo invio con uno singolo, ma al secondo corrispondente non
arriva nulla.
Suppongo sia da toccare in tutt'altra parte e non dell'indirizzamento.
Ho risolto al momento con un doppio invio automatizzato, ma con allegati mi
occupa il doppio del tempo necessario.
Qualche consiglio?
ciao grazie
-----= Posted via Newsfeeds.Com, Uncensored Usenet News =-----
http://www.newsfeeds.com
 - The #1 Newsgroup Service in the World!
-----==  Over 80,000 Newsgroups - 16 Different Servers! =-----

Secondo me dovresti leggere bene la rfc dell'smtp.
Poi mi sembra di aver capito che cerchi di inviare a due destinatari
lo stesso msg; se è così, basta che inserisci una coppia di
RCPT TO:<primo indirizzo>
RCPT TO:<secondo indirizzo>
invece che scrivere due destinatari nel messaggio dopo il comando DATA.
"ApipApip" <Chied...@AskMe.com> ha scritto nel messaggio
news:3cd00...@corp.newsgroups.com...


 RCPT TO:<secondo indirizzo>
Si grazie, č proprio questo, ma ho comunque provato qui e non riesco o
meglio mi da errore la sessione:
            Case MAIL_FROM
                m_State = MAIL_RCPTTO
                Winsock1.SendData "RCPT TO:" & Trim$(txtRecipient) & vbCrLf
                Debug.Print "RCPT TO:" & Trim$(txtRecipient)
Ho provato ad inserire vari comandi riscrivendo le linee dando appunto una
ulteriore variabile a [txtRecipient2] ma senza ottenere nulla...
Ho provato varie combinazioni, 2 volte nel debug poi 2 volte nel winsock poi
assieme  ecc... varie combinazioni ma senza risultato non so dove sbaglio.
Ho anche tentato con (txtRecipient ", " & txtRecipient2) ma non riesco.
Non saprei dove sbaglio.
ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Ricerca di manuale VB e compilatore.





Sono un neofita della programmazione e vorrei avere 
da qualche gentilissima persona (e sicuramente esperta visto il 
livello di discussione) un indicazione su come iniziare a programmare in Visual 
Basic per windows, un manuale che introduca in modo chiaro e il più 
possibile semplice, considerando che ho delle nozioni di base di 
pascal.


Grazie a chiunque vorrà e saprà darmi un aiuto.


Paolo



Sul sito comune c'è una lista di libri con quello che puoi trovare dentro
ognuno:
http://www.murialdo.it/it_lang_vb
Io ne ho visti tanti di libri...e devo dire che mi sembrano quasi tutti
buoni...magari alcuni danno troppe cose per scontato per qualcuno alle prime
armi. Comunque il miglior sistema per imparare è il campo di
battaglia...carichi il visual basic e inizi...poi c'è la guida MSDN che ti
aiuta.
Se già conoscevi un'altro linguaggio...sei già avvantaggiato...il VB è più
semplice del pascal...anche se chiaramente oggi ci sono molte più cose da
conoscere rispetto ai basic di tanti anni fà.
Gianni Moretti
Newsgroup: it.comp.lang.visual-basic
Titolo: Come si va da eseguibile a sorgente in VB4?

Sapete se esiste un modo per estrarre il sorgente da un programma
eseguibile sviluppato con Microsoft Visual Basic 4.0?
Vi ringrazio e vi
saluto in anticipo.
Giangi
--------------------------------
Inviato via 
http://usenet.iol.it

Uuummmmmhhhhhhhhhhhhhh ... che brutta domanda!!!!!
auguri ;o)
beppe
-----------------------------------------------------------
Visita il sito del WWF AltoFerrarese
http://www.comune.cento.fe.it/wwfaf
-----------------------------------------------------------

 ha scritto: 

--------------------------------
Inviato via 
http://usenet.iol.it
 

 wrote in message
news:194Z243Z137Z66...@usenet.iol.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Porta Seriale e VB.NET

In .NET non c'e' piu' il controllo MSCOMM, ma non mi va di usare l'OCX
di VB5/6 per vari motivi. Qualcuno ha gia' provato a comunicare con la
seriale in nativo 
VB.NET
?
Giovanni

 seriale in nativo 
VB.NET
?
Stanno spingendo per l'eliminazione delle periferiche legacy... a cosa ti
serve una seriale se esiste USB! ;-)
Il primo passo potrebbe essere in non considerarle nelle piattaforme di
sviluppo! ;-)

 seriale in nativo 
VB.NET
?
Quesito posto al DevDay di Bologna ad uno dei '.Net Evangelist'
Microsoft.....
Si sono guardati in faccia come se avessi chiesto informazioni sul Cobol, ed
hanno risposto che 'Arriverà qualcosa di terze parti".
Simpatici, vero?
Alberto

W la Microsoft

 sviluppo! ;-)
Hai ragione, peccato che la seriale sia credo leggermente più semplice da
utilizzare per la gestione di piccole periferiche esterne: per non contare
che il 95% di esse funziona GIA' da seriale, e non tutti sono intenzionati a
ri-creare una periferica esterna solo per adattarla all'USB.
Non trovo giusta questa scelta di MS.

Non trovo giusta questa scelta di MS.
Fosse la sola ingiusta... è giusta dal loro punto di vista... :(
-- 
Visita il sito comune del NG: 
http://www.it-lang-vb.net
Visit: 
http://www.hardwaretips.com

 ri-creare una periferica esterna solo per adattarla all'USB.
Non ho ancora affrontato il problema, però mi pare esistano spinotti
convertitori USB<-->RS232
ciao

Da tempo ho pubblicato una classe per la gestione della seriale in Vb.Net.
la trovi qui: 
http://www.allapi.net/classlib/class.php?id=15
HTH
Corrado
PS: Dicono che sia comunque possibile utilizzare mscomm32.ocx anche in
VB.Net, Io non ho mai verificato...

 ha scritto nel messaggio
news:kk_v8.40530$vF6.1...@news2.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: scusate nuovamente: problema con SSTAB

Ho un piccolissimo applicativo in cui uso una SSTab
Il problema è che su un tab ho unaDBgrid su un'altra ho una picture e su
un'altra delle text.
Se faccio partire l'ìapplicazione dal tab in cui è presente la picture tutto
funziona regolarmente, se faccio partire da un altro tab mi trovo nuovamnte
la picture in primo piano che mi mangia cio che c'è sotto e mi trovo così
due tab con la picture
Cos'è sto mistero????
Ciao e grazie

"Blues Brothers" ha scritto:

Sicuro che Picture.Container = SSTab?
Ciao,
Carlo.
Newsgroup: it.comp.lang.visual-basic
Titolo: IMMAGINE PICCOLA MA IL MDB SI INGRANDISCE ENORMEMENTE

PERCHE'  SE COLLEGO (O INSERISCO) UN'IMMAGINE DI 10 K SU UN CAMPO OLE DI UN
MDB, L'MDB MI SI GONFIA DI 3 MB?
ANCHE CON COMPACT NON SI SGONFIA!
RINGRAZIO ANTICIPATAMENTE CHI MI AIUTA.
CIAO A TUTTI I NGISTI

 RINGRAZIO ANTICIPATAMENTE CHI MI AIUTA.
non scrivere tutto maiuscolo! sennò sembra che stai urlando come un dannato!

Newsgroup: it.comp.lang.visual-basic
Titolo: Help per macro in VBA per Excel

Ciao,
uso Excel 2000 e ho scritto due macro: una legge dei dati dal foglio di
excel, sulla base di questi scrive in determinate celle dei link ad
un'applicazione esterna; l'altra esegue dei conti con il metodo di newton
(in pratica trova la radice di una funzione per iterazione, una specie di
solver...).
Entrambe le macro (mhh...forse la prima è una sub, l'altra è una
funzione...mah) funzionano correttamente se eseguite singolarmente su fogli
diversi.
Se però provo ad eseguirle quando sono rpesenti entrambe nello stesso
foglio, con la seconda che orpea sui dati restituiti dalla prima, la prima
maxro si blocca subito, senza terminare...in pratica ho visto che non appena
questa scrive un valore, entra in funzione la seconda macro, senza che la
prima abbia finito, il problema è che poi quando la seconda macro ha finito,
la prima bnon torna in funzione!....
In pratica vorrei poter dire a vb: prima finisci l'esecuzione di questa
macro, e solo dopo procedi con il ricalcolo del foglio, utilizzando la
seconda macro......
Natualemnete impostare il calcolo manuale nn ha sortio effetto.
Chi mi può aiutare?? scusate l'esposizione poco precisa, ma non sono un
programmatoire ne un informatico!
Ciao
Ian
--
Dita a V
IaNjOeY
--
IaNjOeY da Milano
ZiPpO da Genova
Skipper 125 "Papero"  Cartazucchero
BMW R850R "Labbestia"  Avorio

 Natualemnete impostare il calcolo manuale nn ha sortio effetto.
    Un po' di codice non sarebbe male vederlo. L'incertezza, poi, sul fatto
che si tratti di sub o function fa venir qualche dubbio su quale possa esser
la "medicina" giusta...
    Intanto consulta la guida a proposito di:
        Property Calculation As XlCalculation
            Membro di Excel.Application
poi considera la possibilita' di uscire dalla seconda "cosa" senza eseguire
il codice se la prima "cosa" e' in esecuzione. Qualcosa del genere:
    Option Explicit
    Public bOnCalc As Boolean
    Sub PrimaCosa()
        bOnCalc = True
        ' ...
        bOnCalc = False
    End Sub
    Sub SecondaCosa()
        If (bOnCalc = True) Then Exit Sub
        ' ...
    End Sub
ma a me sembra una "pezza" e probabilmente il problema e', come al solito,
"a monte".
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

Newsgroup: it.comp.lang.visual-basic
Titolo: verifica stato di un programma

Salve,
vorrei sapere come si può determinare se un programma ,ad esempio word, è
aperto o meno.
Grazie.

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Path Windows

Come è possibile conoscere la directory in cui è installato Windows
sul PC corrente sia che si tratti di Win95/98/NT ???
In pratica esiste una variabile di sist
ema simile alla classica APP.PATH o magari qualche API ? 
(ho provato la getWindowsdirectory ma non sembra
sortire risultati.....)
Cra Man
c...@freemail.it

 sortire risultati.....)
Forse la usi male:
'--------------------------------------------------------------------
'Per ottenere la path di Windows
Declare Function GetWindowsDirectory Lib "kernel32" Alias
"GetWindowsDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As
Long
'--------------------------------------------------------------------
'Per Reperire la Directory di Windows
Public Function WindowsPath() As String
Dim Path As String
Dim strSave As String
    strSave = String(200, Chr$(0))
    WindowsPath = Left$(strSave, GetWindowsDirectory(strSave, Len(strSave)))
End Function
E naturalmente richiami la Function WindowsPAth che ti restituisce la
stringa della path: C:\WINDOWS e non C:\WINDOWS\ !!!
Ciaps
Stracca
P.S. Sul Sito Comune c'e' !!!
--
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
- - - - - - -
Cerca le risposte alle tue domande sul Sito Comune del
newsgroup it.comp.lang.visual-basic: 
http://www.murialdo.it/it_lang_vb
- - - - - - - - - - - - Magari prima leggi l'Help in
linea!  - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
- - - - - - -

Stracca...HAI RAGIONE..........IO Sbagliavo nell'utilizzo........
Ti ringrazio ..il tuo esempio funziona perfettamente!
Cra Man
c...@freemail.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Spazio su disco

Salve,
avrei bisogno di ricavare lo spazio disponibile (in byte) nell'unità
selezionata dall'utente...
Che istruzioni devo usare, considerando che l'unità viene selezionata con un
drivebox?
Grazie, buon proseguimento! ;-)

 wrote in message
4tx14.4273$Q.4...@typhoon.libero.it...


 drivebox?
Questo codice dovrebbe fare quello che richiedi.... bug permettendo :-)
Option Explicit
Private Declare Function GetDiskFreeSpaceEx Lib "kernel32" Alias
"GetDiskFreeSpaceExA" (ByVal lpRootPathName As String,
lpFreeBytesAvailableToCaller As Currency, lpTotalNumberOfBytes As Currency,
lpTotalNumberOfFreeBytes As Currency) As Long
Private Sub Form_Load()
    Dim Risp As Long, BytesLiberiTemp As Currency, Totale As Currency
    Dim Liberi As Currency, Usati As Currency
    Dim Drive As String
    Drive = Left(Drive1.Drive, 2) & "\"
    Call GetDiskFreeSpaceEx(Drive, BytesLiberiTemp, Totale, Liberi)
    Usati = Totale - Liberi
    MsgBox Liberi
End Sub
Ciao
Daniele
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
        Le risposte alle tue domande le puoi trovare su:
 
http://www.murialdo.it/it_lang_vb
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

 drivebox?
comunque la selezioni, avrai una lettera da cui partire. a questo punto
guarda nel sito di cesare rizzi ( url nei suoi post :), nel sito comune
 url un post si' e uno no :), o nel kpd
 
http://users.turboline.be/btl10148/apiguide/index.htm
  ) e cerca le api
tipo freediskspace. attenzione che ce n'e' un paio, un po' diverse.
ah ecco, ho recuperato un bel msg di neila nessa da
comp.lang.basic.visual.misc. c'e' un altro suggerimento ancora, e in piu' i
nomi esatti. grande neila:
... Meanwhile look up GetDiskFreeSpace and GetDiskFreeSpaceEx API's on
www.mvps.org/vbnet
 ...