mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: RDO e TRANSAZIONI

Sto usando rdo in Visual basic per andare su un db in sql server, ho il
problema che dopo aver fatto un committrans o rollbacktrans sulla
transazione o sull'environment, mi vengono chiusi tutti i resultset che
avevo aperto in precedenza. Esiste un modo per evitare la chiusura dei
resultset aperti? perchč questo mi comporta grossi problemi di gestione di
piů finestre aperte contemporanemamente sullo stesso progetto.
So che per evitare questo dovrei gestire piů connessioni al database, ma
questa non č una soluzione valida al mio problema, per svariati motivi.
Vorrei sapere se qualcuno ha avuto questo stesso problema e ha una soluzione
al riguardo.
Vi ringrazio in anticipo, saluti Francesco.

 questa non è una soluzione valida al mio problema, per svariati motivi.


Newsgroup: it.comp.lang.visual-basic
Titolo: ActiveX per Grafica 3d

Sapreste dirmi dove posso trovare ActiveX per disegni in 3D ??
Potete dirmelo per E.mail ??
Grazie
stefa...@capoleuca.it




Che palle con questo fatto che si chiede di rispondere in e-mail
Mi sembrano , tutti quelli che lo chiedono, degli sfruttatori che non hanno
voglia di seguire in ng e si limitano a spremere la "mucca"
Che ne dite ni non rispondere volontariamente a tutti quelli che fanno
richieste del genere ?

 ha scritto

Non mi pare il caso di essere cosi' cattivi.
Ti assicuro che molti di coloro che richiedono risposte via e-mail hanno i
loro buoni motivi (problemi col news-server, mancanza di tempo, etc...)
In genere a queste richieste rispondo comunque SOLO sul NG. Sono rari i casi
in cui rispondo anche per e-mail.
--
Roal Zanazzi
z...@iol.it

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

Sto cercando l'ocx (con possibilmente degli esempi) per usare le
directx(qualunque versione, meglio se usano anche la 3DFX,Matrox G400 marvel
supporto directx, io ho la diretx versione 7.0
    ciao Gabry
email: 
ga...@softhome.net

 wrote in message
84of0l$q8t$1...@lacerta.tiscalinet.it...

Sul sito comuune trovi tre librerie TLB che permettono di usare il DirectX da Visual
Basic.
Sono compresi anche tre esempi d'uso.
(autore: Patrice Scribe) (fornitore: Marco Minerva)
scarica qui: 
http://www.murialdo.it:8000/it_lang_vb/prj/dxvb.zip
Ciao ! Spero di esserti stato utile !
-------------------------------------------------------------------------------------
Sito comune : 
http://www.murialdo.it/it_lang_vb
-------------------------------------------------------------------------------------

Newsgroup: it.comp.lang.visual-basic
Titolo: salvare immagini in formato Jpeg

E' possibile salvare immagini (tipo Picture1.Picture) in formato jpeg?
Purtroppo la funzione SavePicture salva solo in BMP (o simili).
grazie
Stefano 

 Purtroppo la funzione SavePicture salva solo in BMP (o simili).
Forse questo ti può essere utile:
http://tinyurl.com/6lrjwh
--
Ciao Fede
By Chicco Production
http://bcp.freetools.it

 ha scritto nel messaggio 
news:48909559$0$11381$5fc...@news.tiscali.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: (newbie) Nomi di file corti

grazie.
Ciao,
    Non ho ben capito cosa intendi per "sfogliare" comunque esiste un'api
che dato il nome lungo ti ritorna quello corto, prova cosě:
Private Declare Function GetShortPathName Lib "kernel32" Alias
"GetShortPathNameA" (ByVal lpszLongPath As String, ByVal lpszShortPath As
String, ByVal cchBuffer As Long) As Long
Private Sub Command1_Click()
    Dim p As String
    Dim sp As String
    Dim l As String
    p = FileDalNomeLungo
    sp = String$(80, 0) 'Preparo sp per ricevere il nome corto (che non
dovrebbe superare gli 80 caratteri)
    l = GetShortPathName(p, sp, Len(sp)) 'Ritorna il numero di caratteri
validi
    sp = Left$(sp, l) 'Elimino i caratteri in eccesso
    'in sp ora c'č il nome corto.
    'Attenzione, mi sembra che il file passato debba esistere.
End Sub
Ciao

Perfetto, grazie infinite!


Newsgroup: it.comp.lang.visual-basic
Titolo: Personalizzare toolbar ?

Ciao, qualcuno mi sa indicare come fare personlizzare un controllo toolbar a
livello di utente ?
Mi spiego meglio, devo rendere disponibili alcune pulsanti senza che questi
siano visibile nella configurazione base ma aggiunti successivamente.
Ovviamente dopo dovei conservare la personalizzazione su un file ?
Ciao
Veronica


Newsgroup: it.comp.lang.visual-basic
Titolo: Problema Apice nella FindFirst

Forse il problema è già stato postato ma non riesco a trovarlo.
Se alla FindFirst faccio cercare un campo di testo nel quale è presente l'
apice singolo come  "  L' Angolo   " genera un bell' errore. Siete riusciti
a superarlo e se si come ?
Ciao e Grazie a Tutti Voi.
--
Icq ---> 50759119
Mercenaries Never Die. They Just Go Hell To Regroup.

 wrote in message 8bbfid$d7d$1...@nslave1.tin.it...



Un Problema Simile Io l'ho Risolto Così:
In pratica effettuo un controllo sulla presenza di un apice nella stringa
da Utilizzare nella ricerca, e se lo trovo neaggiungo un altro...
Dim S as string 'Variabile Contenente La Stringa da Cercare
Dim Sa as string 'Variabile Di Appoggio
    If InStr(S, "'") <> 0 Then
        Sa = Left(S, InStr(S, "'")) & "'" & Right(S, Len(S) - InStr(S, "'"))
    Else
        Sa = S
    End If
Forse è una soluzione un po da macellaio, pero a me funziona;
Vedi Se puo esserti utile.
Bye

Grazie a entrambi. Funziona
Ciao


Newsgroup: it.comp.lang.visual-basic
Titolo: New entry

Ciao,
    E' la prima volta che entro in NewsGroup, qualcuno può spiegarmi come
funziona la cosa?
    Ho sentito parlare di un server comune: cos'è? Come fare per
raggiungerlo (sia in entrata che in uscita)?

...

