mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Puntatori a funzioni in VBA

Salve a tutti.
Sono un niubbo di VB. Il mio problema riguarda Visual Basic for Applications, 
in particolare VB per Excel.
Sto sviluppando delle funzioni di utilita' (mia) matematica
per semplificarmi il lavoro. Una di queste funzioni,
una routine di integrazione di equaz differenziali, ha bisogno
della valutazione di una o piu' funzioni in piu' punti (in generale
non noti a priori). Una soluzione è quella di chiamare direttamente
la funzione all'inzerno della funzione di integrazione, ma cosí facendo
si rinunzia abbondantemente alla genericità del codice.
Mi era venuta l'idea di passare alla routine di integrazione un puntatore 
alla funzione. In VBA l'operatore puntatore AddressOf non e' definito, ma ho
trovato sulla rete un trucchetto per emularlo. Resta il problema di come
invocare la funzione tramite il suo puntatore.
O  Se e' possibile fare cio', come?
O  Se -- a quanto mi pare di capire -- non è prevista nel linguaggio l'
invocazione diretta di una funzione tramite puntatore, esiste una funzione
tipo "eval(nome_funzione, lista_argomenti_funzione)"?
Grazie mille.
-- 
"Tutto è superfluo. Il vuoto sarebbe bastato"
(Emil Cioran, "L'élan vers le pire", Gallimard)

 tipo "eval(nome_funzione, lista_argomenti_funzione)"?
No.
In questo caso la cosa che più si avvicina è il mio valutatore 
matematico (
http://www.neodatatype.net
), ma non so se nel tuo caso sia 
sufficiente.
Ciao

O  Se e' possibile fare cio', come?
In vba non saprei, pero' potresti adottare una tecnica alternativa,
che simula lontanamente un delegate (anche questo, sconosciuto al
vba), definendo una o piu' interfacce da passare come parametro alla
funzione che dovrebbe ricevere i puntatori a funzione.
Tale/i interfacce devono essere implementate dagli oggetti che
eseguono le elaborazioni.
Provo con un esempio:
' definisco l'interfaccia, che i vba significa scrivo una 
' classe vuota:
'Class IMyInterface
Public Function Foo() As Double
'
End Function
' -----------------------
' Class ElaborazioneA
Implements IMyInterface
Public Function IMyInterface_Foo() As Double
	IMyInterface_Foo = 2/3
End Function
' -----------------------
' Class ElaborazioneB
Implements IMyInterface
Public Function IMyInterface_Foo() As Double
	IMyInterface_Foo = 5/7
End Function
' -----------------------
' Funzione che aspetterebbe i puntatori a funzione
Public Function BigCalculation(ByRef arg As IMyInterface) As Double
	... put your code here ...
End Function
A questo punto puoi passare indifferentemente a BigCalculation tanto
un oggetto di classe ElaborazioneA quanto un oggetto di classe
ElaborazioneB.
Non solo, puoi anche passare una Collection o un Array di IMyInterface
per calcoli che vadano eseguiti in sequenza:
Public Function StrongCalculation(ByRef arg() As IMyInterface) _
				 As Double
	Call arg(0).Foo()
	Call arg(1).Foo()
End Function
Se lavori bene di classi e interfacce riesci a fare delle cose
apparentemente impensabili, ma maledettamente semplici e potenti.
-- 
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto per l'euro

Ciao a tutti,
ho un quesito :
    Com'è la formula di arrotonadamento per la conversione da euro in
    lira.
Spero che qualcuno di voi lo sappia o mi sappia indicare qualche sito che mi
possa dare quest'informazione
Grazie anticipatamente
    Daniele
 
uz...@eniware.it

    lira.
Credo che tu possa trovare quanto ti serve all'indirizzo
http://euro.mi.camcom.it/legislazione/
Ciao.
Davide.

    lira.
1 euro = 1936.27 lire...
1lira = 1/1936.27 lire...
Per i decimali in euro si usano fino al 4 decimale mentre per la lira
fino al 2 decimale...
quindi
euro = round( 1936.27*lire, 4)
lire= round( euro/1936.27, 2)
SW.

Newsgroup: it.comp.lang.visual-basic
Titolo: Flex grid

Salve a tutti,
premetto che sono altamente ignorante in materia
cmq, non riesco ad associare dei dati ad una flex grid,
ecco i codice dov'è che sbaglio?
Dim rs As Recordset
Dim dbArchives As Database
Private Sub Form_Load()
Dim szDBPath As String, _
szSQL As String
szDBPath = "D:\vb\magazzino.mdb"
Set dbArchives = OpenDatabase(szDBPath, False)
szSQL = "SELECT * FROM movimenti "
Set rs = dbArchives.OpenRecordset(szSQL, dbOpenDynaset)
Set MSFlexGrid1.DataSource = rs
L'errore ce l'ho alla fine con il msg:"Variabile oggetto o variabile
del blocco with non impostata"
stò usando i DAO 3.6
grazie
sdamy

 stò usando i DAO 3.6
con DAO il DataSource deve essere essere un controllo Data

 ha scritto nel messaggio
news:5kx%7.3932$pm3....@news1.tin.it...

grazie!

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

Utilizzo il controllo in oggetto per valorizzare una ComboBox
Vorrei passare la ConnectionString con
"PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Dati\Archivio.mdb;"
dinamicamente in modo da assegnare il percorso se  il programma viene
installato in una cartella diversa da quella proposta durante
l'installazione, ma non riesco
Dove e come posso valorizzare la ConnectionString ??
Grazie a tutti, Marzia

 "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source= " & Percorso &
"\Archivio.mdb;"
"Marzia" <marz...@writSPAMeme.com> ha scritto nel messaggio
news:QUrU5.51192$FV2.1...@news.infostrada.it...


 "\Archivio.mdb;"
Prova
"PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source= " & APP.PATH &
"\Archivio.mdb;"
Gli passi direttamente la directory dove è situato l'exe.




ciao,
prova questo, naturalmente devi adattarlo.....
Set cn = New ADODB.Connection
cn.Open "PROVIDER=MSDataShape;Data Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=c:\tuoarchivio.mdb"
rs.Source = " SHAPE {SELECT * FROM `anagrafica`}  AS anagrafica APPEND ((
SHAPE {SELECT * FROM `ricetta`}  AS ricetta APPEND ({SELECT * FROM
`prescrizione`}  AS prescrizione RELATE 'ID' TO 'codice_ricetta') AS
prescrizione) AS ricetta RELATE 'ID' TO 'codice_anagrafica') AS ricetta"
 rs.Open , cn, adOpenKeyset, adLockBatchOptimistic
xadu
www.itconsultingweb.com
"Marzia" <marz...@writSPAMeme.com> ha scritto nel messaggio
news:XHuU5.959$CH3....@news.infostrada.it...


