mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: [vb5/6 - common dialog] selezionare cartelle anzichè file

la domanda l'avevo gią fatta io, e ho gią avuto risposta.
c'č un problema: come cavolo si utilizza ShBrowseForFolder?
ringrazio tutti
ciao
daniele

 daniele
nb: il codice qui sotto fa aprire la finestrella delle dir, tipo winzip, non
quella dei file.
ciao, a.
Private Sub cmdSetup_Click()
    On Error GoTo errman
If Width = MinWidth Then Me.Visible = False
    imgTest.Picture = LoadPicture()
    Timer1.Enabled = False
    Width = MaxWidth
    Height = MaxHeight
    Move (Screen.Width - Width) / 2, (Screen.Height - Height) / 2
    cmdOK.Visible = True
    imgTest.Visible = True
Me.Visible = True
    OldImgPath = ImgPath
    Dim tmp
    tmp = BrowseForFolder(Me.hwnd, _
        "Current folder: " & OldImgPath & "." & vbCrLf & _
        "The folder should contain only 320×400×256-color bitmaps." & vbCrLf
& _
        "Clic Cancel to keep the current folder.")
    If tmp <> "" And Right(tmp, 1) <> "\" Then tmp = tmp & "\"
    ImgPath = IIf(tmp <> "", tmp, OldImgPath)
    RefreshAll
    If Not ImgTrue Then
        MsgBox ("Folder does not contain any bitmaps! Run setup again!")
    Else
        File1.SetFocus
        File1.ListIndex = 0
    End If
    Exit Sub
errman:
    MsgBox Error
    ImgPath = GetWinDir()
    Resume Next
End Sub
Private Function BrowseForFolder(hWndOwner As Long, sPrompt As String) As
String
    Dim iNull As Integer
    Dim lpIDList As Long, lResult As Long
    Dim sPath As String
    Dim udtBI As BrowseInfo
    udtBI.hWndOwner = hWndOwner
    udtBI.lpszTitle = lstrcat(sPrompt, "")
    udtBI.ulFlags = BIF_RETURNONLYFSDIRS
    lpIDList = SHBrowseForFolder(udtBI)
    If lpIDList Then
        sPath = String$(MAX_PATH, 0)
        lResult = SHGetPathFromIDList(lpIDList, sPath)
        Call CoTaskMemFree(lpIDList)
        iNull = InStr(sPath, vbNullChar)
        If iNull Then sPath = Left$(sPath, iNull - 1)
    End If
    BrowseForFolder = sPath
End Function
'BROWSE FOR FOLDER
Public Type BrowseInfo
    hWndOwner As Long
    pIDLRoot As Long
    pszDisplayName As Long
    lpszTitle As Long
    ulFlags As Long
    lpfnCallback As Long
    lParam As Long
    iImage As Long
End Type
Public Const BIF_RETURNONLYFSDIRS = 1
Public Const MAX_PATH = 260
Declare Sub CoTaskMemFree Lib "ole32.dll" _
    (ByVal hMem As Long)
Declare Function lstrcat Lib "kernel32" Alias "lstrcatA" _
    (ByVal lpString1 As String, ByVal lpString2 As String) As Long
Declare Function SHBrowseForFolder Lib "shell32" _
    (lpbi As BrowseInfo) As Long
Declare Function SHGetPathFromIDList Lib "shell32" _
    (ByVal pidList As Long, ByVal lpBuffer As String) As Long

grazie milllissssime
Daniele
Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO a un novellino !!!

Da poco ho iniziato ad interessarmi a visual basic e mi sta prendendo
sempre  piu', anche se abituarsi al nuovo metodo di programmazione dopo
anni di c e pascal non e poi cosi facile. Venaimo al dunque:
stavo facendo uno dei tanti esercizi, che richiedeva l'uso del comando
aggiuntivo finestre di dialogo comuni (comdlg.ocx) selezionato il
suddetto controllo dalla lista mi appare il pulsantino bene lo seleziono
ma al momento di utilizzarlo un una volta trascinato sul form mi appare
un messaggio del tipo "non puoi utilizzare il controllo fase di
progettazione perche' non sono specificxatoi i diritti o la licenza per
questo controllo" al che rimango basito .
Se esiste una brava persona che mi aiuta ad aggirare questo piccolo
problema magari dicendomi dove posso trovare i moduli ocx utilizzabili
anche in fase di progettazione mi farebbe un grosso piacere.
vi ringrazio anticipatamente per ogni possibile aiuto che mi potrete
dare   :-).
bye Sam

 wrote in message 37564CE3...@hotmail.com...

<"novellino" mode ON>
Benvenuto sul newsgroup.
Ti consiglio di:
1) leggere il Manifesto di questo newsgroup, che contiene suggerimenti da
seguire per tenere un buon comportamento sul newsgroup (il manifesto e'
postato ogni 2 settimane sul newsgroup ed e' presente sul Sito Comune, vedi
sotto);
2) visitare il Sito Comune del newsgroup (
www.murialdo.it/it_lang_vb/
), vi
troverai un sacco di materiale utile per VB, nonche' articoli, recensioni di
libri e links ad altri siti interessanti.
<"novellino" mode OFF>
Come suggerito nel Manifesto, e' sempre meglio specificare la versione di VB
che usi, in modo da aiutare gli altri ad aiutarti meglio.
Immagino che tu stia usando VB5 o 6.
Il tuo e' un problema ben conosciuto.
Sul CD di VB5 (e forse anche su quello di VB6), nelle direstory
tools/controls/ trovi un file .REG. Lancialo con un doppio click e ti
sistemera' le informazioni di licenza nel registry di Windows.
--
Roal Zanazzi
z...@iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: HELP: rendere una variabile visibile al mondo esterno