Benvenuto nel NG  :-)
Il sito comune è raggiungibile all'indirizzo
http://members.xoom.com/it_lang_vb
(attraverso il tuo browser)
Troverai mooooooooooolte cose utili per i programmatori VB.
E' inoltre in fase di costruzione un "Manifesto", cioè un documento con
delle regole di convivenza civile per questo NG (dai un'occhiata ad alcuni
messaggi + vecchi).
Come funziona il NG?
Se hai dei dubbi/idee/problemi/casini/suggerimenti che riguardano VB posta
un messaggio, qualcuno ti risponderà!
Se sai la risposta a una richiesta di un altro o vuoi fare qualche
considerazione sull'argomento, glie la posti in coda al suo messaggio.
Per i messaggi che non riguardano VB metti  [OT] davanti all' Oggetto (è
meglio farne pochi).
Osservando i vecchi messaggi puoi imparare certamente di più di quello che
ho scritto finora.
Ciao
P.S. se ti rimane del tempo visita il mio sito: il link è qui sotto
--
-
MIX (VB5SP3) <- Io
post...@yahoo.com
   <- la mia Email
80 links ai siti VB
http://space.tin.it/computer/gaais
 <- il mio sito
http://www.tempolibero.com/user/mix/
 <- il link alternativo al mio sito
-
Newsgroup: it.comp.lang.visual-basic
Titolo: Aprire un TXT

Ora sto utilizzando questo comando:
Shell("c:\WINNT\NotePad.exe c:\file_da_aprire.txt", 1)
Il problema è che quando l'utente ha un'altra versione di windows il percorso
del notepad e' diverso.
E possibile aprire un file .txt rilevando automaticamente la posizione e il
nome di notepad.exe o blocconote.exe o di un programma alternativo?
Grazie.
Matteo
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

nome di notepad.exe o blocconote.exe o di un programma alternativo?
Cerca [SUPEFAQ] nei soggetti degli ultimi due giorni.
-- 
ciao, hal

Cerca [SUPEFAQ] nei soggetti degli ultimi due giorni.
pardon, [SUPERFAQ]

 ha scritto nel messaggio
| Ora sto utilizzando questo comando:
| Shell("c:\WINNT\NotePad.exe c:\file_da_aprire.txt", 1)
| Il problema è che quando l'utente ha un'altra versione di windows il percorso
| del notepad e' diverso.
| E possibile aprire un file .txt rilevando automaticamente la posizione e il
| nome di notepad.exe o blocconote.exe o di un programma alternativo?
Dovrebbe essere:
Environ$("windowsdir")
Cerca tra i vecchi post con google

 nome di notepad.exe o blocconote.exe o di un programma alternativo?
Usa il metodo per aprire l'applicazione predefinita per un tipo di file!

> Usa il metodo per aprire l'applicazione predefinita per un tipo di file!
E cioč:
Public Declare Function ShellExecute Lib "shell32.dll" Alias
"ShellExecuteA" _
    (ByVal hwnd As Long, _
    ByVal lpOperation As String, _
    ByVal lpFile As String, _
    ByVal lpParameters As String, _
    ByVal lpDirectory As String, _
    ByVal nShowCmd As Long) As Long
Public Sub MySub(frm As Form, ByVal QuelCheVuoi As String)
    Dim h As Long
    h = ShellExecute(frm.hwnd, "open", QuelCheVuoi, "", "", 1)
End Sub
Se fai qualcosa del tipo
Call MyHelp(Me, "miodoc.htm")
ti apre il browser associato, idem con altre associazioni.

 ti apre il browser associato, idem con altre associazioni.
ecco... giusto questo. fin qui c'ero già da un pò, ma come diavolo faccio a
dirgli di aprirsi ad un determinato segnalibro?
per l'esempio sopra mettiamo ad esempio una cosa del genere:
Call MyHelp(Me, "miodoc.htm#Segnalibro1")
non va!! secondo voi è possibile? ho provato anche da "esegui" passando da
start ma la storia non cambia.
idee in proposito?
grazie.

 pardon, [SUPERFAQ]
Allora raccontala tutta: è [SUPER FAQ] :)
Chiedo a chi fa le statistiche mensili se è possibile conteggiare questa
domanda... ultimamente ha davvero una media superiore all'una al giorno.
Io sono contrario allo spulcio dei vecchi messaggi, ma almeno quelli di oggi
e di ieri!!!
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto sono nuovo

Ciao a tutti, sono nuovo di Visual Basic ed avrei delle domande:
Ho fatto una connessione al mio database utilizzando ADO e sono riuscito ad
inserire i dati in un datagrid.
Siccome i campi sono tanti non entrano tutti e sotto c'č la barra di
scorrimento sotto. Come faccio a fare in modo che la mia griglia segua la
dimensione di tutta la finestra? Cioč, se allargo la finestra a tutto
schermo la griglia mi rimane sempre delle stesse dimensioni, come faccio a
far diventare anche la griglia a tutto schermo?
Grazie
Vincenzo

 ha scritto nel messaggio
news:RBQQa.32908$it4.8...@news1.tin.it...

nel form.resize
imposta le priprieta height e width della griglia,
ad esempio se c'e' solo la griglia e la vuoi a tutto form
datagrid1.height  = form1.heigth - 500
datagrid1.width = form1.height -500
ciao Ilario


nell'evento resize del form (doppio click sul form, dalla combo in alto a
destra scegli resize) inserisce qualcosa del genere:
oggetto.width=me.width 'larghezza
oggetto.height=me.height 'altezza
ovviamente devi sostituire oggetto con il nome della tua datagrid.
Ma non è finita qua. ;-)
Infatti quel codice ingrandirà la datagrid a tutto il form ma considera che
il form ha la barra del titolo quindi un parte della datagrid risulterà
invisibile. Devi quindi modificare
        me.height
con qualcosa come
        me.height - 100.
Lo stesso vale se nella form ci sono altri controlli. Allora devi sottarre
qualcosa anche a me.width o me.height.
Spero di essere stato chiaro (anche se ne dubito).
Se hai problemi facci sapere.
Salvo

 ciao Ilario
Ciao
Andrea

 ha scritto nel messaggio
news:bf0lig$9ag9t$1...@ID-170738.news.uni-berlin.de...

si hai ragione era solo un esempio grazie per la precisazione
ciao Ilario

[*ilario* : 
ilariosa...@stiscali.it
] ha scritto:

Se ho ben capito cosa possono significare quei "500", si introduce un
discorso concettuale che val la pena di sottolineare: L'area interna di un
form puņ essere ottenuta, con precisione, con le proprietą Scale<Width
Height>

 sempre bene.