dimenticavo di dirti che devi rendere null le proprietą di adodc che ti
interessano dal menu a destra proprietą....


 ha scritto nel messaggio
news:9008dr$cu...@news.edisons.net...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] WAV MMC lentissimo!!!

Con la seguente sequenza:
esempio
XX= 2   ' variabile 1
YY= 7   ' variabile 2
        for x = xx to yy step 1
        MMControl1.Command = "Close"
        MMControl1.FileName = x+".wav "
        MMControl1.Wait = True
        MMControl1.Command = "Open"
        MMControl1.Wait = True
        MMControl1.Command = "Play"
        MMControl1.Command = "Close"
        DoEvents
        next x
Questo mi legge dei file wav numerati da 0 a 9, enumerando foneticamente e
casualmente i numeri: zero uno due tre quattro ecc...
Ho dei rallentamenti bestiali di tutto il sistema come subentra la lettura
multimediale.
Calcolando che ho un PII400/256MBram credo sia un problema di codice.
Domanda:
Esiste un sistema per ascoltare un audio senza che rallenti bestialmente
tutto il sistema e tutte le applicazioni aperte?
Ora ho solo trovato queste possibilita' per velocizzare:
1. far caricare il tutto in un unico file mettendo assieme i file Wav (cosa
che non sono riuscito)
2. fare o trovare una DLL OCX o altro che contenga tutti i fonemi che
necessito e farglieli dire richiamandoli a piacere (lettere dell'alfabeto e
numeri)
3. far leggere i file WAV in altro formato (MP3???) o altro, e non usare il
MMC ?!?!
AIUTOOOOOOOOOOO mi rallenta tutto ed e' il cuore del mio tentativo di
programma!
Ciao e grazie... eventuale email che durante il periodo di ferie non vorrei
perdere qualche messaggio in questa news.
Saluti
frank
wl...@ticino.com
reply (togli NOSPAM)

Prova quest'API di Windows
' Supporto API per suoni di alto livello
    Declare Function sndPlaySound Lib "WINMM.DLL" Alias "sndPlaySoundA" _
        (lpszSoundName As Any, ByVal uFlags As Long) As Long
C'č un esempio in VB6 chiamato ATM. Gurdalo, forse puņ ritornarti utile.
Bye !

Newsgroup: it.comp.lang.visual-basic
Titolo: Vi è mai capitato

Vi è mai capitato di voler recuperare un'immagine memorizzato nel file .frx
E come si fà ?

 E come si fà ?
VBextract, su 
http://digilander.iol.it/zinoto/sorgenti.htm
--
Faber

 No
A me è capitato di voler risalire al file immagine impostato dalla finestra
delle proprietà di un controllo image.Non ci sono riuscito però :-)
Newsgroup: it.comp.lang.visual-basic
Titolo: Ottenere lista estensioni

Volevo sapere qual'è il modo per ottenere la lista di tutte le
estensioni che sono nel registro di sistema, poi da mettere in una
listbox.
grazie in anticipo

 listbox.