Ho bisogno di un piccolo (per voi) aiuto... per poter andare in ferie
:-(((
Il mio capo, dopo promessa in fase di vendita, ha detto ad un cliente
che č possibile "svegliare" una qualsiasi applicazione fatta da terzi
dal nostro gestionale.
Il problema č che adesso il cliente la vuole!!!! Ma tale "feature" non
c'č!!!
In pratica dovrei fare in modo di rendere visibile una variabile del
mio gestionale ad una qualsiasi applicazione di terzi.
Penso che sia possibile tramite ActiveX/DLL o qualcosa del genere...
ma non ho la piů pallida idea su dove orientarmi.
Io vorrei fare in modo di creare una DLL o un activeX al quale passo
il mio valore, poi dico al cliente di includere tale DLL/ACTIVEX nel
suo riferimento e il gioco dovrebbe essere fatto (sto parlando come il
mio capo!!!)
E' possibile tutto cio? Mi potete dare qualche dritta?
Grazie mille dell'aiuto
Axl

 suo riferimento e il gioco dovrebbe essere fatto
Se l'applicazione di terzi può essere modificata non è difficile: fai un
activex exe che fa da bridge tra le varie app.
Ciao

 activex exe che fa da bridge tra le varie app.
Beh, se deve solo far vedere una sua variabile ad una singola altra
applicazione della quale possiede il sorgente, può anche scriverne il valore
nel registry, in un file o rendere pubblico un metodo del suo eseguibile
principale.
Oppure può scriverla direttamente nel database di questa seconda
applicazione, o mandargliela tramite sendmessage.
Le possibilità sono tantissime, sarebbe da capire meglio l'esigenza, e se
conta più la portabilità della cosa o la velocità di esecuzione/scrittura
del codice.
Ciao
*Roby* (temporaneamente redivivo)

 *Roby* (temporaneamente redivivo)
Ciao, abbronzato? :)

 Ho bisogno di un piccolo (per voi) aiuto... per poter andare in ferie
ALT FERMO STOP YARGALA'
!
se è solo una var ok come ti hanno detto...
non ne vedo l'utilità...potrebbero leggere questa var prima che il programma
l'abbia aggiornata o addirittura creata!...e a che serve allora?
non è invece che vogliono che la tua applicazione SIA INTERROGATA e risponda
la var?O che esponga oggetti(che poi è la medesima cosa!)?
(Esempio "Dammi l'ordine di Pippo del 10/3/02?"....sfrzzz...."Eccolo qua!"
oppure
"Mi dai le statistiche di vendita?"..bip bip Sblot.... "Ecco il file
digeribile da Excel!").....?
Nel caso devi scriverla davvero come ServerActivex (e qui ci vuole qualche
guru dell'OOP per non perderci !...io ho visto tutto un complessissimo e
completo  gestionale che  esponeva circa 200 oggetti...la SwHouse
organizzava corsi...ricombinando i server ti personalizzavi al massimo il
tuo gestionale..o aggiungevi nuove feature!...a saperlo fare un mito!....che
poi l'implementazione pratica non è fuori dal mondo...è il lavoro di
progettazione a monte che deve essere fatto bene! e che io non so fare e
pochi sanno fare bene!)
ciauz!
Newsgroup: it.comp.lang.visual-basic
Titolo: [URGENTE] Registro

Devo aggiungere una chiave al registro:
ci sono riuscito con l'istruzione:
Key = ScriviChiaveStringa("HKEY_LOCAL_MACHINE\SOFTWARE\Eniac\BN\BN",
"Flag.High", "< >*")
Ora:
se devo aggiungere un valore stringa, tutto ok se devo agiungere un valore
numerico di valore 0 ad esempio
Key = ScriviChiaveNumero("HKEY_LOCAL_MACHINE\SOFTWARE\Eniac\BN\BN",
"Response Time", "00000000")
la chiave non viene aggiunta per niente, ed  io ho bisogno anche del valore
0
Ciao e grazie a tutti.

 ha scritto nel messaggio
news:anrjai$8q7q$1...@stargate1.inet.it...


 > "Response Time", "00000000")
forse è qui l'inghippo, tu vuoi inserire un valore numerico, ovvero 0,
perchè per passare il parametro usi le virgolette?
ho visto che la tua funzione vuole un valore long, con la tua sintassi passa
alla funzione
una stringa
--
bye BlackMagic
ICQ: 85485468

 ha scritto nel messaggio
news:anrom1$gq7nl$1...@ID-150836.news.dfncis.de...


 "Response Time", 0)
Forse perchè nella funzione c'è scritto che se è 0 non fa niente?
(ma l'hai fatto il debug? :) )
Ciao
--
' // Initialize the expression evaluator
Engines.Evaluator = CreateObject("
http://www.neodatatype.net
")
' // you can find resources for and from the NG here!
Me.SitoComune = "
http://www.it-lang-vb.net
"

 ha scritto nel messaggio
news:Kqeo9.18114$cS4.7...@news2.tin.it...


       End If
Quanto vale Default, se non passato? 0, dieri.
Quindi "If Valore <> Default Then" non è mai soddisfatta passando 0, nè
passando "0000000" perchè attente un Long, non una String.

 End Function
appunto anche se è commentata, non è quello il problema, la tua condizione
diventa
if valore<>default then
    ...fai qualcosa
else
    ...codice commentato quindi su else non fai niente
end if
se default è 0 la tua funzione fa qualcosa solo se valore NON è 0
per questo quando valore è 1 tutto funziona.
p.s. un consiglio spassionato segui un corso di quotatura :))


 ha scritto nel messaggio
news:anrvnc$ga7q5$1...@ID-150836.news.dfncis.de...


Newsgroup: it.comp.lang.visual-basic
Titolo: Invio fax

c'è un modo per automatizzare l'invio dei fax con WinFax Pro 10?


Si, cerca nell'help la parola DDE.
C'è anche l'esempio di come fare in VB.
Ciao
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

Newsgroup: it.comp.lang.visual-basic
Titolo: Copiare i dati dal web

E' possibile copiare una riga di una pagina web?
Ad esempio se io ho una pagina web nella quale ci sono scritte 5 righe di
testo e voglio copiare la seconda in un files.txt come posso fare???


 Copia & Incolla no?
Ciao
--------------------------------
Inviato via 
http://usenet.libero.it

 testo e voglio copiare la seconda in un files.txt come posso fare???
1) oggetto Microsoft Internet Trasfer Control, per gli amici INET
2) recuperi la pagina dentro una stringa
3) ti fai il parsing e cerchi quello che vuoi
4) lo metti in un file o dove ti pare
Gianni
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con DLL

Salve a tutti,
è la prima volta che posto e che uso Visual Basic.
Il mio problema si riassume in breve :
- ho creato una DLL in visual C 6.0 che dovrebbe preparare dei pacchetti da
inviare tramite seriale ad un dispositivo esterno.
Stavo creando un applicativo in VB 6.0 per testare il dispositivo esterno ed
ho un problema riguardo alle chiamate di funzioni DLL in VB.
Il problema che riscontro è un mal indirizzamento del passaggio parametri
delle funzioni tra VB e VC.
Con il debugger del VC verifico che l' indirizzo dello stream di dati
definito nel VB è all' indirizzo 0x6af4ec mentre lo stesso stream passato
come parametro al VC si trova a 0x6af480. Non riesco a capire questa
differenza.
Vi posto anche i prototipi delle chiamate e parte del codice se qualcuno
riesce a darmi una spiegazione.....
******* Visual C ************
__declspec(dllexport) BYTE WINAPI AskDataMonitor(BYTE Id, BYTE FAR *packet)
******* Visual Basic ************
Private Declare Function AskDataMonitor Lib "Mylib" (ByVal Id As Byte, ByRef
buff As Variant) As Byte
la chiamata in VB è fatta in un bottone sull' evento di Click.
Private Sub Command1_Click()
Dim flg As Boolean
Dim i As Byte
Dim buf As String * 10
flg = False
'preparare comando da spedire
If Check21.Value = 1 Then
  If (Combo1.ListIndex <> -1) Then
    i = AskDataMonitor(Combo1.ListIndex + 1, buf)
    flg = True
  Else
    MsgBox ("Devi configurare l' ID")
    flg = False
  End If