Infatti:
grid1.Move 0, 0, ScaleWidth, ScaleHeight
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Macrofunzione per leggere quotazioni su Yahoo

Vorrei creare una macrofunzione che, una volta inserita in una cella di
Excel trasferisca una quotazione trovata su Yahoo Finanza a seconda del
codice inserito come argomento della funzione.
Per esempio Price(FIA.MI) dovrebbe restituirmi il prezzo delle Fiat.
Nessuna idea?
Ciao.
-- 
gilgil

 Per esempio Price(FIA.MI) dovrebbe restituirmi il prezzo delle Fiat.
Io sto creando un programma e per le quotazioni e uso il televideo della rai
su internet in formato testo che salvo in un file.


Anche da Yahoo è possibile salvare in un file .csv  le quotazioni di un
elenco di titoli. A questo punto, con una macro, è facile manipolare i dati
scaricati come meglio si desidera. Il passaggio che vorrei automatizzare è
il salvataggio dei dati da Yahoo. In altre parole vorrei aprire il mio file
di Excel e a questo punto la macro dovrebbe aggiornare le quotazioni andando
a leggerle su Yahoo o su televideo o su qualsiasi altro server.
 ,

[gilgil] scrisse:

tante.
intercettando l'evento beforenavigate di un controllo WebControl (o come
diavolo si chiama) mi faccio il log di una navigazione manuale.
poi la automatizzo.
infine interpreto il codice html (oppure il dom, o come cavolo si chiama
anche lui) della pagina "obiettivo"
buon lavoro
-- 
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Midi -> wave

Mi scuso per l'ennesimo OT... ma che ci posso fare... questo NG è quello che
funziona meglio d tutti... ;-)))
dovendo registrare in un file wave un brano midi, esistono programmi che
fanno ciò automaticamente, senza ricorrere a "trucchetti infami" ?
grazie,
Marco

 ha scritto nel messaggio
news:WGWZ6.7864$ZE.5...@news1.tin.it...


 fanno ciň automaticamente, senza ricorrere a "trucchetti infami" ?
it.comp.musica.midi
--
--
Elena *DElyMyth* Franco
DEly...@tiscalinet.it
ICQ#: 8761263 - MSN: 
dely...@tiscalinet.it
Yahoo!: delytisc - AIM: DElyMyth
--

 ehm... ho risolto...
come hai risolto?
Faber

 Faber
beh... non ci avevo pensato subito... ma era una c....a!
ho messo il mute a tutti i dispositivi di riproduzione e registrazione
tranne a quello midi (nel mixer di win) poi ho usato un programma di editing
audio (es. cool edit) per registrare...
ciao!
Marco

 ha scritto nel messaggio
news:i4_Z6.275$7N2....@news1.tin.it...

Molto meglio usare un programma di registrazione multitraccia tipo
Cubase della Steinberg o Cakewalk, meno casini e puoi sentire tutto in
real time, in più ci sono effetti e quant'altro
ciao
degra

Newsgroup: it.comp.lang.visual-basic
Titolo: ?2 dimensionare colonne in db grid come fare??

come si fa per dare una dimensione alle colonne in un dbgrid??
vorrei dare una dimensione diversa per ogni colonna
domanda numero 2 : e se le voglio eliminare ???
ringrazio di cuore chi mi aiuterą

+AD4-come si fa per dare una dimensione alle colonne in un dbgrid??
+AD4-vorrei dare una dimensione diversa per ogni colonna
tasto destro sulla dbgrid e propriet+AOA-...
nel layout selezioni la colonna che vuoi modificare e imposti la Width
oppure
tasto destro sulla dbgrid e modifica
cos+AOw- puoi dimensionare a mano le colonne
+AD4-
+AD4-domanda numero 2 : e se le voglio eliminare ???
tasto destro sulla dbgrid e modifica
selezioni una colonna e con tasto destro elimina
+AD4-
+AD4-ringrazio di cuore chi mi aiuter+AOA-
+AD4-
+AD4-
+AD4-
Newsgroup: it.comp.lang.visual-basic
Titolo: Errore incomprensibile

Ho un mio ocx - sempre lo stesso di tanti altri post -
cha ha iniziato a fare lo stro...
Quando accedo alla sua proprietą value in scrittura
mi caccia fuori un errore di questo tipo
"<Method 'Value' of object '_MyOcx' failed>"
runtime -
2147418105
Che cavolo vuole se fino alla settimana scorsa funzionava?
Ciao
AndreA

Dimenticavo un particolare.
Ho provato come consueto a deregistrare e registrare
nuovamente il controllo e non va, ma la cosa ancora
più strana è che con il progetto sorgente non si scatena
nessun errore, con un progetto di esempio che carica
l'ocx nemmeno.
Me lo fa solo dentro un progetto in cui sto usando abbastanza
pesantemente il controllo.
Ciao
Andrea

 ha scritto nel messaggio
news:b2dgqp$1b3n8j$1...@ID-61006.news.dfncis.de...

Al 90% hai qualche problema di compatibilita' binaria... prova a compilare
una versione dell'OCX senza compatibilita' e a testare i tuoi progetti
facendo riferimento a questa
Se funziona, dovresti provare a risalire alle ultime modifiche prima del
fattaccio, e vedere se e come hai cambiato l'interfaccia pubblica del
componente
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

No trovato ... come al solito gli errori della micrsoft
sono molto chiari e trasparenti :)
C'era una condizione if nella mia propietą value che
faceva lo stop.
A run time lo stop non potendo essere gestito equivaleva
nell'errore "failed to setup value property".
L'avevo messo li per debuggare chissą quando, poi
visto che ultimamente ci sto lavorando a saltelloni
sopra sto progetto, mi č passato di mente ... e ricompilando,
e usando il progetto, visto che era comunque una condizione
assai rara da verificarsi ... incappavo nel problema.
Grazie per l'aiuto comunque.
Ciao
Andrea

 Grazie per l'aiuto comunque.
Prego... se in futuro ti vuoi togliere il problema, invece di usare 'Stop',
usa
'Debug.Assert False'; nell'IDE funziona come uno stop (si ferma sempre) ma
in compilazione viene escluso come tutte le chiamate all'oggetto Debug.
E' un piccolo trucco per poter avere qualcosa di simile a brekpoint
permanenti, senza pericolo di dimenticarti nulla in giro...


Giusto. Ma sai a volte anche nella fretta per non star
a scrivere :)
Ciao
Andrea
Newsgroup: it.comp.lang.visual-basic
Titolo: API "beep"