si tratta di enumerare le chiavi sotto HKLM\Software\Classes.
trovi il lavoro gia` fatto su
File Association Utility: Easy Way to Add and Edit Associations
http://www.freevbcode.com/ShowCode.Asp?ID=1173
-- 
ciao da un hal di passaggio

listbox.
Se e' per un uso prettamente personale (NON devi distribuire) :
' In LogFile.Log  hai un po' di tutto .. ma anche TUTTE le estensioni
' puliscilo o affina alla base la ricerca >>InStr(UCase(sLine),"EXTENSION"
set oShell = CreateObject("WScript.Shell")
sLogFile = "C:\WINDOWS\TEMP\LogFile.Log"
oFile ="C:\WINDOWS\TEMP\Ext.REG"
Set oFSO = CreateObject("Scripting.FileSystemObject")
oShell.run"regedit /e Ext.reg HKEY_CLASSES_ROOT"
WScript.Sleep 2500
while not oFSO.FileExists("Ext.reg")
WScript.Sleep 100
Wend
Set oLogFile = oFSO.OpenTextFile(sLogFile, 8, True, 0)
    Set oStream = oFSO.OpenTextFile(oFile, 1)
    Do Until oStream.AtEndOfStream
      sLine = oStream.ReadLine
If InStr(UCase(sLine),"EXTENSION")  Then
        oLogFile.WriteLine sLine & VBCrLf
      End If
    Loop
while not oFSO.FileExists(sLogFile)
WScript.Sleep 500
Wend
oShell.run(sLogFile)
'Copia incolla su notepad e salva con estensione .vbs
'tutti i file (*.*)  poi ci clicchi sopra. (per esempio Test.vbs)
'se ti da' errore disattiva l'antivirus
--
Fosco

Grazie era quello che cercavo

"Fosco"
'Opps alcune path potrebbero essere "equivoche"
'questo sotto a prova d'errore da qualsiaisi punto si lanci :
set oShell = CreateObject("WScript.Shell")
sLogFile = "C:\WINDOWS\TEMP\LogFile.Log"
oFile ="C:\WINDOWS\TEMP\Ext.REG"
Set oFSO = CreateObject("Scripting.FileSystemObject")
oShell.run"regedit /e C:\WINDOWS\TEMP\"& _
"Ext.REG HKEY_CLASSES_ROOT"
WScript.Sleep 2500
while not oFSO.FileExists(oFile)
WScript.Sleep 100
Wend
Set oLogFile = oFSO.OpenTextFile(sLogFile, 8, True, 0)
    Set oStream = oFSO.OpenTextFile(oFile, 1)
    Do Until oStream.AtEndOfStream
      sLine = oStream.ReadLine
If InStr(UCase(sLine),"EXTENSION")  Then
        oLogFile.WriteLine sLine & VBCrLf
      End If
    Loop
while not oFSO.FileExists(sLogFile)
WScript.Sleep 500
Wend
oShell.run(sLogFile)
' 2 >> Affinata un po'(si puo' far di piu'), ma  testata SOLO su Win9x :
set oShell = CreateObject("WScript.Shell")
sTempName = oShell.ExpandEnvironmentStrings("%TEMP%")
sLogFile = sTempName&"\LogFile.Log"
oFile =sTempName&"\Ext.REG"
Set oFSO = CreateObject("Scripting.FileSystemObject")
oShell.run"regedit /e "&sTempName&"\Ext.REG HKEY_CLASSES_ROOT"
WScript.Sleep 2500
while not oFSO.FileExists(oFile)
WScript.Sleep 100
Wend
sExt= "extension""=""."
'msgbox sExt
Set oLogFile = oFSO.OpenTextFile(sLogFile, 8, True, 0)
    Set oStream = oFSO.OpenTextFile(oFile, 1)
    Do Until oStream.AtEndOfStream
      sLine = oStream.ReadLine
If InStr(LCase(sLine),sExt)  Then

Newsgroup: it.comp.lang.visual-basic
Titolo: Api che copia il contenuto di una directory in un altra!

Se esiste mi dite la sua dichiarazione!
Grazie
Ciao
Oz
--
Carč Walter SIA SOFTWORK S.R.L.
Via Zanardelli, 13/A - 25062 Concesio (BS) Italy
Tel. 0039-30-2008135/0039-30-2091057  Fax. 0039-30-2004911
Web: 
http://www.siasoftwork.it
 - E.mai:- 
ca...@siasoftwork.it

> Se esiste mi dite la sua dichiarazione!
Private Declare Function SHFileOperation Lib "shell32.dll" _
    Alias "SHFileOperationA" (lpFileOp As SHFILEOPSTRUCT) As Long
Ciao
Faber

Newsgroup: it.comp.lang.visual-basic
Titolo: inout32.dll

Sto usando la libreria in oggetto per controllare dei dispositivi esterni,
pero' sotto WXP da tutta una serie di errori e non funziona, c'e' una
modalita' particolare per farla funzionare o esiste una libreria analoga ma
funzionante sotto XP?
Grazie


questo e' il readme di una dll che funziona sotto Windows-NT
_F_O_R_S_E_ funziona sotto XP e 2000
DriverLINX Port I/O Driver for Win95 and WinNT
(C) Copyright 1996-1999, Scientific Software Tools, Inc.
All Rights Reserved.
Scientific Software Tools, Inc. is pleased to provide you with this
utility
for performing hardware port I/O under Windows 95/98 and Windows NT.
This
product allows your 32-bit C/C++ or Visual Basic apps (or any language
that
can call a DLL) direct access to the I/O ports over the range 0100H to
FFFFH.
This product contains the following components:
  DLPortIO.DLL  -- Win32 DLL hardware I/O functions
  DLPortIO.H    -- C/C++ interface to DLPortIO.DLL
  DLPortIO.BAS  -- Visual Basic interface to DLPortIO.DLL
  DLPortIO.SYS  -- Kernel mode driver for WinNT (not required for
Win95/98)
  MSVC example
  VB example
  API files
If you're unsure how to interface your app to DLPortIO.DLL, please look
at
the source code files for simple examples.
You are free to copy and distribute this product as long as this package
is
distributed in its entirety and SST's copyright and trademark notices
are not
removed. Please see the license file for more information.
This product is provided without charge so we can't provide any free
technical
support for it. Hourly rate technical support is available as follows:
  Hourly support costs $150/hr with a minimum charge of $50, 
  charged to your credit card. 
About Scientific Software Tools, Inc.
-------------------------------------
Scientific Software Tools, Inc. (SST) develops and markets
award-winning,
commercial Windows products for the test/measurement and industrial
marketplace and provides product development services for other
companies.
SST's product development expertise spans from systems-level components,
e.g., OCX/ActiveX, VxD, and NT kernel drivers to full commercial
applications.
For more information, please contact us at 
Scientific Software Tools, Inc.
One Media Plaza
1023 East Baltimore Pike, Suite 100
Media, PA 19063
Phone: 
(610) 891-1640
Fax: 
(610) 891-8556
E-mail: 
sup...@sstnet.com
Web: 
www.sstnet.com
-----
DriverLINX is a registered trademark of Scientific Software Tools, Inc.
Microsoft, Windows, Win95/98, WinNT, and Visual Basic are registered
trademarks 
of Microsoft Corporation.
Newsgroup: it.comp.lang.visual-basic
Titolo: Crystal Reports...

Ciao a tutto il N.G.,
Ho intrappreso una avventura con il prog. in oggetto, ho creato un report,
ora mi rimane 'SOLO' che richiamarlo da VB e riempirlo del recordset che mi
interessa. L'aiuto che chiedo a chi conosce il prog. č dove documentarmi, se
gli aiuti in linea di VB o C.R.(dove sto gią cercando),  mi possono essere
d'aiuto, o se gentilmente mi date voi una mano.
Grazie.

 Grazie.
Prego.
Umberto

 ha scritto nel messaggio
news:uaL99.11179$pX1.3...@news2.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Help!!Per stampare?!?

Sto cercando di stampare moduli grafici con Visual Basic e li sto creando
con dei form, poi utilizzo oggetto.printform ma con questo semplice comando
non è possibile utilizzare tutto lo spazio a disposizione in un foglio!Come
potrei fare?

 wrote in message
UO0L8.1648$TS.5...@news1.tin.it...

una volta avevo anche io questo problema lo avevo risolto facendo la print
del contenuto di un picturebox (per disegnarci dentro usa line pixel circle
ecc...) che se è più grande del form viene stampato ugualmente (la propietà
autoredraw del picture e del form su true)

 ha scritto nel messaggio
news:UO0L8.1648$TS.5...@news1.tin.it...

ridisegna le stesse cose sull'oggetto printer

 wrote in message adibqe$qdl$1...@rex.ip-plus.net...


 ha scritto nel messaggio
news:UO0L8.1648$TS.5...@news1.tin.it...

Creati un form MDI, ci metti dentro una form normale (figlia) con dimensioni
del height doppie rispetto allo schermo e risolvi.
2) L'oggetto printer non lo vedi ma ha delle proprietà (line, print , ecc.)
che puoi sfruttare per disegnare quello che vuoi (linee, rettangoli, testi,
immagini) se vuoi disegnare anche rettangoli con angoli arrotondati devi
usare le API, cmq quello che da l'oggetto printer è già un buon inizio.
Ciao
    Sharkman
P.S.= Forse fra qualche settimana riesco a terminare una spece di
"generatore di report" molto primitivo ma abbastanza funzionale. Un abbozzo
del progetto DataRaptor.

Newsgroup: it.comp.lang.visual-basic
Titolo: Scanner con VB4

Avrei bisogno di inserire in un mio pgm con VB4 la possibilità di effettuare
scansioni.
Potete aiutarmi? (OCX, esempi, ecc.)
Ciao Franco







...

Cerca sul mio sito, c'è qualcosa GRATIS.
Ciao
MIX
http://space.tin.it/computer/gaais/
post...@yahoo.com
Newsgroup: it.comp.lang.visual-basic
Titolo: Excel - Range

Ciao, ho un problema con Excel :-(
In Visual Basic for application, ho creato un modulo dove ho definito delle 
funzioni del tipo:
Static Function div(A)
    B = Range("'Foglio 1'!A1")
    div = A / B
End Function
(ovviamente e' un esempio :-)
Funziona perfettamente, se scrivo in una cella:
=div(B4)
funziona, ed il valore cambia anche quando cambio il contenuto della cella 
B4; pero' resta tutto invariato se cambio il contenuto della cella A1 !
Per far ricalcolare il tutto o bisogna mettersi alla fine della formula e 
premere "invio", oppure cancellare il foglio e poi fare un "undo".
Esiste un modo migliore ?
Grazie.

> Massi:

E` uno dei grandi misteri Microsoft. Intendiamoci, non la
soluzione al problema, che consiste nello scrivere come prima
istruzione della funzione:
    Application.Volatile