End If
If (flg = True) Then
  Timer1.Enabled = True
End If
End Sub
Grazie a chi mi risponderà............
Saluti a tutti
--------------------------------
Inviato via 
http://usenet.libero.it

 As Byte
Provato "ByRef buff As Long" invece di variant per il puntatore?
Lokar
-- 
Sito Comune: 
http://www.it-lang-vb.net/
Manifesto: 
http://www.it-lang-vb.net/docs/Manifesto.txt
UGIdotNET - 
http://www.ugidotnet.org
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema somma in quey

Salve,
ho il seguente problema che da due giorni non riesco a rosolvere:
Possiedo una query che mi dą come risultato movimenti effettuati da
clienti che possiedono un codice
CODICE	CLIENTE		IMPORTO
000001		Cliente1			30.00
000001		Cliente1			40.00
000002		Cliente2			50.00
000002		Cliente2			20.00
000002		Cliente2			10.00
000003		Cliente3			50.00
000003		Cliente3			-50.00
Il mio problema č che vorrei vedere tutti i dettagli dei movimenti
proprio come vi ho descritto ma senza il cliente 000003 poichč la
somma degli importi movimentati fa 0.
In pratica il risultato dovrebbe essere il seguente:
CODICE	CLIENTE		IMPORTO
000001		Cliente1			30.00
000001		Cliente1			40.00
000002		Cliente2			50.00
000002		Cliente2			20.00
000002		Cliente2			10.00
In che modo posso far capire alla query che se la somma dei movimenti,
codice per codice, fa 0 escludi quei movimenti?
Grazie

devi trasformare un attimo la tua query, credo. Allora, tu hai una query che
fa così:
CODICE CLIENTE IMPORTO
000001 Cliente1 30.00
000001 Cliente1 40.00
000002 Cliente2 50.00
000002 Cliente2 20.00
000002 Cliente2 10.00
000003 Cliente3 50.00
000003 Cliente3 -50.00
ok. Trasformala con una GROUP BY in una cosa tipo:
CODICE CLIENTE IMPORTO
000001 Cliente1 70.00
000002 Cliente2 50.00
000002 Cliente2 80.00
000003 Cliente3 0.00
000003 Cliente3 0.00
cioè, fai direttamente la somma degli importi. Adesso, con una semplice
clausola WHERE puoi dire
WHERE IMPORTO<>0. Se proprio ti serve il dettaglio, lo fai vedere solo solo
quando l'utente vuole, cliccando sulla riga del cliente o in altro modo.
good coding!!!
-- 
Damiani Liborio Igor
http://www.igordamiani.it
Nella finestra Debug di VB:
Nome="igor":? Nome & Chr$(64) & Nome & "damiani" & Chr$(46) & "it"
Che tu sia maledetto, SWEN...

good coding!!!
Ciao e grazie della rsposta.
Allora.
In effetti la mia query è molto più articolata, ho scritto questa per
semplificarla ma in sostanza è simile.
Avevo già pensato alla soluzione proposta da te ma purtroppo non fa al
caso mio.
Io ho bisogno di avere il risultato proprio come l'ho descritto, ma
con la sola escluzione delle righe cui somma fa 0.
Esiste una soluzione?

 Esiste una soluzione?
Non provato: Group By + Having

 Non provato: Group By + Having
Provato:
Select
    data_movimento, cliente, importo
From
    movimenti
Where
    cliente Not In
         (Select cliente From movimenti Group By cliente Having
Sum(importo)=0)
Order By
    cliente, data_movimento



LUPO SEI GRANDEEEEEEEEEEEEEEE!!!!!!!!!!!!!!!
Mi hai risolto un grandissimo problema!!!!!!!
Grazie di cuore.
Newsgroup: it.comp.lang.visual-basic
Titolo: Messaggio di errore per componenti

Il messaggio e' "Non sono disponibili informazioni sui diritti di licenza
per questo componente. Non sono disponibili i diritti di licenza necessari
per utilizzare questa funzione in ambiente di progettazione." Come ovviare
al problema.
Grazie
Alberto Mazzocchi

Quando hai installato il software, ti ha chiesto di quante licenze volevi
usufruire.
Beh, dovevi sceglierne di più.
L'unica soluzione che vedo è disinstallare e reinstallare.
Ciao

AlexMessoMalex ha scritto:

???
Non credo proprio.
Probabilmente il componente che stai usando è presente sul tuo sistema, ma è
stato registrato da qualche applicazione, e tu non godi dei diritti di
licenza per utilizzarli a design-time. Per utilizzarlo devi aquistare (o
registrare) il componente.
Potrebbe anche essere stato cancellato il file .lic che contiene il codice di
licenza, senza il quale molti controlli commerciali non funzionano a
design-time.
Perché non ci dici, Alberto, di che componente si tratta?
Flavio Ronco
--
f.ronco@*NonMiServeNiente*
flashnet.it
http://www.metabrains.com
  [Under Construction]
-------------------------------------------------------------
"Che pubblico in gamba! Se ci dite dove lavorate,
domani mattina se abbiamo tempo vi veniamo a vedere"
[Paolo Rossi]

 wrote in message
pS6D3.1979$Iq6....@typhoon.libero.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: [?2] differenze tra CommitTrans eUpdateBatch

Salve a tutti,
sto iniziando a vedere come gestire l'accesso/ modifica dei dati da parte di
più utenti simultaneamente e credo che i metodi da utilizzare possono
essere: BeginTrans; CommitTrans; RollbackTrans; UpdateBatch; CancelBatch (se
ce ne sono altri più semplici e meglio funzionanati fatemelo sapere!!). Ho
visto che i primi tre sono collegati alla Connection mentre gli altri due al
Recordset. Che differenza c'è tra di loro?? Quando usare gli uni a quando
gli altri??
Grazie 1000 a tutti e scusate nel caso sia stato poco chiaro o se la domanda
fosse banale!!
Ciao.
Paul.


per prima cosa MSDN ...
poi  vedrai che ti si chiariranno le idee
Saluti

 wrote in message
news:9r115h$nvc$1...@fe2.cs.interbusiness.it...