Private Declare Function Beep Lib "kernel32" (ByVal dwFreq As Long, ByVal
dwDuration As Long) As Long
Private Sub Command1_Click()
Dim test As Long
test = Beep(4000, 1000)
End Sub
Questo č quanto ho inserito in una applicazione di prova per ottenere un
suono diverso da quello impostato nel sistema, ma non funziona. Mi viene
sempre restituito il suono di default. Qualcuno sa perchč? Grazie.


Da me, Windows 2000 Server, al cambiare della frequenza e del tempo, ottengo
un suono e un tempo di durata diverso.
leggo da API-GUIDE
· dwFreq
Windows NT:
Specifies the frequency, in hertz, of the sound. This parameter must be in
the range 37 through 32,767 (0x25 through 0x7FFF).
Windows 95:
The parameter is ignored.
· dwDuration
Windows NT:
Specifies the duration, in milliseconds, of the sound.
Windows 95:
The parameter is ignored.
forse il sistema operativo
giuseppeD

 ha scritto nel messaggio
news:kZ8Aa.246684$K35.5...@news2.tin.it...

ciao
con xp funziona
ciao Ilario

 sempre restituito il suono di default. Qualcuno sa perchč? Grazie.
questa api funziona solo sotto sistemi NT
Era stata fatta una Dll che implementa il beep su tutti i sistemi operativi
microsoft
č sul SC a questo URL
http://www.it-lang-vb.net/download.asp?file=Archivio/Binari/winbeep100.zip&I
D=225

Newsgroup: it.comp.lang.visual-basic
Titolo: VB e MDB Access 2000 con tabella DBF allegata

Ho un problema: creo un MDB con Access 2000, allego una tabella DBF.
Se voglio modificare i record della tabella DBF la procedura mi dice che la
tabella e' in sola lettura. Ho provato ad aprirla allora con Access e
neanche da li e' possibile modificare i record.
Che Fare ?
Per favore aiutatemi.
Paolo



Newsgroup: it.comp.lang.visual-basic
Titolo: [?] VB5-Formato data in textbox

Ciao a tutto il NG, eccovi il mio problema
In un form ho una textbox collegata tramite datacontrol ha un campo di un
database access'97, il campo ha il tipo dati impostato come data/ora senza
specificare la maschera di immissione dati, vorrei che quando l'utente
scrive, ad es. 28032000, alla perdita del focus diventasse 28/03/2000.
Ho cercato anche in 
deja.com
, ma non riesco a far funzionare il codice che
ho trovato, o mi da errore o mi restituisce date assurde, qualcuno può
aiutarmi?
Grazie in anticipo
Riciao, Valli

ho trovato, o mi da errore o mi restituisce date assurde, qualcuno puň

Newsgroup: it.comp.lang.visual-basic
Titolo: MSComm

Ciao a tutti
C'è qualcuno che sa come impostare la velocità della porta ad un valore
diverso da quelli predefiniti ?
Es. Baud : 10000
Grazie anticipatamente
Roberto

...


CIAO GIGGIUZZ
Perche' maiuscolo?
Le velocità devono essere supportate dall'uart. Per motivi che si
perdono nella notte dei tempi (niente computer, solo telescriventi) le
velocità sono un po' strane... 75,150,300, 600, 1200, 2400,4800,9600,
19200, 38400 etc tutte il doppio della precedente. Questo perche' ci
vuole un clock HARDWARE (viva!) e nessuno ha voglia di fare un uart a
10000 baud. 
Toglimi una curiosità: a che ti serve un b/r strano?
Pietro
                  Check the address!  -->
pi...@tin.it

 wrote in message
news:37fb96e5...@news.libero.it...

Per GIGGIUZZ
Grazie della risposta e se mi puoi fare un esempio te ne sarei grato non
sono molto esperto riguardo le api , grazie anticipatamente
Per Pietro
Il motivo per cui devo impostare una velocità diversa da quelle predefinite
è che ho un'apparecchiatura che va a quella velocità ,quello che dici sullo
standard è vero ma non è vero che si può andare solo a velocità standard .
Ho visto molti programmi in visul C++ che lavoravano a qualsiasi velocità .
Grazie e a risentirci
Roberto

 10000 baud.
questo non è assolutamente vero: è possibile far funzionare una qualsiasi
UART da 2 bps fino a 115200 bps
ciao

 wrote in message bPqL3.44089$nP6.4...@typhoon.libero.it...

Domanda per pura curiosità: sul mio Win 95 C (OSR 2.5), facendo
pannello di controllo-->Sistema--->periferiche-->porte-->velocità
trovo anche: 230.400,  460.800 e addirittura 921.600...
Qualcuno è mai riuscito a utilizzare queste velocità ? Magari in un collegamento diretto PC-PC ?
Io non ho mai provato, ma mi sembra di ricordare che l'MSDN definisse alcune velocità come
"riservate"...
P.S.: Ai tempi del Sinclair QL, una rivista propose un programmino assembler proprio
per variare in maniera lineare la velocità della seriale, l'articolo era "QL Selecta", con
riferimento alle Fiat omonime, con il cambio a variatore continuo...
Bye, G.
--
---------------------------------------------
    Le risposte alle tue domande le trovi
    sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
       ... e nell'help in linea !
---------------------------------------------
Real E-address: 
gaet...@hotmail.com
Newsgroup: it.comp.lang.visual-basic
Titolo: Server Per Applicazioni ...

Ciao a tutti, il mio problema è banale, ho fatto un programma clone di ICQ,
diviso in 2 parti, quella server e quella client.
Il mio problema è quello di trovare un server gratuito che mi permettesse di
mettere sempre attiva la parte server, deve anche avere anche i driver di
access dato che l'applicazione server utilizza un db ....
Non conoscete qualche servizio gratuito che può fare al caso mio ? Ma
basterebbe un'abbonamento di Hosting o bisogna per forza fare un Housing per
applicazioni di questo tipo ?
Ciao a tutti e grazie ...
                    Bruce

 ha scritto nel messaggio
news:vPJs6.48572$yl2.1...@news1.tin.it...



eseguire un exe su un server remoto?
non avrai mai il permesso. neanche pagando!
se sei leggermente bravino in asp puoi aggirare il problema ma ricadi
nell'illegale.
--
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

 Lorenzo
Lo so ma per fare quello che ho bisogno io si può usare un servizio di
hosting o per forza di huosing ?


 perchč?
Ciao Lorenzo

  perchč?