ma il perche' tale informazione, visto il "target" di Excel,
sia stata nascosta cosi` bene.
Scusa, perche' dichiari "Static" la funzione?
--
Ciao.
Maurizio


Grazie per la dritta Maurizio.
Ho modificato una funzione della guida di esempio (la funzione log10) che 
era dichiarata static, in realta' non conosco bene il Visual Basic e non mi 
piace nemmeno tanto, ma studio ingegneria ed a volte per rendere piu' 
semplice un foglio elettronico il VB e' comodo.
Grazie ancora ed a buon rendere

Ho fatto una prova, funziona perfettamente,
certo, che adesso anche se inserisco un semplice numero in una cella, ci 
mette un paio di secondi per ricalcolare tutto (grande microsoft) 
...................
ah adesso ho capito a cosa servono i pentium III 900 Mhz :-)

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Modifica file di testo CSV

Qual'è il metodo più semplice/veloce per aggiungere dati alla fine di ogni
riga di un file di testo (CSV)?

riga di un file di testo (CSV)?
Temo che ti debba spazzolare in lettura le righe una per una e generare
un nuovo file con le righe modificate.
Ciao
Aldo
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Overloading degli operatori

Ho letto da qualche parte che l'unica cosa che il C# ha in più rispetto a VB
è l'overloading degli operatori.
Se è quello che sembra (overload come per le funzioni applicato agli
operatori), credo che in VB ci sia già:
Overloads Operator + (A as Integer, B as Integer)
    Return A+B
End Operator
Overloads Operator + (A as String, B as String)
    Return A & B
End Operator
... o qualcosa del genere... ho delle stupidate grosse?


ed infatti vbc non compila qsto codice... :-(
A.
UGIdotNET - 
http://www.ugidotnet.org

Newsgroup: it.comp.lang.visual-basic
Titolo: Trovato l'handle di un programma este rno, però...

ciao
ha fatto un programmino che mi lancia un programma tramite la funzione 
shell, la quale mi restituisce l'id del programma aperto
la mia domanda è questa, x trovare l'handle di quel programma, è davvero 
necessario fare tutta la trafila con findwindow e co? :-)
oppure c'è l'ho già e devo ricavarlo in qualche modo + semplice dato che 
il prog l'ho aperto io?
oppure non c'è un unica funzione che mi da l'handle passandogli l'id?
ciaociao
-- 
********************
http://www.scirio.tk
100% COMMERCIALE
********************

 il prog l'ho aperto io?
Direi la seconda che hai detto.
Sempreche' per "handle del programma" intendi l'handle del processo.
Esiste l'api OpenProcess a cui passi l'id ottenuta dalla shell e ti
restituisce un handle a quel processo.
ciao
Paolo B.


ehm non lo so :-)
nel frattempo ho cercato la openproccess e mi restituisce un handle
però non mi funzionano + le funzioni dopo , quindi mi sa che non è l'handle
giusto :-)
in pratica io apro un programma e gli passo dei comandi x aprire una
finestra extra
forse come handle del processo intendi l'handle di tutto
quindi la finestra figlia ha lo stesso handle di processo e quindi non
funzionano le funzioni che chiamo dopo x tornare al focus e mandare i
comandi!

 finestra extra
Ah ecco.
Allora tu hai bisogno dell'handle della finestra principale del processo.
Quando tu mandi un messaggio ad una finestra in pratica lo mandi alla
windowprocedure di quella finestra che si occupa di ricevere e gestire i
messaggi ricevuti.
Per ottenere l'handle della finestra allora non ti serve l'handle del
processo, puoi usare direttamente l'ID con la funzione EnumThreadWindows per
ottenere gli handle di tutte le finestre create da quel processo.
Se sei fortunato e' una sola. :-)
Comunque controllando il nome con GetWindowText() dovrebbe essere facile
capire qual'e' quella principale.
ciao
Paolo B.

Newsgroup: it.comp.lang.visual-basic
Titolo: Mazzo di carte

Qualcuno può inviarmi dei mazzi di carte di tutti i tipi (napoletane,
francesi,....).
Ciao e grazie a chi mi risponde,
P. S. Posso anche inviare il controllo mazzo di carte fatto da me.
--
Posted from 
qma...@charleston.SoftHome.net
 [204.144.231.41]
via Mailgate.ORG Server - 
http://www.mailgate.org



Rido per non piangere....
Conosci una certa Loredana?
Ma scusate, li hanno aperti i manicomi o sono evasi???
Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)


Moré forse intendeva un mazzo di carte fatto in VB, tipo quello di Marco
Minerva...
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Info su VisualStudio .NET

Con il Visual Studio in oggetto è possibile creare dei normali file  .XE
(Cioè che girino senza che il .NET Framework o sue parti siano installate
sul client) ?
Stò cercando uno strumento di reportistica per Visual Basic che dia anche al
possibilità di inserire un editor di Report nell'eseguibile (Es. FreeReport
per Delphi)
Grazie per ogni idea o suggerimento,
Lorenzo


ni... nel senso che AFAIK l'unico linguaggio che può compilare codice
unmanaged (ossia che non necessita del framework) è C++... Se la tua domanda
(dato il NG in cui la posti) era rivolta a 
VB.NET
 la risposta è no... sorry.
A.
UGIdotNET - 
http://www.ugidotnet.org

Newsgroup: it.comp.lang.visual-basic
Titolo: [?]:Gestire file AVI frame x frame...come faccio?

Dovrei prendere un file AVI ed analizzarlo frame x frame come fossero tante
immagini BMP. come posso fare?
I controlli classici di MS tipo "animation" permettono solo la riproduzione
di un filmato ma nulla +.
Ho visto che c'è una DLL per gestire tali file ma non so dove trovare un po'
di documentazione
Grazie dell'attenzione.
Ciao

 wrote in message
news:_bB_6.3766$z11.4...@news.infostrada.it...


Posti il link sul NG?


dell'AVI
butta qua che gli si da un'occhiata!!!
--------------------------------
Inviato via 
http://usenet.iol.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Acces query parametriche

ciao! Aiuto! ho bisogno di una mano!
sto creando un programma che richiama delle query parametriche che sono 
all'interno di un DB Acces.
il mio problema è che nn sò come passare i parametri delle query da 
codice.

codice.
Con che cosa accedi al DB?
ADO? DAO? ODBC?
Ciao
Aran
P.S.
Controlla il manifesto del newsgroup, altrimeni dubito che altri
risponderanno. ;-)

 risponderanno. ;-)
ti riferisci al fatto che parlo di Access?
se era questo nn pensavo che in it.comp.database.access si potesse 
chiedere questo e chiedo scusa.
se il problema è un altro dimmi pure sono nuovo. scusate!
 

se il problema č un altro dimmi pure sono nuovo. scusate!
mi riferivo al subject e alla domanda...
dovresti dare qualche informazione in piů.
Es.
Sto creando un programma che accede ad un DB Access 2000 tramite ADO,
etc etc.
cmq vedo di trovare qualcosa a riguardo.
Mi _sembra_ si debba usare qualcosa tipo "createparameter"; prova a
cercare sulla guida in linea.
Ciao, Aran

 cercare sulla guida in linea.
la prossima volta sarò più preciso.
comunque ho trovato nell'msdn come si fa grazie al tuo consiglio la 
sintassi è questa
Set parameter = command.CreateParameter (Name, Type, Direction, Size, 
Value)


wrote:

Hai fatto prima di me.......
Bene.
Buon lavoro
Good Coding
Aran
Newsgroup: it.comp.lang.visual-basic
Titolo: Collegarsi Automaticamente ad Internet

Problema:
Un computer risiede in un laboratorio e controlla tramite la seriale
e tramite dei sensori  dei macchinari, se si verificano dei problemi devo
potermi collegare ad internet e uploadare un file di Log
Domanda:
esiste la possibilita di creare un programma che possa collegarsi ad
internet
in modo autonomo, senza la presenza di una persona e senza avere una
connessione fissa?
Grazie infinite a chiunque abbia la capacita di
risolvere questo problema
Ciao
Marco

 ha scritto nel messaggio
news:bm1c10$jhm$1...@lacerta.tiscalinet.it...

in realtą puoi farlo da dos (almeno con i SO di classe NT) utilizzando
rasdial


certo che si può fare ed è anche abbastanza semplice, cerca sul sito
comune "Accesso Remoto", c'è un bell'esempio di Moreno Sirri che ti
aiuta molto.
ciao
Degra

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

Quanto costa  un compilatore visual basic? Come faccio ad averlo?
Qual'è il modo più economico per averlo? (a parte rubarlo :-))
Grazie.
Cristiano
--
Posted from 
mta03-acc.tin.it
 [212.216.176.34]
via Mailgate.ORG Server - 
http://www.mailgate.org

Grazie.
Dipende che versione vuoi: ora siamo alla 6.0
Per studenti costa non molto piú di 180.000.
Esiste in tre versioni, Standard Professional ed Enterprise.
Se ti serve solo per scopo tuo personale, ti consiglio la Professional
Attenzione, la licenza non studente costa parecchio di +
Non si trova gratis
bye

Newsgroup: it.comp.lang.visual-basic
Titolo: RTF e file di HELP

Dove posso trovare il compilatore dei file  formato RTF? c'è qualche
articolo o documentazione in giro?
8-()
nicoletta

 wrote in message
388DBC17...@libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] impostare un valore nelle celle

Ciao a tutti,
sono giorni che continuo a cercare tra thread e messaggi su come inserire un
valore in una cella di un DataGrid (da codice) ed ho trovato solo un link ad
un ocx (molto bello, pa pur sempre un OCX!!) che fa + o - le stesse cose e
con poco help.
Io vorrei semplicemente far si che ad un certo punto il mio codice mi dica
che la cella (Riga1,Col4) sia uguale a XXX, ma non so come.
E' così ovvio da fare che non l'ho nenche visto???
Grazie a tutti.
Ciao.
Paolo

 ha scritto nel messaggio
news:wurG8.75248$zW3.1...@news1.tin.it...

Circa 60 secondi per la ricerca (anche se non ho mai usato DataGrid):
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vjref98/htm
l/com.ms.wfc.data.ui.DataGrid_setCurrentCellValue.asp


Ribadisco e confermo:
"> > E' così ovvio da fare che non l'ho nenche visto!!!"
anche se non capisco come farlo funzionare ?_?
Grazie per la risposta.
Paolo


Non ci capisco niente di come poter utilizzare il comando.
Ecco perchè non lo trovavo nei cd --> perchè cercavo nella documentazione di
VB e basta!!
Ma cosa vuol dire VOID???
Da MSDN:
DataGrid.setCurrentCellValue
Syntax
public void setCurrentCellValue( String val )
Parameters
val
A string that represents the value for the current cell.
Non so cosa devo scrivere!!
Non so da che parte iniziare e cosa guardare!!
Cosa devo fare??
Grazie.
Ciao
Paolo

 ha scritto nel messaggio
news:wurG8.75248$zW3.1...@news1.tin.it...


 [Variabile] = Datagrid.Columns.Item(4).Value
Quasi!!
è bastato questo:
        DataGrid1.Row = 0
        DataGrid1.Col = 2
        DataGrid1.Text = sImposta
Grazie cmq
Paolo
Newsgroup: it.comp.lang.visual-basic
Titolo: uscita da una form in cui sono in addeditadd

Ciao a tutti,
   ho un problema: mi trovo in una form in cui ho richiesto all'operatore
di aggiungere un record facendogli premere un pulsante aggiungi.
   Come faccio a tutelarmi dall'ipotesi che l'operatore esca dalla form
senza completare l'aggiunta del record ?
   Rientrando nella form  mi da errore di posizionamento sul primo record
(move first).
   Sono in ADO: cosa mi consigliate per tutelarmi da quell'ipotesi ?
Grazie  Indriano
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Grazie  Indriano
Beh, lasci che inserisca tutti i suoi bei dati, e fai la INSERT INTO solo
alla conferma. Se a metà chiude il form, tanto peggio per lui... ;-)
ciaociao

    Sono in ADO: cosa mi consigliate per tutelarmi da quell'ipotesi ?
vado a memoria, ma dovresti avere i metodi .Cancel* dell'oggetto
ADODB.Recordset.....
e credo invece che la proprietà .State ti dica qualcosa in merito: se stai
aggiungendo o modificando.....ad esempio
good coding!!!
-- 
Alletun
"Se ti va di spassartela adesso
Prendi il Vettore oggi stesso."
Terre Desolate - Stephen King

 stai aggiungendo o modificando.....ad esempio
oddio io non ci capisco di DB, ma non lascio mai fare l'imput diretto sul
RCS dall'utonto,
io di solito uno dei flag per controllare cosa si sta facendo, cosi posso
abilitare bottoni di edit e delete e chiedere conferma all'uscita se non si
e' salvato le modifiche.
<PseudoCode di esempio>
formload
    falgEdit = false 'si attiva solo se si esegue una modifica , un addnew o
una qualsiasi operazione sul rcs
    flagItemSelected = false  ' si attiva quando ad esempio si seleziona un
record
   setCmdButton (false)
---------------------
Lista_CLik
   if riga >= 1 then flagitemselected = true
...
 setCmdButton (flagItemSelected)
---------------------
pulsante_di_edit_qualunque_click
    flagEdit = true
...
---------------------
pulsante_di_save
   flagedit = controllo_operazione_di_inserimento_se_va_a_buon_fine
    if flagedit msgbox "ERRORE ..."
---------------------
form_close
    if flagEdit then msgbox "We' ciccio, che faccio salvo o no ?"
    ....
-- 
-Gigio@Work(?)-

> oddio io non ci capisco di DB, ma non lascio mai fare l'imput
ROTFL
;-)
ciaociao

 ;-)
iNput grrrrrrr , vabe' provova a scrivere anche tu con una mano unta da un
panino di 1/2kg che mi sto mangiando grrrrrrrrr
-- 
-Gigio@Work(?)-


Impossibile.
Io i panini sotto al kg non li prendo neanche in considerazione.... :-D
BUON APPETITO!
ciaociao

 :-D
*burp*  ops... scusate !
Troppo tardi, l'ho gia' digerito ... ora cerco di rubare il pranzo ai miei
compagni di merenda...
-- 
-Gigio@Work(?)-
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] DataGrid - collegare ad un recordset

Come collego un datagrid ad un recordset il tutto senza
utilizzare i dataenvironment?
Vi prego sto impazzendo!
Ho definito una bindingcollection ma non riesco ad
associare le colonne ai campi del rs. AIUTO!!!!
Dario

Scusate intendevo DBGRID!!!


Scusate... il sonno era tanto ieri...
Intendevo DataGrid non DBgrid :))
Perdono!
PS: Sono andato a letto alle 5 e sono in piedi dalle 10
vi prego e' abbastanza urgente


Newsgroup: it.comp.lang.visual-basic
Titolo: count in query sql

Ciao a tutti, devo fare una stringa sql con l'istruzione count che perň mi
deve restituire il numero di record su tre valori. mi spiego meglio: la mia
stringa ora č:
 SELECT vs_azienda.*, vs_azienda.data_trasfer, vs_azienda.data_dimissioni,
vs_azienda.data_espulso FROM vs_azienda WHERE
(((vs_azienda.data_trasfer)=#1/1/1956#) AND
((vs_azienda.data_dimissioni)=#1/1/1975#) AND
((vs_azienda.data_espulso)=#1/1/1998#))
mettendo count mi restituisce il numero complessivo senza distinguere quali
sono quelli trasferiti, dimessi e espulsi.
come potrei fare??
grazie
ciao

 wrote in message
news:3WgA6.137959$lj4.4...@news6.giganews.com...


 ha scritto nel messaggio
news:3WgA6.137959$lj4.4...@news6.giganews.com...

Anche se non capisco molto i dati che vanno estrapolati puoi annidare le
query:
SELECT
    (SELECT Count(*)
    FROM vs_azienda
    WHERE ...) AS Alias1,
    (SELECT Count(*)
    FROM vs_azienda
    WHERE vs_azienda.data_dimissioni)=#1/1/1975#) AS Alias2,
    (SELECT Count(*)
    FROM vs_azienda
    WHERE vs_azienda.data_espulso)=#1/1/1998#) AS Alias3
FROM vs_azienda
WHERE ...
Lawrence Lebowsky
#marcone#@#sidsrl#.it

 ha scritto nel messaggio
news:3WgA6.137959$lj4.4...@news6.giganews.com...

Anche se non capisco molto i dati che vanno estrapolati puoi annidare le

Newsgroup: it.comp.lang.visual-basic
Titolo: Non mi sodtituisce gli spazi!!

Cosa c'è di sbagliato qui dentro?
text1.text=replace(text1.text, vbKeyReturn, vbKeyReturn & " ")
Non succede niente!
Se al posto di vbKeyReturn metto chr(13) mi vengono fuori le
odiose sbarrette... Ho anche provato a far passare la stringa per
una label ma niente...
Ciao
Giulio



Usa sì chr(13), ma sei sicuro che la textbox sia multilinea?
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

 Se al posto di vbKeyReturn metto chr(13) mi vengono fuori le odiose
sbarrette... Ho anche provato a far passare la stringa per una label ma
niente...
A parte ogni altra considerazione, v. post di Moreno Sirri, invece di
vbKeyReturn userei vbNewLine o vbCrLf.
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

Non succede niente!
e ci credo! sai cosa stai cercando di fare? stai cercando di sostituire il 
tasto Invio con una fusione del tasto stesso con la barra spaziatrice...
text1.text=replace(text1.text, vbNewLine, vbNewLine & " ")

Ciao,
prova a scrivere
    Text1 = Replace(Text1, Chr(vbKeyReturn), " ")
oppure
    Text1 = Replace(Text1, Chr(13), " ")
oppure
    Text1 = Replace(Text1, vbCr, " ")
vbKeyReturn corrisponde al valore [13] del carattere ascii e non al
carattere [chr(13)] stesso che e' invece rappresentato da vbCr
beppe
--
-----------------------------------------------------------
Visita il sito del WWF AltoFerrarese
http://www.comune.cento.fe.it/wwfaf
-----------------------------------------------------------

 wrote in message
92v761$7njcn$3...@ID-52090.news.dfncis.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: listview lenta

Quale controllo potrei utilizzare per la visualizzazione di record?
Listview o un Grid?
Ho effettuato un test con una tabella access popolata di 5000 record ed
in effetti sembra piu' veloce il
Dbgrid, non ho utilizzato un timer ma la lw impiega circa 4/5 sec. se
poi ne' forzo la visualizzazione
prima del caricamento totale utilizzando una progressbar allora i
secondi diventano anche 6/7....
Alla Lw sono agganciate 3 sub una per l'ordinamento delle colonne, una
per il dimensionamento, ed infine una per il caricamento del recordset.
La connessione avviene tramite ado (2,7) .
L'unica strada forse e' quella di limitare i record da visualizzare?
Esiste un esempio in questo senso? 
Grazie e saluti Michele

 L'unica strada forse e' quella di limitare i record da visualizzare?
Presumo che un numero alto di record metta in difficoltà l'utente nel 
trovare quello che cerca.
Meglio la possibilità di filtro.
Mi sembra questo è un metodo di inizio sviluppo.
Alla partenza la tabella è vuota, quindi da caricare c'è ben poco.
Prova a rendere invisibile il controllo prima del caricamento. Finito 
visible=true
Ave
giuseppeD
---
CCR 

 Ho effettuato un test con una tabella access popolata di 5000 record
Sicuramente è meglio una flexgrid per far vedere i record, e mai 5000.
Io uso grid e list e faccio cosi:
Una list che viene popolata dinamicamente in base alle scelte che fa
l'utente tramite altri oggetti.
Se, poniamo il caso bisogna cercare fatture in base al nome della ditta, la
lista si popolera con i nomi di tutte le ditte che hanno fatture, per il
periodo considerato, e selezionando una ditta dalla lista sulla grid
appariranno le fatture di quella ditta.
In ogni caso per tornare ai tempi, se non si fanno operazioni sulle celle
della flex, come di solito faccio io avendo sempre pochi record per volta,
il caricamento di 5000 record in una flex io l'ho sempre trovato immediato
 La tabella titoli del file biblio.mdb con 8569 record viene caricata senza
alcuna attesa, e senza nessuno ottimizzazione. Ho semplicemente messo su un
form un datacontrol e una flex.
ciao
--
Greg

da principiante, la butto lì:
avendo avuto un problema simile
(lentezza in caricamento listview)
ho scoperto che disattivando l'ordinamento
prima del caricamento, e riattivandolo a caricamento completato,
le perfomance sono migliorate, e di molto.
listview.sorted = False
..
caricamento
..
listview.sorted = True

Newsgroup: it.comp.lang.visual-basic
Titolo: [!] SAPI, a quando la 5.0 ?

Salve a tutti !
Sto realizzando un programmino che utilizza le Speech API, che dovrebbe
lanciare applicazioni, simulare la pressione di alcuni tasti, ovviamente
tutto in inglese , a meno che non sia uscita la release 5.0 delle SAPI.
Sapete qualcosa ??
A proposito... se interessa a qualcuno... sarà tutto free  :-))
Ciao
Genesio
Newsgroup: it.comp.lang.visual-basic
Titolo: Inviare l'e-mail con VB

Io ho fatto una label che una volta premuta dovrebbe far partire il
programma di posta elettronica predefinito (Outlook , Outlook Express ,
Eudora , Netscape etc) come si fa a far partire il programma di posta
elettronica predefinito!?!
mailto:
webwa...@lycosmail.com
?subject=non ho capito bene
PS
Se è possibile preferirei dare al programma anche l'e-mail e del
destinatario e la subject

 wrote in message
82dqbl$57e$1...@lacerta.tiscalinet.it...


mailto:
webwa...@lycosmail.com
?subject=non ho capito bene
shell "start mailto......"
Occhio che in Win NT la sinstassi del comando "start" non è uguale a W98.... digitare "start /?" al prompt del Dos per
maggiori info.
Ciao,
Moreno
#sirri#@
morenosoft.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------




Newsgroup: it.comp.lang.visual-basic
Titolo: COME DIVENTARE RICCHI !!!

BASTAAAA!!!!!!!

...
    >PROVATE A CREDERMI!!!!! VI COSTA SOLO 12000£. Rasmus Lind è
    >un ragazzo danese che ha incassato in 5 MESI la bella cifra di:
    >$347,000.00 !!
NON SE NE PUO' PIU', PIANTATELAAAAA!!!
Ma possibile che ci siano in giro tante persone cosi' "allocche" da
abboccare ed entusiasmarsi ancora per la vecchia (e ILLEGALE) "Catena di
Sant'Antonio"?
BASTAAA!!!
   Alex Palmese
ATTENZIONE: per rispondermi rimuovere "$$$" dall'indirizzo!

 $347,000.00 !!
Dove io lavoro ci sono varie persone che si sono 'buttate' in cretinate
del genere !!!
In 'Ferrari' non č ancora arrivato nessuno e tutti si tengono stretto il
posto di lavoro ...
Con tutti i newsgroup sparsi per il mondo, stai pur certo che di oche
giulive ne troverai quante ne vuoi !!!
Ma, stai certo, non in questo !!!!!!!!

$347,000.00 !!
Le madri dei fessi sono sempre gravide !
Antonio Tanzillo  
a...@pippo.netgroup.it
KillPippoforrepondez
Newsgroup: it.comp.lang.visual-basic
Titolo: ADOX - Could not open table 'MSysAccounts' in the workgroup information file

Salve,
sto usando per la prima volta ADO e ADOX ed ho un problema che non
riesco a risolvere. Devo creare da zero un DB access e, come
suggerisce l'help ho scritto:
Dim cat As New ADOX.Catalog
cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\new.mdb"
Funziona perfettamente in ambiente IDE. Dal file compilato invece
ottengo invariabilmente l'errore: 
-
2147217843
  Could not open table 'MSysAccounts' in the workgroup
information file.
Per favore datemi una mano, non so` piu` dove sbattere la testa.
Grazie,  Massimo


Dov'è il System.mdw?
Non ho controllato, la stringa di creazione dell'oggetto Catalog non deve
specificarlo?
ciao
ugo

ugo
Non ne so nulla di riferimenti al system.mdw nella stringa di
connessione. Sarei molto interessato a saperne di piu`.
Comunque facendo altre prove ho scoperto che l'errore in questione si
verifica anche se provo semplicemente ad aprire una connessione ADO
(non solo ADOX ed al relativo metodo Create).
Quello che non capisco e` che in ambiente IDE funziona tutto
perfettamente.
Saluti
Massimo


Aggiungi una
Persist Security Info=true; User Id= (tuo utente)
alla stringa di connessione.
ciao
ugo

Newsgroup: it.comp.lang.visual-basic
Titolo: DBF OLE????

Ciao a tutti,
    come devo fare per recuperare un valore da un campo MEMO da una tabella
creata in DBF?
Grazie mille
Michelangelo
-- 
##########################
# Yahoo Messenger: ShineMiku
# Ti aspetto per chiacchierare su
# Programmazione, Tecnologie
# Collaborazioni di Lavoro
##########################

Potrebbe sembrarti stupido se ti dico che devi collegarti
al database con l'ole db provider corretto?
Ciao
Andrea

Newsgroup: it.comp.lang.visual-basic
Titolo: annullare evento lostfocus

e' possibile in un evento lostfocus effettuare un controllo e quindi,
in caso negativo, annullare l'evento stesso con un'istruzione VB?
Aranar
e-mail: 
ro...@geocities.com
http://www.nettaxi.com/citizens/Aranar/
   (above all VgaPlanets)
http://www.tempolibero.com/user/aranar
    (sopratutto VgaPlanets)

...


 wrote in message
3710c1d...@news.nettuno.it...


...


Se non vuoi far perdere il focus al controllo basta che in lostfocus ci
metti un bel Controllo.SetFocus. In pratica come perde il fuoco gli
viene ridato.
-- 
May
---------------------------------------------------------
MaySist...@lycosmail.com
Togliere MAYBE
ICQ_UIN: 27234690
---------------------------------------------------------

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] proprieta' dei controlli

con un ciclo del tipo
for each j in me.controls
posso sapere se i vari controlli dispongono di una determinata proprieta',
es. enabled ?
tia, pal

 ha scritto


on error resume next
boo = j.enabled
if err=0 then
[...]
else
[...]
end if
next
Piu' o meno...
--
Ciao.
Maurizio

 es. enabled ?
Certo.
Dim j As Control
Dim v As Variant
For Each j In Me.Controls
    Debug.Print j.Name;
    On Local Error Resume Next
    v = j.Enabled
    If Err > 0 Then
         Debug.Print " non";
    End If
    On Local Error GoTo 0
    Debug.Print " ha la proprietą Enabled"
Next
Ciao
*Roby*
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Legge 388 ???

Ragazzi qualcuno e' riuscito a capirci qualcosa su sta legge ?
http://www.legge388.info
Bho sara' che e' lunedi mattina ma non ci sto capendo nulla !
Qualcuno l'ha gia' visionata ?


Ieri ho visto la pubblicità... sono andato sul sito... ho cominciato a
leggere e mi sono cadute le p... come al solito linguaggio incomprensibile
che richiedere troppo tempo! Come al solito gli incentivi sono riservati ai
grandi che si possono permettere una consulenza esterna per ottenerli! :(


fino all'articolo 2 si segue bene :-)
--
bye BlackMagic
ICQ# 85485468

 grandi che si possono permettere una consulenza esterna per ottenerli! :(
E' esattamente cosě, io ho dei clienti che si sono rivolti ad uno studio di
consulenza
(o alle varie A.P.I. o Ass.Ind.) .  Comunque ormai č tardi....  bisogna
presentare la domanda entro il 27 e ci vuole un sacco di documentazione. Poi
devi
farlo per progetti di almeno 7-9.000 Euro.
Ciao
Andrea

Si ma tanto c'è sempre un problema di fondo ... ho
smesso di leggere adesso dopo 5 minuti, che per
fortuna mia sono più che sufficienti visto che ste
cose (leggi e leggine) le digerisco abbastanza bene,
Prima spendi, poi ti ridanno.
E allora come dico sempre io... se prima devo trovare
i soldi per spendere ... poi forse sperare in una
accettazione della domanda ... tanto vale non contarci
su per niente ... perchè se io devo trovare prima i soldi
anche a prestito (che è peggio) o che ti la papà e
mamma o ce li hai perchè sei società ... equivale a pianificare
e investire del denaro immediatamente, quindi senza un
diretto riscontro del beneficio agevolativo concesso dalla
legge.
Ditemi che sarò scemo ... ma le cose stanno così.
Senza contare che sto aspettando ancora che la regione mi
paghi da 1 anno una fattura di 5 mila euro ... vi lascio immaginare
quando arriveranno sti soldi.
Devono essere a fondo perduto, pochi, maledetti, ma cazzo dateli
subito ....
Un Andrea sempre più pronto all'espatrio

paghi da 1 anno una fattura di 5 mila euro ...
Solo 1 anno? Sei gia' piu' fortunato di me :-(
-- 
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: strano msg da IE (OCX e pagina HTML)

Ciao a tutti,
ho creato un OCX e di seguito il suo internet package per poterlo
richiamare da una pagina HTML
Fin qui tutto OK ma quando cerco di aprirlo la pagina del browser mi fa
apparire questo messaggio:
An ActiveX control on this page micht be unsafe to interact with other
parts of the page. Do you want to allow this interaction?
Se rispondo YES funziona tutto mentre se rispondo NO non visualizza piu il
mio OCX (fin qui penso che sia tutto OK!)
il mio problema sarebbe eliminare questo msg, che risulta fastidioso
all'utente che dovrà utilizzare il controllo!
Qualche impostazione del Browser?
per sicurezza vi posto sia il codice dell'OCX:
Private Sub UserControl_ReadProperties(PropBag As PropertyBag)
    m_captiontop = PropBag.ReadProperty("CaptionTop", m_def_CaptionTop)
    Label1.Caption = m_captiontop
End Sub
Private Sub UserControl_WriteProperties(PropBag As PropertyBag)
    Call PropBag.WriteProperty("CaptionTop", m_captiontop,
m_def_CaptionTop)
End Sub
Private Sub UserControl_InitProperties()
    m_captiontop = m_def_CaptionTop
End Sub
Public Property Get CaptionTop() As Long
    CaptionTop = m_captiontop
End Property
Public Property Let CaptionTop(ByVal New_CaptionTop As Long)
    m_captiontop = New_CaptionTop
    PropertyChanged "CaptionTop"
End Property
che quello della pagina HTML:
<HTML>
<HEAD>
<TITLE>test.CAB</TITLE>
</HEAD>
<BODY>
<OBJECT ID="uc" CLASSID="CLSID:B884860F-5FEB-48BE-A55E-37763CE50796"
id="uc" height=1000 width=1000>
<PARAM NAME="CaptionTop" VALUE="100">
</OBJECT>
</BODY>
</HTML>
alla fine dovrei visualizzare nella label1 il valore passato dall pagina
HTML che in questo caso è 100......
magari qualche guru sa darmi la soluzione o un alternativa :))
per passare un valore ad un ocx da web
grazie a tutti
ciao
Fabio
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Qualche impostazione del Browser?
L'utente deve mettere il tuo sito fra quelli affidabili (trusted
sites) ed impostare le policy per tali siti in modo che accetti
gli ocx.
-- 
ciao, hal

 gli ocx.
ora non lo visualizza piu :))))))))))))
stavo provando a cambiare le opzioni intranet
ma quei trusted sites nn ci avevo pensato :P
Grazie 1000 hal!!!!


oppure devi firmare digitalmente il tuo controllo ocx....
io a casa ho un vecchio libro "Visual Basic 5.0 ed Internet" (o qualcosa del
genere) della MS Press, dove c'era in allegato un CD pieno di utility per
firmare i proprio controlli.....
hai presente il certificato che ti salta fuori la prima volta che accedi a
Windows Update? Ecco, appariva una finestra simile, solo che il nome
dell'autore e le altre informazioni le decidi tu......
non saprei dirti dove puoi trovare quelle cose, nè tantomeno se sono ancora
valide.....
good coding!!!
-- 
Damiani Liborio Igor
ig...@igordamiani.it
 - 
soft...@igordamiani.it
 - 
idam...@hotmail.com
http://www.igordamiani.it
ICQ : 11847262