Ma è da lì che ho preso le informazioni e non ho capito le difefrenze (a
parte che uno lavorasul Recordset e l'altro sulla Connessione)
Grazie per la risposta.
Ciao.

Newsgroup: it.comp.lang.visual-basic
Titolo: Numero di riga e di colonna in Word

Qualcuna sa dirmi qual è la proprieta in Word che indica il numero di riga e
di colonna in cui posizionato il cursore?
La mia necessità è di trovare se il documento contiene campi.
Ho usato l'istruzione Selection.GoTo What:=wdGoToField, Which:=wdGoToNext,
Count:=1
Ma non riesco a trovare qualcosa che mi dica se il campo è stato trovato o
meno, quindi pensavo di interrogare il numero di riga e di colonna per
verificare se fosse cambiato dopo la ricerca.
Sapete se esiste qualcosa da verificare per sapere se il campo è stato
trovato?
Grazie per l'aiuto.
Ciao
Skysurfer

 ha scritto nel messaggio
news:ttoJ9.680$TC5....@twister1.libero.it...

non mi e' ben chiaro cosa serve la posizione del cursore con i campi modulo
di word
per sapere se esistono in un file word dei  campi modulo potresti usare la
l'oggetto bookmarks prop count
MyWordDoc.ActiveDocument.Bookmarks.Count
Ciao stefano
Newsgroup: it.comp.lang.visual-basic
Titolo: Come rinominare un file?

Ciao, dovrei rinominare un file da codice VB, qualcuno è così gentile da
dirmi come è possibile fare?
Grazie
Lorenzo

Newsgroup: it.comp.lang.visual-basic
Titolo: Connessione Oracle non riuscita

Purtroppo il collegamento ad ORACLE non funziona, sapresti dirmi come si cotruisce un file .udl.
Ti ringrazio Ciao :))
 ___________________________________________________
 Se vuoi un indirizzo di posta elettronica gratuito, iscriviti a
 
http://www.katamail.com
 Da oggi anche l'instant messenger targato Kataweb
 
http://www.kwmessenger.kataweb.it/
-- 
Posted from 
c000-h002.c000.muc.cp.net
 [209.228.29.26] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

>Purtroppo il collegamento ad ORACLE non funziona, sapresti dirmi come si cotruisce un file .udl.
<OT mrStat=vale_sia_come_OT_che_come_IT_? emoticon=;-) >
Meno male che mi sono ricordato ! Il post e' arrivato senza l' id del suo parent
(cioe' il campo References dell' header era mancante).
Penso sia da addebitare all' interfaccia utente non proprio riuscitissima di Mailgate.
</OT>
Per generare il file udl basta seguire lo wizard.
Pero', posteresti la connection string che hai usato ?
(camuffando nome db, utente e password, ovviamente !)
ciao, hal

Ci sono riuscito, creando un risorsa ORACLE-ODBC nella mia macchina è passando la seguente stringa alla ConnectionString :
connstring = "DSN=paperino;uid=pluto;pwd=pippo;"
P.S. 
"Dove si trova il Wizard per creare le connessione, non sò dovè il pulsante/opzione"
Grazie! :))))
 ___________________________________________________
 Se vuoi un indirizzo di posta elettronica gratuito, iscriviti a
 
http://www.katamail.com
 Da oggi anche l'instant messenger targato Kataweb
 
http://www.kwmessenger.kataweb.it/
-- 
Posted from 
c000-h025.c000.muc.cp.net
 [209.228.29.117] 


metti sul form un adodatacontrol e col tasto destro del mouse vai sul menů
di composizione della stringa
Newsgroup: it.comp.lang.visual-basic
Titolo: M$, dove vuoi andare oggi?

Error 1311. Source file not found: D:\OFFICE1.CAB.
Verify that the file exists and that you can access it.
Questo dall'installazione di Office XP tramite CD di MSDN Universal sotto
W2k...
Per la cronaca, il file D:\OFFICE1.CAB risulta hidden.
M$ XPerience...
Ciaotutti,
*

 *
il cd di office nextperience dira':
    Verify that the file exists and that _i_ can access it.

Occerre proprio rispondere alla domanda dell'oggetto?
Ciao


Beh quello e' piu' che altro dove vorresti mandarli... :P
Ciaotutti,
*

Newsgroup: it.comp.lang.visual-basic
Titolo: REQ: Sono disperato!!!

Ciao a tutti, ultimamente mi si č presentato un problema, mi sapete spiegare
perchč la mia applicazione lanciata via VB non mi dą alcun errore, mentre se
genero l'eseguibile, quando lo eseguo mi da l' errore:
Errore di run time 13
Tipo non corrispondente
Mi sto scervellando, ma non riesco a trovare una soluzione!! Ringrazio
chiunque mi possa aiutare!
Ciao, Pasquale :-)

 Tipo non corrispondente
hai provato a mettere qualche MsgBox qui e là per vedere dove s'impianta? o,
meglio ancora, fargli fare un file log? così dovresti riuscire facilmente a
capire dove genera errore (il perché, poi, è un altro discorso    :))
Ciao
Faber

 ha scritto nel messaggio
news:8hnkeb$pef$1...@nslave2.tin.it...





 perchè la mia applicazione lanciata via VB non mi dà alcun errore, mentre se


 wrote in message
g7I%4.140431$VM3.9...@news.infostrada.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Nuovo record in posizione specifica

Ciao a tutti.....
Ho bisogno di un grandissimo aiuto: come faccio ad inserire un record subito
dopo uno specifico? (metodo ADO)
E' l'ultimo passo per finire il mio progetto....
Grazie in anticipo!!!

scusa ma a che ti serve metterlo in una posizione specifica?

 ha scritto nel messaggio
news:iXNR7.233$7%3.3...@twister1.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Chiudere Excel.application

Ciao.
ho installato office 97... ovvero riferimenti word document 8 e excel
document 8, vb6 sp4
Apro una applicazione word (word.application), carico un .doc e poi chiudo
tutto con il metodo .quit
Tutto bene.
Ora apro una applicazione excel (excel.application), carico un .xls e poi...
capperonzoli! il metodo .quit non c'è... provo con il metodo .close... MA
l'applicazione rimane "viva" (non si vede, ma task manager di WinNTme la dà
come caricata).
Se adesso apro excel mi trovo un foglio di lavoro vuoto (quello "mio") + un
foglio di lavoro con nome "Object" che non so cosa sia.
Excel.application si "chiude" solo quando chiudo anche il mio programma.
Insomma: sapete come chiudere una appl excel creata con dim foglio as
excel.application?
Grazie.

> Ricc:

Non chiamerei "foglio" la variabile alla quale assegni l'oggetto Application
perche' potrebbe essere fuorviante in una successiva lettura del listato.
Normalmente la si chiama xlApp.
A parte questo... confronta il tuo codice col seguente:
  Dim xlApp As Excel.Application
  Dim xlWbk As Excel.Workbook
  Dim xlWks As Excel.Worksheet
  Set xlApp = New Excel.Application
  Set xlWbk = xlApp.Workbooks.Open("c:\pippo.xls")
  Set xlWks = xlWbk.Worksheets("Foglio1")
  <...>
  xlWbk.Close
  xlApp.Quit
  Set xlWks = Nothing
  Set xlWbk = Nothing
  Set xlApp = Nothing
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

Newsgroup: it.comp.lang.visual-basic
Titolo: wav to mp3