perche' se un tizio installa un exe puo' in due minuti buttare
giu' il server web, il server mail, se non addirittura bloccare
il computer.
altresi' l'esecuzione di exe provoca anche l'infezione di
virus (se il mio exe e' un virus ho fatto una strage), l'apertura
di porte, la diffusione di dati personali, il tutto contro la fama
e la sicurezza dell'azienda che ti concede lo spazio.
Per questo nessuno ti fa installare/eseguire exe o dll a
piacimento (esperienza personale, sigh ;o(  )
forse, ma credo proprio di no, hai qualche speranza con l'housing,
altrimenti l'amministratore si deve prendere carico di reinstallare
tutto se fai qualche casino.


Newsgroup: it.comp.lang.visual-basic
Titolo: stampanti 2: sapere se la stampante ha finito di stampare

vorrei lanciare un bel msgbox alla fine del processo di stampa che dica
"stampa terminata correttamente".
solo che se metto il msgbox subito dopo printer.enddoc parte prima il msgbox
e poi la stampante.
come faccio ad intercettarela fine del processo di stampa ?
thanx
MarioH

MarioH ha scritto:

Guarda le API GetPrinter e GetJob.
La prima ti restituisce informazioni su una stampante, tra cui il
numero di stampe in coda.
La seconda ti restituisce informazioni su una stampa in coda,
tra cui il suo stato (in stampa, stampato, in attesa, carta finita, ...)
Se queste non dovessero bastare in fondo alla pagina dell'help c'e'
il link alla pagina con l'elenco di tutte le API per la stampante.
-- 
Samuele Battarra
mail server: 
libero.it
, indirizzo: battarsa@(mail server)
prova il mio newsreader:
http://digilander.iol.it/battarsa/programmi/leggiminews.html
Newsgroup: it.comp.lang.visual-basic
Titolo: SQL SERVER 7.0 E VISUAL BASIC 6

Buongiorno,
avrei bisogno di un esempio pratico per connettere e leggere una tabella
da VisualBasic 6 con MsSQL 7.0.
Qualcuno puň postarmi un esempio?
GRAZIE 1000
--
Posted from 
pop05-acc.tin.it
 [212.216.176.68]
via Mailgate.ORG Server - 
http://www.mailgate.org

 Qualcuno puņ postarmi un esempio?


Newsgroup: it.comp.lang.visual-basic
Titolo: Vb con crystal Report 8

Sto facendo un programma e creo delle stampe con crystal report 8.0, tramite
l'ocx del viewer, quindi importando il report sul progetto VB e legandolo ad
un form tutto funziona e da codice gli vado a settare il database.
Il codice del form con il report connesso è il seguente:
Dim RecRep As DAO.Recordset
Dim DbRep As DAO.Database
Dim Report As New CrystalReport1
Private Sub Form_Load()
Screen.MousePointer = vbHourglass
'********************************************************************
DbPath = ReadIni
Report.DiscardSavedData
Set DbRep = OpenDatabase(DbPath & "\DbGest.mdb")
Set RecRep = DbRep.OpenRecordset("temp")
Call Carica
CRViewer1.ReportSource = Report
CRViewer1.ViewReport
Screen.MousePointer = vbDefault
End Sub
Private Sub Form_Resize()
CRViewer1.Top = 0
CRViewer1.Left = 0
CRViewer1.Height = ScaleHeight
CRViewer1.Width = ScaleWidth
End Sub
Private Sub Carica()
    Report.Database.SetDataSource RecRep
    MsgBox Report.Database.SetDataSource
    Report.ReadRecords
End Sub
Private Sub Form_Unload(Cancel As Integer)
    n = 0
    For i = 0 To DbRep.TableDefs.Count - 1
        If DbRep.TableDefs(i).Name = "Temp" Then n = 1
    Next
    If n = 1 Then DbRep.TableDefs.Delete "Temp"
    n = 0
    RecRep.Close
    DbRep.Close
End Sub
Quando compilo il programma e lo lancio su un qualsiasi pc mi dà il
messaggio:"Physical database not found!"
Che cazzo sbaglio? dove mi tiro la zappa sui piedi?
Se avete un metodo sicuro e da consigliare accetto qualsiasi vostro
consiglio.
Grazie in anticipo
Stefano


Francamente non mi ricordo l'uso del controllo CryRep.
Troppo limitato e pesante.
Dai un'occhiata al Crystal Report Developer Help.
ciao
ugo

Ho avuto lo stesso identico problema; l'intoppo non sta nel codice ma bensì,
anche questa volta, nel pacchetto di installazione.
Io ho risolto installando crystal report sulla macchina di destinazione
dell'applicativo e come per magia funziona tutto.
Ciao.

 Ho avuto lo stesso identico problema; l'intoppo non sta nel codice ma
bensě,


della stampa risolvo il problema?
Ho sentito dire che se, invece di usare l' ocx si usa l' api di crystal report
si risente meno di queste "features" ( o fregatures ?)
ciao, hal

 ha scritto nel messaggio
news:9djanq$id5f4$1...@ID-56381.news.dfncis.de...


>Ti chiedo troppo se mi puoi dire qual'è e come si usa?
ah, su crystal so poco e niente :-(
egoisticamente speravo che riuscissi a scoprire qualcosa e, magari, a farcelo
sapere ;-)
ciao, hal

 ha scritto nel messaggio
news:9djj5e$inp8v$1...@ID-56381.news.dfncis.de...


Ho postato al Sito comune ieri o l'altro ieri un progetto di esemopio
sull'uso dell'Api Crystal Report.
Credo che se avrai pazienza qualche giorno lo potrai trovare sul sito
comune.
ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] [per tutti] netiquette

Una ripassata ogni tanto non fa male ;-)
http://www.faqs.org/rfcs/rfc1855.html
-- 
buon anno, hal

 Una ripassata ogni tanto non fa male ;-)
Assolutamente d'accordo.
Oltre alla Netiquette, per favore, ci sono almeno DUE post,
uno mio ed uno di Lupo mi sembra, inerenti questioni generali
sia per i gruppi che per la soluzione dei problemi.
Per favore guardateli!!!!
Buon Anno,
Andrea

Newsgroup: it.comp.lang.visual-basic
Titolo: Sort controllo Data e DAO

Devo mettere le mani in un programma che usata il controllo Data con DAO su
un DB Access.
Premetto che l'ultima volta che ho usato il DataControl era alle
superiori... :)
In pratica c'è una procedura che fa
Sub Prepara
	Data1.Refresh
	If Not (Data1.Recordset.BOF And Data1.Recordset.EOF) Then
	  Data1.Recordset.MoveFirst
	End If
	Do Until Data1.Recordset.EOF
	  [...]
	  Data1.Recordset.MoveNext
	Loop