ciao ragazzi
volevo sapere se è possibile tramite vb
convertire un file wav in mp3
grazie mille a tutti
Fabry

 convertire un file wav in mp3
Sfruttando LAME:
http://www.mp3dev.org/mp3/
potresti fare un frontend...
Oppure potresti passare al formato OGG Vorbis...
Ciao

 wrote in message
amefag$2h3o$1...@half.spin.it...


 grazie infinite di nuovo
Figurati
PS:
Si quota (cita) sotto al testo e non sopra...
Le regole per una civile confivenza sul NG le trovi qui:
http://www.it-lang-vb.net/docs/Manifesto.txt
e una breve descrizione del quoting qui:
http://www.hardwaretips.com/modules.php?name=News&file=article&sid=9
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] [ADO] CompactDatabase

Salve a tutti.
il mio piccolo problema odierno è il seguente:
come faccio a fare il compactdatabase (che usavo in DAO) con ADO?
Utilizzo VB6 Sp5.
Grazie anticipatamente
Aran

 il mio piccolo problema odierno č il seguente:


 Utilizzo VB6 Sp5.
devi aggiungere ai riferimenti la libreria JRO
il metodo lo trovì lì dentro..
così invece di una sola libreria (DAO) ne abbiamo 3 (ADO - ADOX e JRO)
e poi parlano di progresso arghh :(
--
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
Newsgroup: it.comp.lang.visual-basic
Titolo: superenalotto e combinazioni

Dati ad esempio 8 numeri, sapete come tirar fuori, con un po' di codice,
le 28 combinazioni di numeri a gruppi di 6?
Se si, come?
grazie Riccardo

le 28 combinazioni di numeri a gruppi di 6?
http://www.edscuola.it/archivio/didattica/calcomb.ppt
-- 
hth, hal

 wrote in message
a3tdin$1b6vi4$1...@ID-56381.news.dfncis.de...

forse mi sono spiegato male.
non mi interessa sapere quante combinazioni ci sono (il calcolo delle
combinazioni)
ma tutte le combinazioni di numeri che si generano.
ciao e grazie
Riccardo

ma tutte le combinazioni di numeri che si generano.
Uno dei mei preferiti:
http://www.flanguasco.org/
per la precisione
http://www.flanguasco.org/VisualBasic/CalcComb.ZIP
mi pare faccia quello che chiedi.
-- 
ciao, hal

 le 28 combinazioni di numeri a gruppi di 6?
Ecco una semplicissima routine ricorsiva. Per avere le permutazioni anziché
le combinazioni basta cambiare la chiamata nel For in
Dim sol As Long
Private Sub Comb(ByVal n As Integer, ByVal a As String, ByVal b As String)
    If Len(a) = n Then
        sol = sol + 1
        Debug.Print a
        Exit Sub
    Else
        For i = 1 To Len(b)
            Comb n, a & Mid$(b, i, 1), Mid$(b, i + 1)
        Next i
    End If
End Sub
Uso:
Private Sub Form_Load()
    sol = 0
    Comb 6, "", "12345678"
    Debug.Print sol
End Sub
Output:
123456
123457
123458
123467
123468
123478
123567
123568
123578
123678
124567
124568
124578
124678
125678
134567
134568
134578
134678
135678
145678
234567
234568
234578
234678
235678
245678
345678
 28
Ciao, Silv:o)

 le 28 combinazioni di numeri a gruppi di 6?
Ecco una semplicissima routine ricorsiva. Per avere le permutazioni anziché
le combinazioni basta cambiare la chiamata nel For in
Comb n, a & Mid$(b, i, 1), Mid$(b, i + 1)
In pratica č il metodo che si usa a mano.
---------------------------
Dim sol As Long
Private Sub Comb(ByVal n As Integer, ByVal a As String, ByVal b As String)
    If Len(a) = n Then
        sol = sol + 1
        Debug.Print a
        Exit Sub
    Else
        For i = 1 To Len(b)
            Comb n, a & Mid$(b, i, 1), Mid$(b, i + 1)
        Next i
    End If
End Sub
---------------------------
Uso:
sol = 0
Comb 6, "", "12345678"
Debug.Print sol
Output:


 le combinazioni basta cambiare la chiamata nel For in
in?
Comb n, a & Mid$(b, i, 1), Mid$(b, i + 1)
Le PERMUTAZIONI sono particolari disposizioni: basta che n sia uguale al
numero totale di elemnti da permutare, per esempio: Comb 3, "", "abc"
In pratica è il metodo che userei "a mano".
Ciao, Silv:o)
Newsgroup: it.comp.lang.visual-basic
Titolo: Corso + assunzione

Il Gruppo Scientifico Centese  seleziona per
importante software house
20 lauretati in scienze informatiche/matematiche
per un corso GRATUITO con borsa di studio
e assunzione finale presso l'azienda promotrice.
Durata del corso: 600 ore
8 ore giornaliere
Linguaggi:C++ e Java
Previsione inizio corsi: ottobre 1999
Luogo di svolgimento: Cento(Fe)
L'azienda promotrice del corso ha sede
in Bologna ma opera su tutto il territorio
nazionale e all'estero. Si richiede quindi
disponibilità in merito.
Per informazioni:
Mauro Gamberini
responsabile settore informatica
Gruppo Scientifico Centese
tel. 051904417-051903228
http://www.comune.cento.fe.it/gscentese/index.html
g...@comune.cento.fe.it

Sei un pochino OT

...


 sarebbe male.
lo stesso discorso vale per te, se ti fossi informato prima di postare la
tua "nobile" offerta, avresti senza dubbio messo almeno un [OT] prima del
soggetto...
con questo non intendo criticare la vostra iniziativa, che personalmente
reputo ammirevole!
ciaoz
Obese Dwarf

soggetto...
Tutto alla luce del sole.
Puoi toglier le virgolette a nobile.
Ok per [OT].
Giochiamo ancora o buona cosě?


Grazie.

Come vedi non sono l'unico a pensarla cosě.
Sei tu che devi informarti.
Bai Bai

Newsgroup: it.comp.lang.visual-basic
Titolo: About VB5

Salve a tutti
Scrivo per chiedere un consiglio.
Sono alle prime armi con VB5 per fini hobbistici.
Il quesito è il seguente:
Devo ottenere un eseguibile che mostri a schermo un form contenente due
tasti "Esci" e "Avvia". Il tasto esci ha una ovvia funzione mentre quello
avvia deve lanciare un'applicazione esterna nella fattispecie il
multimediaplayer di Windows che a sua volta apra un filmato "*.mpg".
Per il tasto esci, letti un po' di libri, ho risolto perfettamente mi rimane
irrisolta la modalità di associare al tasto avvia l'esecuzione di
mplayer2.exe!!!
Qualcuno sa offrirmi una scialuppa?
Grazie
L'obbiettivo del mio lavoro è quello di far avviare in maniera automatica un
file mpg da CD-Rom in macchine con S.O. Windows 95 e 98.
Quindi l'architettura da me scelta è la seguente:
autorun.inf --> start.exe --> mplayer2.exe
Ho già provato a porre al posto di start.exe un star.bat ( per ovvia
scorciatoia) ma l'autorun.inf non gusta questa soluction
lanciando invece start.bat da gest.ris. di windows tutto gira
perfettamente!!
mplayer2.exe: Clip.mpg
(questa è la stringa di start.bat che avvia perfettamente la riproduzione di
clip.mpg)
P.S.
Non mi offendo assolutamente se qualcuno propone una strada più consona,
visto la mia conoscenza del linguaggio 8-).
--
-----------------------------
Giulio Giambalvo
giu...@tiscalinet.it

 perfettamente!!
E se mettessi direttamente il file MPG al posto di start.exe? Non ne sono
certo, ma potrebbe anche funzionare se nel sistema l'MPG è un'estensione
riconosciuta.
Ciao
--
Nino Stella
Inteldata Srl
email: 
nino...@tin.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Modificare contemporaneamente le dimensioni di tutti gli oggetti in un form

E' da un po' di tempo che sto cercando un modo per far si che quando
l'utente ridimensiona la maschera, tutti gli oggetti che vi sono
contenuti subiscano il giusto ridimensionamento (txtbox, label..)(.
Che problema c'e' direte voi ... e' facile se esplicitiamo in un
apposita procedura tutti gli oggetti che vi sono contenuti ... ma
siccome io vorrei generalizzare la soluzione (nel senso che non vorrei
dovermi ricordare di inserire nell'apposita procedura tutti gli
oggetti che in seguito inserisco) quello che finora ho trovato è la
collezione FORM.CONTROL che contiene tutti gli oggetti all'interno ...
Ma ovviamento la procedura non è sempre efficace, soprattutto quando
nella maschera c'e' un oggetto timer che ovviamente non ha proprietà
WIDTH e HEIGHT ... 
Che mi dite voi ?
Ciao 

 ha scritto nel messaggio
news:3c20e12a...@news.tiscalinet.it...

Nel ciclo For Each ... Next inserisci il controllo del tipo di oggetto:
Dim vntOggetto As Variant
For Each vntOggetto In Me.Controls
    If TypeOf vntOggetto Is  CommandButton Then
        'Quello che devi fare con i bottoni...
    End If
    If TypeOf vntOggetto Is TextBox Then
        'Quello che devi fare con i TextBox...
    End If
    If TypeOf vntOggetto Is  Label Then
        'Quello che devi fare con le Label...
    End If
    'Eccetera...
Next
Ciao!
Esteban
Hosted by 
www.seber.it
Già scaricato l'Euroconvertitore
(
www.seber.it/freeware/esconvert/esconvert.html
)?

Next
Come soluzione non č niente male perņ volevo sapere se c'era un modo
per ridimensionare gli oggetti semplicemente se supportano, ad
esempio, la proprietą width.
Certo, so di chiedere molto.
Grazie,
Ciao.

 Ciao.
E allora fai così:
Dim vntOggetto As Variant
On Error Resume Next
For Each vntOggetto In Me.Controls
    vntOggetto.Width = newWidth
    vntOggetto.Height = newHeight
Next
On Error GoTo 0


Newsgroup: it.comp.lang.visual-basic
Titolo: aiuto contatore

Salve a tutti i partecipanti al newsgroup.
Ho realizzato un form con all'interno una listbox che ha come origine dati
un file txt esterno.
Volevo associare a questa listbox un contatore di righe, che mi fa vedere il
risultato in una textbox posta nello stesso form.Quale è il codice da
utilizzare?
Fatemi sapere.
Nell'attesa ciao e grazie.





jjletho wrote:

Quali righe vuoi vedere?
quelle della lista o le righe del txt?

 ha scritto nel messaggio
news:3AACFA2A...@everex.it...


Alberto Simonazzi wrote:

nel caso volessi contare le righe del listbox applica il seguente codice
nell'evento list1.click
text1.text = list1.listindex + 1
In altrui caso chiariscimi la situazione
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: [Repost] Grafici e tabelle per gestire dati

Salve a tutti!
Volevo chiedervi secondo voi qual è la soluzione piu' adeguata a questa
situazione.
Leggo ripetutamente una variabile long (anche 5.000 volte al secondo...) e
devo inserire i dati letti in una tabella (tempo trascorso dalla prima
misurazione, dato registrato), e poi fare un grafico (linea, XY e
istogramma) in "tempo reale". Quello che alla fine devo poter fare è di
cabiare adeguatamente la scala di visualizzazione e se possibile salvare i
dati dalla tabella in un formato diffuso (tipo CSV o XLS).
Pensavo di utilizzare una datagrid + mschart, ma ho subito avuto qualche
problema a gestire ADO. Non c'e' nulla di piu' semplice? Avete
documentazione online da consigliarmi? O altre idee?
Grazie a tutti
Lorenzo

 O altre idee?
Soprattutto auguri: ridisegnare un grafico 5000 volte al secondo non deve
essere una cosa molto agevole ;-)
Salutoni
Sergio

 essere una cosa molto agevole ;-)
Beh, 5000 volte al secondo scrivo i dati nella tabella, poi nel grafico ne
prendero' uno ogni 1000 o giu' di li'!

 grafico ne prendero' uno ogni 1000 o giu' di li'!
Ecco, partiamo da qui....
Hai la necessità di scrivere un qualcosa, e da un'altra parte leggerlo per
visualizzarlo.
Nel tuo caso incomincerei a fare delle "prove di carico", perchè 5000
operazioni al secondo possono essere veramente tante, e quindi sceglierei la
tecnica di salvataggio dati in funzione del fatto che possa sostenere questi
ritmi o meno. Appoggiarsi ad un database tramite ADO (o qualsiasi altra
libreria) credo che sia la soluzione in assoluto più semplice, anche se la
meno performante. Se vuoi, sulla parte di ado posso vedere di darti una
mano, per quanto poi riguarda il grafico, mi spiace ma non ho esperienza in
merito.
Salutoni
Sergio

 mano, per quanto poi riguarda il grafico, mi spiace ma non ho esperienza
in
Mah, per il grafico ho visto che msChart e' abbastanza soddisfacente e
semplice da usare, putroppo ADO mi blocca, non l'ho mai usato.
In sostanza dovrei in ogni ciclo leggere la var. "dato" e associarla ad un
tempo in ms trascorsi dalla prima misurazione "tempo". Devo salvare i due
dati in un record del DB e visualizzarlo in una tabella. Infine devo poter
salvare il file in formato XLS (per questa parte avrei gia' trovato una
routine sul sito comune).
Se hai consigli te ne sarei molto grato.
Grazie ancora
Ciao
Lorenzo