End Sub
E' venuto fuori che i dati ovviamente vengono elaborati in un ordine
casuale (ovviamente, non ci sono ORDER BY in giro)
Ora io ho provato
Data1.Recordset.Sort ma mi manda a quel paese, dicendo che il recordset non
è aperto in maniera opportuna, ovviamente non lo posso cambiare senza
sapere se da altre parti da fastidio.
C'è qualche modo per dare un ORDER BY a quel Data1.Recordset? Oppure devo
continuare a mandare a quel paese chi l'ha scritto?
Se non c'è soluzione trasformo la parte in ADO facendo un SELECT su un
recordset, ma preferirei metterci le mani il meno possibile.
Tnx

 sapere se da altre parti da fastidio.
Niente, messo RecordsetType= Dynaset e RecordSource= SELECT ...  ORDER BY
Ora funziona.
Diciamo che č un mini-programma, e il DB č usato solo lě, quindi non da
fastidio da nessuna altra parte.
Grazie comunque

 C'è qualche modo per dare un ORDER BY a quel Data1.Recordset?
Come no!
In form load metti
data1.recordsource= "select * from tab order by..."
-- 
Greg 

 data1.recordsource= "select * from tab order by..."
Non me lo prendeva (almeno a livello di progetto), perchè il tipo era TABLE
e non Dynaset o l'altro.
Comunque come vedi ho risolto.

Newsgroup: it.comp.lang.visual-basic
Titolo: IN e OUT in Visual Basic 3.0 - Shareware

E' disponibile per chi lo desidera la DLL che permette a VB3 di utilizzare
le funzioni IN e OUT (come qbasic) all'url:
http://www.geocities.com/Athens/Acropolis/2359/vb3ioext.zip
Registrazione L. 15.000


wrote:

Ma non era gratis ?
Antonio Tanzillo  
a...@pippo.netgroup.it
KillPippoforrepondez

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Re: Warning.............please read.................................................................... . 6001

Fusion, eh ?
So do you think you are smart ?
fys, hal

e che vor di?
--
GbC
http://www.chiappori.net
http://www.gbcweb.com
--
Newsgroup: it.comp.lang.visual-basic
Titolo: Gif animate trasparenti

Ciao,
Vorrei visualizzare una gif animata in un form VB, sopra uno sfondo
colorato (picture o image con jpeg).
Ho convertito la gif animata in AVI, ma non riesco ad ottenere la
trasparenza.
La trasparenza non funziona neache con file avi standard "search.avi":
funziona solo se lo sfondo del form ha colore uniforme.
Potete aiutarmi ?
Ciao, Liliano
Sent via Deja.com 
http://www.deja.com/
Before you buy.

 ha scritto nel messaggio
news:8ululk$lnf$1...@nnrp1.deja.com...


 Ciao, Liliano
sul sito comune del ng ci dovrebbe essere un ocx o dll per i gif animati:
http://www.murialdo.it/it_lang_vb/

 wrote in message 8ululk$lnf$1...@nnrp1.deja.com...
| Ciao,
|
| Vorrei visualizzare una gif animata in un form VB, sopra uno sfondo
| colorato (picture o image con jpeg).
|
| Ho convertito la gif animata in AVI, ma non riesco ad ottenere la
| trasparenza.
|
| La trasparenza non funziona neache con file avi standard "search.avi":
| funziona solo se lo sfondo del form ha colore uniforme.
|
| Potete aiutarmi ?
| Ciao, Liliano
|
|


,

Newsgroup: it.comp.lang.visual-basic
Titolo: 2 domande veloci

ciao
1) avendo il percorso di 1 file c:/ecc.../nomefile.estensione
x ricavare il nome del file c'è qualche funzione o comando, oppure devo 
ricavarmelo io splittando lo "/" ?
2) se devo deselezionare un elemento di una combo box, devo sfogliarmela 
tutta, vedere quale è selezionato e dargli del false , oppure c'è 
qualche funzione?
a pelle, se x capire quale è selezionata devo sfogliarmela tutta, mi sa 
che è lo stesso pure x deselezionare il selezionato :-)
ciaociao
-- 
     _
    [_]     SCIRIO
  /;   :\
()'---' C  100% COMMERCIALE
   | | |    
http://scirio.altervista.org
   [=|=]

 oppure c'è qualche funzione?
Listindex???
MIk

 sa che è lo stesso pure x deselezionare il selezionato :-)
nope, per fortuna
--
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo

Prima di skippare tutto in blocco, mi sono accorto che *scirio* ha scritto:
Non pensavo di beccarti qui da fib...
-- 
Alex
"La differenza tra un genio ed un idiota č che il genio ha i suoi
limiti" (Anonimo)
Posted from X-Privat Free NNTP server - 
www.x-privat.org

 
ehehehe, qui non sono fisso, li ho fatto casa :-)


 ehehehe, qui non sono fisso, li ho fatto casa :-)
Io al contrario ^_^
-- 
Alex
"La differenza tra un genio ed un idiota è che il genio ha i suoi


 (si chiama ListIndex, ho appena guardato)
iess!
ciaociao

 
Usi il sacro vb per lavoro o per hobby?
ciaociao


 Usi il sacro vb per lavoro o per hobby?
Decisamente per lavoro... lavoro in una software house infatti.
-- 
Alex
"La differenza tra un genio ed un idiota č che il genio ha i suoi


 
Bello :-)
Io x lavoro uso il php, ma col vb son sicuro che mi divertirei di + :-)
Quindi nel tempo libero me lo studio un pò, semmai un giorno decidessi 
di cambiare



grazie 1000


perfetto, unica pecca è che mi richiama anche l'evento click al quale avevo
associato altri comandi che non dovrebbe eseguire, ma fa niente :-)

nf = right(path,len(path)-INSTRREV(path,"/"))
                                        ^^^^^^^^^
InstrRev ? Cos'e' ? tipo lo split?		

 InstrRev ? Cos'e' ? tipo lo split?
Come la Instr, ma da destra a sinistra.
La guiiiiiiiiiiiiiidaaaaa!!!

 :-)
quando intercetti il click, verifica che il listindex sia valido (<> -1).
anche perchè, se non ricordo male, se uno parte da un combo senza selezioni,
apre la lista e poi la chiude senza scegliere niente, il click con listindex
a -1 te lo becchi lo stesso.



beh, basta che nell'evento click metti un
If ListIndex>-1 Then
ciaociao

azz...per 2 minuti! :)

 decidessi  di cambiare