Io sono di fronte ad una problematica molto simile alla tua. Posso chiederti
cosa succede quando aquisisci troppi dati ?
Nel senso che dopo molte ore di acquisizione il grafico diventa troppo
affollato e diventa molto difficile la lettura. Quindi ho pensato che
sarebbe piu' agevole mantenere una scala fissa e magari aggiungere una barra
di scorrimento per visualizzare lo storico.
Tu  in che direzione ti stai muovendo ?

> Tu  in che direzione ti stai muovendo ?
Beh a me servono solo pochi secondi max minuti di acquisizione, ma se si
dovesse presentare il problema penso proprio che utilizzero' una scrollbar.
Ciao
Lorenzo
Newsgroup: it.comp.lang.visual-basic
Titolo: dichiarazione in VB.net

scusate perchè se dichiaro un arraylist pubblico e poi faccio una
operazione di caricamento dei dati da un modulo non viene aggiornato?
Se invece lo dichiaro all'interno del modulo si? Grazie

ok ho risolto ciao a tutti

 ok ho risolto ciao a tutti
Come ?!?!
Scrivi come hai risolto... in quanto potrebbe essere utile ad altri.
Bye,
-- 
Carmine ( 
pikachu...@gmail.com
 (Togli la scritta NOSPAM) )
Webmaster di The Total Site 4 : 
http://www.thetotalsite.it
My Blog: 
http://blog.thetotalsite.it
MariokartDS Codice Amico: 532639027909 - CarmineC in MarioKartDS
Se un circuito funziona al primo tentativo è perchè il problema è molto
più nascosto e subdolo di quanto tu possa pensare...
E apparirà nel momento in cui farà il massimo danno 

andando a svuotare completamente l'arrylistcon arraylist.clear e
ponendo la listbox.datasource = nothing

 ponendo la listbox.datasource = nothing
Sei fantastico! :)
Allora è proprio una "forma mentis": ti chiedono che ore sono e rispondi che 
oggi hai mangiato il risotto... un mito ;)
Ciao 

 ponendo la listbox.datasource = nothing
E che caspito c' entra col problema di prima ?!?


ma perchè scusa? ho fatto la seguente domanda: "scusate perchè se
dichiaro un arraylist pubblico e poi faccio una
operazione di caricamento dei dati da un modulo non viene aggiornato?
Se invece lo dichiaro all'interno del modulo si? Grazie ". Ho visto che
se dichiaro un arraylist pubblico allora per aggiornare le operazioni
che faccio su questo devo, all'interno del modulo, prima svuotare
l'arrylist e porre listbox.datasource = nothing dato che avevo posto
precedentemente : listbox.datasource = arraylist. Quindi
successivamente riempire l'arraylist con i nuovi dati

 ha scritto nel messaggio 
news:1146810077.5...@j73g2000cwa.googlegroups.com...

Allora, sinceramente, se in buona fede credi che le due cose siano correlate 
ti consiglio vivamente qualche buon testo sulla programmazione .Net e su 
VB.Net (che non solo la stessa cosa).
Ciao 


Facciamo finta che non hai mai aperto questo thread...


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] 'Catena' di form

 frmToLoad show
No, prima frmToLoad show e poi Unload Me, altrimenti non va...
Ciao
--
Timothy Redaelli
timothy.redae...@email.it
------------------------------------------------------------------
Togliere NONSPAMMARE per rispondere


Cosa non va?
L'istruzione Unload 'scarica' il form, non il 'codice' ad esso associato.
dickie


Caveat:
Unload Me
Me.ComponenteACaso.Refresh ' questa istruzione ricarica il form
Ciaotutti,
Asterix

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

Utilizzando il winsock control 6.0 io controllo da un pc un altro pc via
rete, il problema è che non posso vedere i files dell'altro computer
(server) dal mio (client).
Se avete qualche risposta perfavore scrivetemi...
Grazie.
Timothy

 wrote in message
news:3961f...@news.dada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto: Query SQL

--------------1C4A0587A08E4DCB25D1EAC8
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
Mi trovo a dover calcolare (in VB5) la somma di un campo numerico per
tutti i record di una query.
Ho provato con la query SQL:
SELECT sum(campo) FROM tabella WHERE ..........
Ma ottengo sempre il messaggio di errore:
Object doesn't not support this property or method.
Se qualcuno sapesse dirmi qual'è il modo corretto per farlo gli sarei
eternamente grato!
--------------1C4A0587A08E4DCB25D1EAC8
Content-Type: text/html; charset=us-ascii
Content-Transfer-Encoding: 7bit
<HTML>
Mi trovo a dover calcolare (in VB5) la somma di un campo numerico per tutti
i record di una query.
<BR>Ho provato con la query SQL:
<P><B>SELECT</B> sum(campo) <B>FROM</B> tabella <B>WHERE</B> ..........
<P>Ma ottengo sempre il messaggio di errore:
<BR><B>Object doesn't not support this property or method.</B>
<BR>Se qualcuno sapesse dirmi qual'&egrave; il modo corretto per farlo
gli sarei eternamente grato!</HTML>
--------------1C4A0587A08E4DCB25D1EAC8--

L'errore non è dovuto alla sintessi SQL ma all'oggetto che la esegue,
quindi è lì che dovresti cercare il problema.


 > eternamente grato!
  fose stai cercando di eseguire una query con un oggetto recordset settato
come dbOpenTable invece che dbDynamics nelle proprieta' o nella definizione:
"set NomeRecordset = OggettoDB.OpenRecordset("Tabella", dbDynamics)..
Byez,
Par Omshford.

 > eternamente grato!
Quando eseguo la query utilizzo il metodo OpenRecordsetQuindi:
Data1.OpenRecordset = [query SQL]
Puň essere che il metodo OpenRecordset non supporta la funzione Sum ????
--------------AD495E4D0FD87061507E7418
Content-Type: text/html; charset=us-ascii
Content-Transfer-Encoding: 7bit
<HTML>
Pisano Gianluca wrote:
<BLOCKQUOTE TYPE=CITE>L'errore non &egrave; dovuto alla sintessi SQL ma
all'oggetto che la esegue,
<BR>quindi &egrave; l&igrave; che dovresti cercare il problema.
<P>Andrea Ferrero wrote:
<P>>&nbsp; Mi trovo a dover calcolare (in VB5) la somma di un campo numerico
per
<BR>> tutti i record di una query.
<BR>> Ho provato con la query SQL:
<BR>>
<BR>> SELECT sum(campo) FROM tabella WHERE ..........
<BR>>
<BR>> Ma ottengo sempre il messaggio di errore:
<BR>> Object doesn't not support this property or method.
<BR>> Se qualcuno sapesse dirmi qual'&egrave; il modo corretto per farlo
gli sarei
<BR>> eternamente grato!</BLOCKQUOTE>
Quando eseguo la query utilizzo il metodo <B>OpenRecordset</B>Quindi:&nbsp;
Data1.OpenRecordset = [query SQL]
<BR>Pu&ograve; essere che il metodo OpenRecordset non supporta la funzione
Sum ????
<BR>&nbsp;&nbsp;</HTML>
--------------AD495E4D0FD87061507E7418--
Newsgroup: it.comp.lang.visual-basic
Titolo: Come far ruotare un immagine

Ho bisogno di far ruotare un immagine di 90° se mi suggerite le soluzioni
possibili vi sarei molto gradi sono
solo riuscito a ruotarla di 180° utilizzando il metodo paintpicture sul
controllo picturebox.

 ha scritto nel messaggio
news:9oetsn$1tg2$1...@stargate1.inet.it...

Ahem, ne abbiamo appena parlato in un altra serie di messaggi e l'ultimo è
di ieri
. Se puoi, la prossima volta fai una ricerca nei messaggi già postati prima
di chiedere, grazie.
Li trovi qui (rimetti l'indirizzo su di una unica linea):
http://groups.google.com/groups?hl=en&threadm=9oco02%24ch03i%241%40ID-77234
.
news.dfncis.de
&rnum=1&prev=/groups%3Fq%3Druotare%2Bl%2527immagine%2Bdi%2Buna
%2Bpicture%26hl%3Den%26rnum%3D1%26selm%3D9oco02%2524ch03i%25241%2540ID-77234
.
news.dfncis.de
Ciao
*Roby*


Qualcuno un po' di tempo fa notava certe "mode" nelle domande: a quanto pare
settembre è il mese del "Ruotare immagini"
:)
ciao
ugo

 :)
a quello la' credo ruotino altre cose.
non riferisco esattamente perche' sono molto educata.
j.bll


Non ricordavo fosse il tuo "umano"    :P
ciao
ugo
p.s. (salutalo e digli che entro il week-end gli farò avere una foto di
Pippo&Paco (per tacer del gatto...)  )

Newsgroup: it.comp.lang.visual-basic
Titolo: tasto accettazione licenza

uso visual studio 2010 express.Ci programmo in vb.
Vorrei fare in modo che all'installazione, si visualizzi e sia
necessaria l'accettazione della licenza (in questo caso Open)
saluti


Cosa usi come installer?
Con InnoSetup la cosa è molto semplice.
 
Se invece vuoi includerlo direttamente nell'exe del tuo programma non vedo quale possa essere la difficoltà.
 
Nicola
 


come installare, uso quello del visual studio express. Cercherò
innosetup, grazie
Newsgroup: it.comp.lang.visual-basic
Titolo: Si puo' creare un file di exel da VB

Ciao a tutti.....avrei la necessita di lanciare da vB una procedura che
mi crea un file di exel.....
e poi sapere come registrare i dati nelle celle.....dagli la
formattazione.....
Vi ringrazio anticipatamente   ANDREA
and...@tin.it


basta che assegni le proprieta' dell'oggetto Excel.WorkSheet (ha degli
insiemi Cells, Rows, Cols, etc...)
--
Roal Zanazzi
z...@iol.it


Se hai EXECL montato su tutte le macchine su cui gira il tuo PRG, usa l'OLE.
Ciao
By -MES-   Maronese Ettore
http://ilmes.freeweb.org
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://members.xoom.com/it_lang_vb


Immagino che Ettore volesse dire .XLS (formato dei files di Excel).
Sul sito 
www.wotsit.org
 si trovano moltissime specifiche di vari formati di
file.
--
Roal Zanazzi
z...@iol.it


Se i dati scritti dal programmi devono essere letti da Excel, allora
consiglio formato testo con tabulazioni, provare per credere.
prova a copiare ciň che segue e incollarlo in un foglio excel
anno    prodotto 1    prodotto2
1995    12345    32156
1996    23456    31987
1997    11234    53428
1998    12341    97865

file.
Bhe, effettivamente ho detto una castronata, mi ricordavo male l'estensione
:-(
Comunque volevo dire .DIF e non .XLS.
I DIF sono molto facili da fare, tutto ASCII, e sono importabili da
qualsiasi versione di EXCEL.
Non ti so dire pero' dove reperire la documentazione... :-(


mi crea un file di exel.....
Se cerchi sulla knowledge base sul sito M$ o sulla MSDN library un
topic tipo control excel from VB troverai tutto quello che ti serve
per iniziare (ma č lentissimo), per chi vuole spedisco un esempietto
costruito sul loro sorgente.
Bye
Luca
Please remove _ABC from my address to reply
Cast your eyes on the ocean
Cast your soul to the sea
When the dark night seems endless
Please remember me
Loreena McKennit, Dante's prayer


Credo ci sia anche quella su www.wotsit.org...
Ma i DIF contengono anche la formattazione (font, colori, etc)? Mi pare che
Andrea avesse la necessita' di gestire anche quella.
Altrimenti, senza formattazione, sarebbe ancora piu' semplice usare il
formato .CSV (Comma Separated Values, che poi sarebbe "campi separati da
virgola o punto-virgola").
--
Roal Zanazzi
z...@iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Leggere file già aperti in VB6

Salve a tutti,
sono ormai sull'orlo del suicidio per trovare un qualche sistema per poter 
leggere (e non scrivere) un file già aperto da un'altra applicazione.
Ho cercato in giro ma tutti dicono che se un file è già in uso, specie se in 
modalità esclusiva, non esiste modo di leggerlo finchè non viene rilasciato.
Un banale sw antivirus però è stato perfettamente in grado di scansionare un 
file mdb che ho aperto in esclusiva con Access. Ha fatto solo finta??!
Oppure accede a bassissimo livello direttamente sul FileSystem? E se sì, 
sarebbe fattibile in VB6?
Qualche suggerimento?
Grazie... 

 leggere (e non scrivere) un file già aperto da un'altra applicazione.
Soluzione di aggiramento :)
Copia file da un'altra parte lo leggi e lo cancelli.
L'api CopyFile mi pare che copi anche files aperti, ma non so se anche 
aperti in esclusiva.
Copiare per credere :)
greg 


La ShFileOperation copia file aperti.
-- 
-> GbC|
www.gbcweb.com
www.chiappori.com
 

 -- 
Grazie mille per le risposte. Un ultimo quesito:
siccome devo trattare anche file di grosse dimensioni (tipo il PST di 
outlook, database SQL, ecc.) il mio intento era di leggere il file senza 
copiarlo,
dato che la copia di un file di 2Gb o più porterebbe via risorse e tempo.
Qualche altra idea solo per leggere senza copiare?!! Gli antivirus che 
meccanismo usano secondo voi? 


Se un file è aperto exclusive deny read, dubito che anche un antivirus possa 
leggerlo...
Ho fatto una prova, aprendo un file infetto for binary lock read, il mio 
antivirus (Avira) non segnala errori, ma non rileva il virus.
Se invece hai un esempio di antivirus che ce la fa, per capire come agisce 
potresti utilizzare filemon di sysinternals.
My 2 cents
Raf