Fai bene, è sempre meglio conoscere 2-3 linguaggi, non si sa mai...
-- 
Alex
"La differenza tra un genio ed un idiota è che il genio ha i suoi
limiti" (Anonimo)

 
grazie a tutti e 2 :-)


 ricavarmelo io splittando lo "/" ?
Prova a guardare l'oggetto "FileSystemObject" (libreria Microsoft
Scripting Runtime mi pare...), fa parecchie cose carine e il metodo
"GetBaseName" ti restituisce il nome del file, mi pare però senza
estensione...
Ciao!
Stefano
Newsgroup: it.comp.lang.visual-basic
Titolo: ToolbarWindows

Vorrei aggiungere un'icona nella barra di windows dove è presente l'icona
dell'audio e dell'ora.
Potete dirmi come si fa? Vorrei inoltre anche aggiungere cliccandoci su un
menu con delle opzioni.
Grazie.
Luca

 ha scritto nel messaggio
news:F6Pg6.24129$eQ5.5...@twister2.tin.it...


 <LuigI>
Qual'è il vostro sito per cortesia?
Grazie mille.

 ha scritto nel messaggio
news:1AQg6.24345$eQ5.5...@twister2.tin.it...


 ha scritto nel messaggio
news:F6Pg6.24129$eQ5.5...@twister2.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Query con Integer invece delle stringhe....

Devo fare una query su un campo numerico di una tabella Access, confrontando
lo stesso campo con il contenuto di una text.
Ho cosě messo in una variabile di appoggio Val(text1.text) per ricavarmi un
integer, e poi confrontare il campo della tabella con la variabile.
Successivamente perň sono incappato in errori di sintassi che non so'
risolvere perchč conosco soltanto il confronto con date o stringhe.
Vi inserisco il codice della query con la sintassi da "stringa" sulla
variabile numerica, potreste correggermelo in modo che funzioni per numerici
?
Dim Indice As Integer
Private Sub Command1_Click()
    Indice = Val(Text1.Text)
    Data1.RecordSource = "Select * from Prima where (Indice = '" & Indice &
"')"
    Data1.Refresh
End Sub
Grazie dell'aiuto....Giacomo 
ande...@tin.it

Per i parametri numerici devi togliere l'apice singolo (') e lasciarli di
tipo stringa.
Private Sub Command1_Click()
    Data1.RecordSource = "Select * from Prima where Indice = " & Text1.Text
    Data1.Refresh
End Sub
Ciao da Kjo                                            ###
alem...@tin.it

...

E ovviamente se il val(text1.text) c'e lo lasci, non dovrebbe fargli male.
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] Eventi tra moduli

Ho un'applicazione complessa nella quale spesso più forms aperte
contemporaneamente visualizzano gli stessi dati.
Ho la necessità di implementare un meccanismo generico che comunichi
ad es. a form B, C, D che form A ha operato dei cambiamenti.
La soluzione più naturale sembrerebbe quella di fare in modo che ogni
form si metta in ascolto, in attesa di un determinato evento che la
riguarda, per poi eventualmente aggiornarsi.
Se però si prova a centralizzare la gestione di questi eventi in una
classe, ci si scontra con il fatto che si è costretti a crearne
un'istanza diversa per ogni form caricata, perdendone così di fatto
gli eventi.
Mi chiedevo se questa strada è in qualche modo praticabile...

<Raimbaut de Vaqueiras> ha scritto nel messaggio 
news:r64ca3hnd90kd653d...@4ax.com...

Puoi fare così:
- dichiari la l'oggetto di tipo classe che "sparge" gli eventi nel form 
principale o nella sub main (insomma, ne tieni una sola instanza).
- in ogni form dichiari
Dim WithEvents Eventi As ClasseEventi
e ne gestisci l'evento.
- quando apri il form gli passi l'istanza globale
FormA.Show()
FormA.Eventi = FormMain.IstanzaEventi
Non so se sono chiaro :)
Ciao 


Azz!  Semplice e funzionale. Thanks!
PS: Prima che io la implementi a mulo, ti sovviene qualche
controindicazione? 
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Non è tutt'oro quel che luccica...

Salve!!!
Come da subject: le cose non sono andate come speravo e, credetemi, ce l'ho
messa tutta... perché non sono andate come speravo?
Eh, ne parleremo in altro momento <g>.
Ad ogni modo, sono nuovamente a pič, stavolta sono in zona Padova, quindi
cerco lavoro lě.
Qualcuno che si vuol prendere un programmatore sfigato? <g>.
Ah, per vostra informazione, sappiate che finalmente č stato
posto in vendita un mio prodotto: 
www.studio-delta.it
 il prodotto si
chiama ECommerce Portal, lo trovate in home page e gli hanno
dato ben TRE pagine! <g>.
Che figata ! :-)
Grazie in anticipo,
-- 
Andrea Raimondi
REICOM S.r.l.
Software Developer

 posto in vendita un mio prodotto
beh, allora qualcosa che gira per il verso giusto c'è :-)
--
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo

 beh, allora qualcosa che gira per il verso giusto c'è :-)
Si, qualcosina... :-)
In realtà speriamo, ci sono altre cosette in ballo e se vanno... :-)
beh, se vanno, diciamo che sono MOLTO contento :-)
Ciao,
Andrea

Newsgroup: it.comp.lang.visual-basic
Titolo: aiuto con due DATACONTROL

Ho un problema con due datacontrol su due form.
sul primo ho la prima data1 collegata ad una dbgrid, sul secondo form ho una
data2 collegata a dei controlli, però il mio problema è che non riesco a
rendere visibili sulla griglia le modifiche apporta al database attraverso
la DATA2 presente sul form2. Ho provato a rendere la data2 come un'istanza
di data1, però non ci sono riuscito.
cioè
dim db as data1
set db = form1.data1
db = data2
questo lo faccio all'avvio del form2 ma nulla da fare.
Per favore qualche consiglio.
grazie anticipatamente michele

Per favore qualche consiglio.
Io credo che dovresti provare con un refresh del/dei controlli associati al
data1, magari agganciando il refresh all'evento validate di data2 nel caso
l'aggiornamento vada a buon fine (in prima battuta mi veniva in mente un
aggancio al reposition, ma cosě facendo non ci sarebbero aggiornamenti se
non in seguito a spostamenti di record).
Newsgroup: it.comp.lang.visual-basic
Titolo: VB.NET - Utilizzo del array.sort

Ho un array così dichiarato:
Dim Da As SqlDataAdapter
Dim Ds As DataSet
Dim cmd As string
com = New SqlCommand("EXEC sp_helpuser", Connessione)
Da = New SqlDataAdapter(com)
Ds = New DataSet()
Da.Fill(Ds, "ElencoUtenti")
cmd = "GroupName<>'db_owner'"
Dim x() As DataRow
x = Ds.Tables("ElencoUtenti").Select(cmd)
La Tabella "elencoUtenti" contiene 6 colonne,
vorrei ordinarla per la prima colonna ("UserName")
Non riesco a carire come far funzionare X.sort o array.sort(x)
Qualche suggerimento?
Grazie

 Non riesco a carire come far funzionare X.sort o array.sort(x)
-Credo- che si necessario che ti costruisci un comparer personalizzato.
Crea una classe implementa IComparer. Non é il modod migliore di lavorare,
ma se crei la classe come private potresti dare per scontato che ti passino
sempre delle DataRow e che abbiano sempre la stessa struttura, eventualmente
aggiungi il codice di controllo.
Private Class MYComparer
Implements IComparer
Public CompareFieldIndex as integer = 0
Public Function Compare(ByVal x As Object, ByVal y As Object) As Integer
Implements System.Collections.IComparer.Compare
  return
directcast(directcast(X,DataRow).item(CompareFieldIndex ),IComparable).Compa
reTo(directcast(X,DataRow).item(CompareFieldIndex ))
End Function
End Class
A questo punta usa il tuo comparer per fare il Sort dell'Array in questione:
Array.Sort(X,New MyComparer)
                        Ciao
                                        Allanon
-- 
- SPAMKILLER
 L'indirizzo delle risposte é 
itlangv...@michele.sytes.net
 LASCIATE il NOSPAM fa parte dell'indirizzo :-)
  Per superare le impostazioni di protezione antispam scrivete
  nel testo del messaggio la scritta "SPAMKILLER"
Scusate il disturbo, ma non posso più di pubblicità
Newsgroup: it.comp.lang.visual-basic
Titolo: DLL per Carte da gioco

Una volta in VB3 esisteva una libreria abbastanza diffusa
da richiamare per visualizzare le carte da gioco in un programma
VB3.
Il tutto era accompagnato da una buona documentazione
Non trovo più il tutto ovviamente.
Sapete se esiste ancora o se esiste una versione aggiornata ?
E se esiste dove la trovo?
                                                    Grazie Danilo

Franco ha scritto

Probabilmente ti riferisci a CARDS.DLL, dll a 16bit fornita insieme al
Solitario di Windows da Win 3.1 (o 3.0?) in poi.
se hai installato i giochi di Windows dovresti averla in C:\windows\system\
Per la documentazione, una volta avevo visto qualcosa su un sito web, ma
sinceramente non ricordo dove... forse una ricerca su qualche motore...
Roal Zanazzi

sinceramente non ricordo dove... forse una ricerca su qualche motore...
Se non ricordo male su VB Tips & Tricks (l'ųURL tra i link del mio sito o del SIto COmune)
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
---------------------------------------------------------------------------

 E se esiste dove la trovo?
si chiama cards32.dll, prova a cercarla su 
http://ftpsearch.lycos.com
 .
per la documentazione non so...
Ciao
Faber
P.S.: buon solitario    :)
Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO MI SERVE UN'API

Ciao a tutti , Ho Bisogno di voi,
Qualcuno potrebbe suggerirmi il modo di verificare quando un 
programma è in eseuzione? (per evitare di eseguirlo una seconda volta)
Esiste per caso un sito dove è possibile scaricare un elenco di
funzioni Api con Relativa Descrizione?
Se non vi ho turbato troppo, vi prego contattatemi
vi ringrazio fin d'ora..........................vi supplico......
fabi...@hotmail.com

programma è in eseuzione? (per evitare di eseguirlo una seconda volta)
Usa l'istruzione:
IF App.PrevInstance ...


programma è in eseuzione? (per evitare di eseguirlo una seconda volta)
  Non servono API, basta che piazzi questo codice nella sub Form_Load
della form principale.
    If App.PrevInstance Then
       SaveTitle$ = App.Title
       App.Title = "Seconda istanza"
       frmMenuFH.Caption = "Seconda istanza"
       AppActivate SaveTitle$
       SendKeys "% R", True
       End
    End If
  Ciao :-)
  Massimo
  Nell'indirizzo, sostituire DIESPAMMERS con MC1258
  In the address, replace DIESPAMMERS with MC1258

programma è in eseuzione? (per evitare di eseguirlo una seconda volta)

Newsgroup: it.comp.lang.visual-basic
Titolo: Non è possibile che nessuno lo sappia

Salve, è incredibile ma nessuno mi sà dire come si può cambiare la stampante
di default da codice.
Forse non si può?

 wrote in message
8e1il7$fqr$1...@pluto.sm.dsi.unimi.it...

Mi sembra strano che nessuno lo sappia, perché è facilino.
Il problema piuttosto è: da dove ricavi la stampante da settare come
predefinita e cosa sai di lei?
Se, 
p.es
., usi CommonDialog, è sufficiente impostare
Printer.TrackDefault=True.
Se invece devi impostare una stampante come default senza usare CommonDialog
o altri attrezzi - cioè: se conosci devicename, drivername e porta, che puoi
ottenere dalla collection Printers - un metodo può essere quello di scrivere
in Win.ini (sezione "windows", key "device") queste tre informazioni
separate da "," (virgola). Per sicurezza questa scrittura dovrebbe essere
eseguita da una SendMessage broadcast di WM_WININICHANGE. (Sono certo che
esista un metodo migliore, ma questo è quello che mi viene adesso.)
Potrei spedirti il codice per farlo, ma prima vorrei essere sicuro che ti
serva questo piuttosto che un banale set Printer=Printers(i). Torniamo
quindi alla domanda iniziale: come ottieni i dati della stampante che vuoi
impostare come default?
----------------------------------------------------------------------
Stefano Minardi
Zetesis: 
zet...@mclink.it
----------------------------------------------------------------------

Forse non si può?
Forse postando la domanda in maniera corretta si ha maggiore possibilità che il messaggio venga
notato e di conseguenza di ricevere una risposta.
In questo NG vengono postati tra i 100 e i 200 messaggi al giorno, quindi i messaggi con un subject
chiaro, comprensibile e conciso vengono letti subito, gli altrei rischiano di rimanere doe stanno...
Per avere un consiglio su come impostare il subject di un messaggio, dai un'occhiata al Manifesto di
questo NG che trovi sul Sito Comune.
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
---------------------------------------------------------------------------

 > Forse non si può?
