mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: [MSDE] distribuzione progetto....

Dubbio:
per distribuire un'applicazione basata su MSDE devo portarmi dietro
il CD dell'installazione di quest'ultima, eseguire l'installazione
desktop, copiare il DB e poi installare la mia applicazione
o è suff. copiare solo i file del DB senza installare MSDE ?
--
bye BlackMagic
ICQ: 85485468

no, devi installare anche MSDE. Il PC deve infatti avere il motore di SQL
Server, e quindi non basta copiare i files del DB e basta.....
cmq qualche mese fa avevo letto di come poter installare MSDE in maniera
silenziosa, senza intervento dell'utente, fornendo tutta una serie di
parametri dalla riga di comando quando si lancia il setup......
ciao, e good coding!!!!!
--
Damiani Liborio Igor
idam...@hotmail.com
 - 
igor.d...@light.it
http://www.igordamiani.it
ICQ : 11847262

 o è suff. copiare solo i file del DB senza installare MSDE ?
I file di dati di SQL Server sono, per l'appunto, file di dati... senza un
motore non ci fai molto, ne piu' ne meno di quanto succedete con i file
.ORA, .MDB, .DBF e quant'altro
Nel tuo caso il motore e' un SQL Server completo, se gia' esistente dal
cliente su cui installi, oppure MSDE nel caso di un applicazione stand
alone, come sembra di capire nello specifico frangente.
Per farla breve, e' la prima che hai detto :-)
Nota oltretutto che non e' sufficiente installare le librerie e copiare i
file, come avviene per esempio con Access, il DB in questo caso deve anche
essere "montato" (vedi a questo proposito le stored procedures
"sp_detach_db" e "sp_attach_db"
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

 "sp_detach_db" e "sp_attach_db"
personalmente non concordo molto con la filosofia proposta da MS di staccare
un db di sviluppo, magari purgato, e riattaccarlo presso il server del
cliente....
a titolo personale creo dei file che contengono le istruzioni DDL, (con
Enterprise Manager o SqlCompare di Red Gate [
http://www.red-gate.com/
]) e
dei file di popolamento dati (usualmente una sfilza di "Insert table..."
invece di bcp al fine di ovviare problemi sui trigger)... tali file. prima
DDL, poi di insert vengono eseguiti da un'altra applicazione che fornisco a
corredo dell'applicativo... cio' mi permette di avere dei db generati
rispettando le impostazioni del cliente e del suo database Model, inoltre
non mi sorgono problemi di login orfani etc..
saluti
Andrea Montanari
montanar...@virgilio.it
http://utenti.lycos.it/asql/index.html
(my vb6+sql-dmo little try to provide MS MSDE 1.0 a visual interface) ver
0.0.34
--------- remove NOSPAM to reply

 non mi sorgono problemi di login orfani etc..
[SNIP]
Sono d'accordo, infatti non ho mai usato il detach/attach per installare da
un SQL Server all'altro; d'altra parte siccome si parlava di MSDE, ma
soprattutto di un MSDE "vergine" visto che viene installato contestualmente,
e' probabilmente la soluzione piu' pratica, perlomeno per cose semplici.

Newsgroup: it.comp.lang.visual-basic
Titolo: problema dos

Esiste un modo per visualizzare in una textbox o comunque ricevere in una
stringa l'output di un applicazione per dos che ho chiamato con la funzione
shell?

".:'DevarajA':." <dont...@me.xxx> ha scritto nel messaggio
news:EOz9d.9248$b5.3...@news3.tin.it...

fai crivere all'applicazione DOS un file di testo contenente i dati da
inserire
nella textbox e dalla tua applicazione leggi quel file
Prova cosi
Ciao
Marco

 ho chiamato con la funzione shell?
tuo comando > c:\output.txt
it.comp.os.dos
http://www3.sympatico.ca/rhwatson/dos7/
(sintassi comandi dos)
--
Fosco

Newsgroup: it.comp.lang.visual-basic
Titolo: Minimizzare Access

Ciao, sto cercando un metodo x minimizzare access (ovviamente da codice), xò
sono solo riuscito a minimizzare la finestra attiva e non l'applicativo che
devo ovviamente ridurre con l'apposito tasto.
Qualcuno sa come posso risolvere il mio problema????
GRAZIE A TUTTI

 sto cercando un metodo x minimizzare access (ovviamente da codice), xò
sono solo riuscito a minimizzare la finestra attiva e non l'applicativo che
devo ovviamente ridurre con l'apposito tasto.
    Access.DoCmd.RunCommand acCmdAppMinimize
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

 wrote in message
9010as$60c95$5...@ID-52090.news.dfncis.de...


 ' Inserisci il tutto in un modulo

Cioe`?... Spiega, prima che mi metta a leggere.
Tutto il codice che hai postato serve per fare cio` che fa la riga che ho
postato io o serve per fare anche altro?


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Dimensione cluster

Come si fa a sapere quale sia la dimensione dei cluster di un HD (da codice VB)?
Quale API si deve chiamare? E come?
Grazie.

Quale API si deve chiamare? E come?
La funzione GetDiskFreeSpace() dell' api ti dice quanti bytes  ci sono in un settore
e quanti settori ci sono in un cluster.
ciao, hal

 ha scritto


Newsgroup: it.comp.lang.visual-basic
Titolo: [vb6] Visualizzare n oggetti

Vorrei sapere se e come è possibile visualizzare da vb6 n oggetti.
Mi spiego. Supponiamo che in un form abbia un textbox e un pulsante.
L'utente mette nel textbox un numero (Num) e, quando pigia il pulsante, gli
faccio vedere Num checkbox (o qualsiasi altro controllo).
Grazie!

 ha scritto nel messaggio

Sai cos'è una matrice di controlli?
Metti su una form un command, una text, e una checkbox.
La checkbox deve avere la proprietà index=0.
Incolla il codice che segue.
Scrivi sulla text quante checkbox vuoi creare e premi il pulsante.
Private Sub Command1_Click()
For i = 1 To Val(Text1)
   Load Check1(i)
   Check1(i).Top = Check1(i - 1).Top + 500
   Check1(i).Caption = Check1(i).Caption & " " & CStr(i)
   Check1(i).Visible = True
Next
End Sub

ti voglio un bene dell'anima!!
Newsgroup: it.comp.lang.visual-basic
Titolo: Hardcore Visual Basic 5

Qualcuno ha letto questo libro?
Se si cosa ne pensate?
Vale ancora la pena di leggerlo anche se si riferisce alla versione 5 e il
"cuore" del codice sorgente contenuto nel cd allegato (VbCore.dll contiene
circa 80 moduli di classe, 30 moduli standard, etc. etc.) non è compatibile
con la versione 6?
P.S. Per rendere questo codice perfettamente compatibile dovrei capire un
sacco di cose che ancora non capisco per niente!

Se si cosa ne pensate?
Dai un'occhiata sul Sito COmune: trovi una recensione
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
---------------------------------------------------------------------------


Secondo me vale la pena. A questa indirizzo 
http://www.mvps.org/vb/
 esiste
la versione online. Trovi anche i link agli aggiornamenti del codice a Vb6.

Newsgroup: it.comp.lang.visual-basic
Titolo: Caricamento file esterni

Ciao a tutti...
devo caricare un file .exe e un .pps da un mio progetto... ho provato in
vari modi ma non riesco in nessun caso... mi potreste dare una dritta o un
listato?
grazie 1000

Il 28/11/2003 20.55, Cigo1984 scrisse:

Se per "caricare" intendi "lanciare" puoi usare l'istruzione shell.
Se invece intendi aprire e vedere il contenuto del file puoi usare open.
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

 ha scritto nel messaggio
news:oKNxb.154513$e6.55...@twister2.libero.it...


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

Ciao a tutti, sono nuovo e mi chiamo bruce ...
Volevo sapere se era possibile fare delle connessioni a mail server con una
procedura Vb ...
Grazie mille :))
        bruce

 wrote in message
Mysm6.18432$Mx3.2...@twister2.tin.it...

Le tue risposte sull'help in linea di visual basic per i controlli MAPI di
windows
Newsgroup: it.comp.lang.visual-basic
Titolo: Guida in linea

Devo fare la guida in linea per il mio programma e la sto elaborando con
HTML help workshop. Però ho un problema perchè non mi fa vedere le immagini
che ho nelle pagine html?
--------------------------------
Inviato via 
http://usenet.libero.it

 le immagini che ho nelle pagine html?
Hai salvato le immaggini nello stesso path di dove sono salvati i tuoi
html? Mi pare di ricordare che era un punto fondamentale per la
corretta compilazione del file.
-- 
Saluti
Andrea Moro
Sito Comune : 
http://www.it-lang-vb.net

 Sito Comune : 
http://www.it-lang-vb.net


Newsgroup: it.comp.lang.visual-basic
Titolo: Asociazioni file

Come faccio a fare in modo che il mio bel programmino sia associato
automaticamente ai file di un certa estensione, cioč: voglio che quando
faccio doppio click su un generico file *.pippo parta il mio programma, e
che i file *.pippo abbiano l'icona che voglio io, come si fa?

 automaticamente ai file di un certa estensione, cioè: voglio che quando


Newsgroup: it.comp.lang.visual-basic
Titolo: xchè non funziona ??

un multipage contiene 4 pagine. la pagina 4 contiene una MSflexgrid. Ho
inserito questo codice:
Private Sub MultiPage1_MouseUp(Index As Long, Button As Integer, Shift
As Integer, X As Single, Y As Single)
riga = MultiPage1.page4.MSFlexGrid1.RowSel: colonna =
MultiPage1.page4.MSFlexGrid1.ColSel
  MultiPage1.page4.MSFlexGrid1.Row = riga:
MultiPage1.page4.MSFlexGrid1.Col = colonna
 testoselezionato = MultiPage1.page4.MSFlexGrid1
 MultiPage1.page4.MSFlexGrid1.toltiptext = testoselezionato
 End Sub
perchè non funziona  ?
Grazie a chi me lo dirà.


Non ci credo: scrivi il codice cosi' ?
ciao, hal

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

. . .ma ne hai proprio una per tutti ... ;-))
eh, quando ti danno da manutenere ( o debuggare) del codice scritto
in certi modi, le maledizioni si sprecano ;-)
ciao, hal

...

Perchè non funziona... cosa?
Ciao

Zanna ha scritto:

la toltiptext.Ciao


TooltipText
cosa vuol dire non funziona ? che non appare quando ci si ferma sopra col mouse ?
ciao, hal

la toltiptext.Ciao
Adesso faccio il cattivo :)
testoselezionato = MultiPage1.page4.MSFlexGrid1
Ma, testoselezionato è una FlexGrid? Pensavo fosse una stringa.
Ciao

Zanna ha scritto:

Scusami mi accorgo che non sono stato chiaro e che ho fatto parecchio
casino. Dunque provo a reimpostare il problema.
Un multipage contiene n pagine. una delle pagine contiene un
MSFllexgrid, nelle cui celle sono indicati dei valori espressi in Euri.
Vorrei che al passaggio del puntatore del mouse o meglio al click sopra
le  celle il ControlTipText  mi indicasse il controvalore  in lire della
cella. Mi puoi suggerire il codice ?:Grazie
Newsgroup: it.comp.lang.visual-basic
Titolo: R: Header XING VBR

 (variable bitrate)?
Variable Bitrating(VBR) headers
http://home.swipnet.se/grd/mp3info/vbrheader/index.html
Più in generale, 
www.wotsit.org
 , sezione Sound & Music., vai su MP3.
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

On Mon, 27 Sep 1999 21:35:56 +0200, "Paperino" <non...@lo.dico> wrote:
grazie mille!!! quasi non ci speravo più.
Appena butto giù qualche funzioncina VB le posto o chiedo di
pubblicarle su sito comune.
A proposito, ne ho già fatte diverse che leggono header normale e
leggono/scrivo l'ID3v1 tag. interessano?
Ciao
   Gio


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

Qualcuno sa dirmi quali sono i siti piů gettonati per il download di
controlli OCX freeware
Marco Salvatori

In VB5 in che modo si devono caricare gli ocx in modo da averli come default
per nuove applicazioni ? Se io creo una nuova applicazione e carico qualche
ocx quando ne creo un'altra li devo ricaricare.
grazie
c...@eubico.it





Newsgroup: it.comp.lang.visual-basic
Titolo: sviluppo sistema totocalcio

Salve a tutti....
volevo sviluppare un sistema che in base al pronostico sviluppasse tutte le
colonne possibili.... mi incarto nel momento in cui devo sviluppare la
seconda colonna... io ho usato il metodo
for i = 0 to 2
next i
ma, come ho detto mi incarto al momento dello sviluppo della seconda
colonna, visto che il programma si ferma dopo aver sviluppato la prima...
avreste qualche suggerimento o qualche sito da dove partire per avere dei
suggerimenti?
un grazie a tutti
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 suggerimenti?
Supponiamo che i pronostici li metti in un array di 13 stringhe [p(1)="1",
p(2)="1X" ecc.] Ovviamente ci sono scelte migliori (array di array ad
esempio), ma andiamo avanti.
Un modo semplicissimo è quello classico:
tredici cicli for annidati, in quello più interno stampi la colonna:
For i1 = 1 To Len(p(1))
For 12 = 1 To Len(p(2))
...
For i13 = 1 To Len(p(13))
    Debug.Print Mid$(p(1),i1,1) & Mid$(p(2),i2,1) & ...
Next i13
...
Next i1
Se vuoi evitare di scrivere tutti quei cicli puoi usare la ricorsione:
Private Sub sviluppo(n As Integer, c As String)
    If n = 14 Then
        Debug.Print c
    Else
        For i = 1 To Len(p(n))
            sviluppo n + 1, c & Mid$(p(n), i, 1)
        Next i
    End If
End Sub
Va invocata con sviluppo(1, "")
La ricorsione sembra più elegante, ma consuma un sacco di risorse ed è più
difficile da debuggare.
--
Ciao, Silv:o)

 La ricorsione sembra piů elegante, ma consuma un sacco di risorse ed č piů

Newsgroup: it.comp.lang.visual-basic
Titolo: Come si fa la clessidra.. ???

Vorrei fare in modo che su di un mio programma , il mouse cambi forma nella
classica clessidra di attesa e che vengano disabilitati tutti gli eventi
legati al mouse. In pratica, quello che si vede su quasi tutti i programmi
"normali".
Per realizzare cio', come si fa ?
Mi spiego.....
bisogna fare tutto da se (cambiare l'icona del mouse, vbmodal etc...) oppure
c'e qualche sistema piu' efficace ?
Grazie

 wrote in message
zi9S7.298843$sq5.14...@news.infostrada.it...

screen.mousepointer = vbhourglass>

 wrote in message
zi9S7.298843$sq5.14...@news.infostrada.it...

screen.mousepointer = 11

 ha scritto nel messaggio
news:zi9S7.298843$sq5.14...@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [Molto newbie] Proprietà della listbox

Salve a tutti, ho un problemino con Visual Basic e spero che possiate
darmi una mano!
Io ho una listbox col multiselect attivato (in modo esteso) e tutti i
risultati che sono contenuti nella listbox dovranno poi essere messi
in un database di Access. Quale è il mio problema? Non riesco a
mettere più di un elemento alla volta! Cioè se premo il tasto "Salva"
del mio form viene preso solo il primo elemento selezionato.
"Ok" penso tra me "devo scandire la listbox e vedere se l'elemento è
selezionato e se lo è metterlo nel database, magari separandolo dagli
altri con un ; in modo da usare poi la funziona Split() per prendere i
risultati"
Avevo pensato di fare così, un ciclo for che va da 0 al numero di
elementi contenuti nella form, però non conoscendo bene le proprietà
degli elementi del form fa scattare un piccolo problemuccio...
Prima di tutto, quale è la proprietà che definisce il numero di
elementi inseriti nel form? E' forse ListCount?
In secondo luogo, come faccio a muovermi nella listbox? Mi pare di
ricordare che era qualcosa di simile agli array, ma non ricordo
esattamente, aiuto!
Un grazie a chi mi saprà aiutare!

Per aggiungere elementi alla ListBox devi usare il metodo Add, passandogli
la stringa che vuoi aggiungere. Ad esempio:
Me.List1.List "Pippo"
Me.List1.List "Pluto"
Me.List1.List "Paperino"
Aggiunge 3 righe alla Listbox.......
ListCount, come hai detto tu, restituisce il numero di elementi presenti
nella Listbox.......
Per leggere gli elementi della Listbox, devi usare la proprietà List(i),
dove i è un intero che va da 1 a ListCount........
--
Igor Damiani
Simcity Network Srl
igor.d...@simcity.it
"Daybreak" <Alban...@SPAMpandd.it> ha scritto nel messaggio
news:3a2bb2c9...@news.it.net...


La prop che ti dice quanti elementi ci sono nella listbox è proprio
listcount, ma questa ti dice quanti sono, quindi visto che l'indice della
list parte da 1 devi fare un ciclo da 1 a listcount-1.
Per muoverti all'interno della listbox usa la prop listindex, che imposta o
ritorna l'indice dell'elemento selezionato.
Per determinare se l'elemento è evidenziato puoi usare la prop
selected(indice), che torna true se l'elemento indicato da index è
evidenziato.


 list parte da 1 devi fare un ciclo da 1 a listcount-1.
***   L'indice del ListBox parte da 0 e quindi devi fare un ciclo da 0 a
ListCount - 1 ***


 dove i č un intero che va da *0 a ListCount-1*
Ciao
--
Luca Dormio
luca....@tin.it
luca....@sig-la.com

 ha scritto nel messaggio
news:3A2BE70A...@tiscalinet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: API?

ciao a tutti cerco info sulle API di windows, manulai on line, tutorial,
guide, ogni cosa.
grazie

 guide, ogni cosa.
- MSDN, OnLine e non
- 
http://www.allapi.net
poi ce ne sono altri ma vista l'ora non mi ricordo...
Ciao
Faber
Newsgroup: it.comp.lang.visual-basic
Titolo: Tasti funzione (es. F12)

Ciao a tutti.
Ho un piccolo e penso semplice pb.
Mi chiedevo come si possa fare a gestire il click sui tasti funzione della
tastiera (es. F12) in qualsiasi oggetto presente nel form.
Ho visto che gestendo l'evento Keypress sui singoli oggetti (es. text box)
si riesce a fare, ma esiste un modo per far controllare l'evento a livello
di form ?
Attendo fiducioso e grazie in anticipo per le risposte.
Gianluca.

 di form ?
Metti KeyPreview=True per la Form e usa poi gli eventi KeyDown o KeyUp della
stessa

 ha scritto nel messaggio
news:%Wzi9.22740$Hc7.3...@twister1.libero.it...

Come si fa a settare il KeyPreview=True nella form?


devi settare a true la proprietą keypreview (del form).
e su keydown del form di gestisci tutti i tasti che vuoi utilizzando la
keycode.
--------------------------------
Inviato via 
http://usenet.libero.it


clicchi sulla form premi f4 e cerchi tra tutte le proprietą presenti
KEYPREVIEW e la imposti a true ....... (!)


 ha scritto nel messaggio
news:amehn0$jiu$1...@canarie.caspur.it...

<Polemica>
Perchè invece di attendere fiducioso e stare lì a girarti i pollici non fai
questa piccola operazione:
Da un browser qualsiasi, nel campo dell'indirizzo digitare:
www.google.com
Nella finestra che verrà caricata troverai una serie di rettangolini, grigi
con scritta azzurra, in uno di questi è scritto "gruppi", clicca lì, nella
finestra successiva...... Lacia perdere torniamo indietro
nella casella dell'indirizzo scrivi
http://groups.google.it/groups?hl=it&lr=&ie=UTF-8&group=it.comp.lang.visual-
basic
fai clic sul radio button "cerca solo in it.comp.lang.visual-basic", nella
casella soprastante digita KeyPreview, poi agisci sul tasto "cerca con
Google"
</polemica>
Scherzi a parte, è un esperimento, fallo davvero e poi riposta quello che
hai capito.
Salutoni
Sergio

 ha scritto nel messaggio
news:amehn0$jiu$1...@canarie.caspur.it...


 ha scritto nel messaggio
news:217Z59Z51Z132Y1...@usenet.libero.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Run Time error 713 -- CHE CAVOLO E'??????????????????

Mi succede quando lancio un modulo della data dynamics, l'Active report..
il problema è che lo fà solo su alcune macchine.. su altre no.. e io ci sto
perdendo la capa...
Non sono nemmeno riuscito a capire che sia questo errore,  che voglia dire,
visto che
sui manuali de VB non sembra essere documentato..
Qualcuno mi sà aiutare??
Ciao e grazie in anticipoooooooooooo
Lorenzo


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] SaveSettings remoto

Quando desidero salvare delle impostazioni di un programma e' molto
comodo usare Savesetting e GetSetting che salvano nel registro i valori
desiderati e li richiamano.
Se volessi recuperare dei valori da un pc remoto come si puo' fare?
Ovvero: voglio che certe impostazioni vengano conservate su un server e
che il client le recuperi quando necessario; come fare?
Ovviamente volevo evitare di dover aprire, leggere e/o salvare, chiudere
un file "ini"
grazie
		maxx

Dovresti scriverti un programmino da piazzare sul server che invii tramite
winsock le informazioni recuperate - criptate, ovviamente.
U m b e r t o    M e r o n i
---
Ricordate: anche se la notte è buia,
l'alba arriverà a disturbarvi.
---


Newsgroup: it.comp.lang.visual-basic
Titolo: Aiutatemi vi prego!

Avrei bisogno di creare un prog che:
-mi permetta di vedere delle immagini
-queste immagini le devo poter vedere solo con questo programma
-siano visibli al masimo per un giorno e poi si cancellino
-non posso stamparle
-non posso inviarle ad altre persone.
Praticamente questo programma lo dovrei installare in alcuni computer  per
far si che i file (immagini) che gli vengano mandati possano essere visti
solo da quel computer per una sola giornata , senza la possibilità di
poterle trsferire , stampare , copiare ecc
Ogni suggerimento è gradito , mi basta anche solo un'idea.
Se qualcuno è inoltre interessato a creare il progetto insieme a me mi
risponda via mail.
Grazie
Luca

 wrote in message
news:8radgr$4p2$1...@pinco.nettuno.it...


 wrote in message


 wrote in message
news:8rbstb$qkd$1...@fe2.cs.interbusiness.it...


 wrote in message
news:8radgr$4p2$1...@pinco.nettuno.it...


 -non posso inviarle ad altre persone.
Dovresti prevedere una procedura di incatenamento dell'utente. E' difficile
da realizzare e sicuramente solleverebbe fastidiose polemiche.
Ogni altro metodo e' aggirabile, al di là della sua complessità.
Se e' cosi' importante che queste immagini non possano essere riutilizzate,
significa che l'utente ne guadagnerebbe se potesse farlo. E quindi, prima o
poi un utente deciderà di farlo.
-vibino

 wrote:
Mi dispiace deluderti ma tutto quello che č visibile su schermo č
anche stampabile

Grazie a tutti , vedete , il fatto è che io dovrei mandare le foto del
campionario ai clienti , però non vorrei che questi ultmimi lo mandino anche
alla concorrenza , per permettergli di copiarle lo stile o quant'altro.
Immagino che le ditte a cui venderò la roba non abbiano tanti esperti di
computer in grado di aggirare i vari software , ma non si sa mai.
Grazie
Luca


wrote:

Newsgroup: it.comp.lang.visual-basic
Titolo: Come posso sepere se l'applicativo 'gira' dentro l'ambiente VB

La versione compilata deve avere, in un particolarissimo caso,
un comportamento diverso.
Senza modificare l'attuale struttura (strategia migliore)
come posso sapere se sto utilizzando l'eseguibile o il play di VB (pezza a
colori) ?
So che questa domanda č gią passata, prima o poi, ma non č agevole
cercare una soggetto cosi' specifico in un archivio di 12000 messaggi :)
Grazie mille

cercare una soggetto cosi' specifico in un archivio di 12000 messaggi :)
Mah, non direi, visto che l'ultima volta (o giù di lì) è stato 7 giorni fa in un thread che anche
Guardafuori espresso riuscirebbe a trovare, ovvero "Differenza tra exe compilato e debug (f5)"
Mi sa che più che non essere agevole, forse manca un po' la volontà...
Ciao,
Moreno
#sirri#@#
morenosoft.com#
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.msvbsite.net
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.it-lang-vb.net
---------------------------------------------------------------------------

 Mi sa che più che non essere agevole, forse manca un po' la volontà...
Trovato, grazie
Newsgroup: it.comp.lang.visual-basic
Titolo: [SQL Server ] Generare numeri

Salve
in delle operazioni di immissione in SQL server dovrei generare delle
password alfanumeriche e vorrei farle cosi
anno & mese& giorno & minuti
ma come concateno le stringhe ?
ho provato a fare una cosa del genere
SELECT * datePart(month,getDate()) ....
ma mi somma i numeri ...
come devo fare ?
grazie per tutti i suggerimenti.
un saluto

 SELECT * datePart(month,getDate()) ....
ma no, dovrebbe essere una cosa del genere:
SELECT valore1 & valore2 & valore3 AS risultato
-- 
hth, hal

 SELECT * datePart(month,getDate()) ....
Sql-Server concatena con il +, ma ovviamente le singole parti da concatenare 
devono essere char, quindi dovrai fare qualche cast qua e là.
Saluti
Alberto
-- 
E tutto mi sembrava andasse bene... 

 devono essere char, quindi dovrai fare qualche cast qua e là.
Vorrai dire "conversione" ;)
Ciao


Non ho colto :-(
Se intendi che sia meglio il Convert del Cast...
Beh, DatePart restituisce un numerico, per cui io lo convertirei con Cast.
Se poi esiste qualche formato del Convert per passare direttamente da Date a 
stringa con formati personalizzati, tanto meglio.
Diciamo che una sfogliata ai BOL aiuta.
Ciao


 stringa con formati personalizzati, tanto meglio.
un numero non può essere "castato" in stringa, o comunque se SQLServer lo
accetta (non lo so) è solo per convenzione.
un cast può essere fatto solo su tipi dello stesso rango, es. double-single,
int-byte.
Int-stringa è una conversione, un cast vero darebbe errore perchè agisce sul
dato fisico e non sulla sua rappresentazione.
Tutto qua.
Ciao
--
Qualunque mentecatto può scrivere codice che un computer possa capire.
I buoni programmatori scrivono codice che gli uomini possano capire.
[Martin Fowler]

 ha scritto nel messaggio
news:WNwCd.362351$b5.17...@news3.tin.it...

Ciao,
puoi usare le funzioni Cast o Convert
----------------
SELECT CAST(datePart(Year,getDate()) AS
varchar)+CAST(datePart(month,getDate()) AS varchar)
o
SELECT
CONVERT(varchar,datePart(year,getDate()))+CONVERT(varchar,datePart(month,get
Date()))
-----------------
o per convertire direttamente la data in formato ISO (yyyymmdd)
------------------
SELECT Convert(varchar,getDate(),112)
-------------------
quindi puoi concatenare i minuti con l'operatore +
------------------
SELECT Convert(varchar,getDate(),112)+Convert(......)
-------------------
per approfondire ......
---------------
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/tsqlref/ts_ca-co_2f3o.asp
---------------
Ciao Giorgio

int-byte.
Fermo!  :)))
SQLServer (Dovrei dire Transact-SQL) rende disponibili due funzioni,
CAST e CONVERT, dal funzionamento analogo, con la seconda che consente
solo azioni più definite rispetto alla prima. La forma generica di
CAST è: CAST(espressione AS tipo), con tipo che può essere qualunque
tipo base di TSQL. 
Nulla a che vedere dunque coi typecast di C, C++ o C#.
--
Ciao!
Luca Menegotto
Newsgroup: it.comp.lang.visual-basic
Titolo: Help per programmi VB

Realizzo di tanto in tanto qualche programma in VB6, ma non ho mai
realizzato un help in linea in modo tale da rendere più professionale i
programmi.
Ho provato con un compilatore che ho trovato in Borland Pascal che si chiama
HC31 il quale compila appunto un documento creato con un qualunque programma
di scrittura e salvato con estensione .RTF, ma ha dei limiti di grandezza
del file. Ovvero se inserisco qualche immagine troppo grande mi dà errori di
compilazione. Inoltre è molto scomodo creare tale documento .RTF che poi
sarà compilato perché bisogna inserire indici di pagina, sottolineare in
vari modi per evidenziare una scritta, etc...
Chiedo dunque di sapere se per caso esiste un programma più pratico e veloce
da usare per creare questi file di help .HLP per utilizzarli poi per i miei
programmi.
Spero di ottenere risposte a riguardo (
mi...@libero.it
)
Anticipatamente grazie!

Personalmente utilizzo Windows Help designer 
http://www.devgr.com
 č semplice
da usare e non molto costoso. RoboHelp č piů professionale (anche il
prezzo).
Il compilatore per i file di help č incluso nel cd di VB.
Potresti utilizzare anche i nuovi help in formato chm (richiedono che sia
installato il controllo HHCtrl.OCX un file da 580 kb ): il programma per
creare questi help č HTML Help Workshop liberamente scaricabile dal sito MS
Ciao MArco
Newsgroup: it.comp.lang.visual-basic
Titolo: EbExecuteLine

Ho trovato la seguente interessante  funzione EbExecuteLine che potrebbe
essere utile.
Ho fatto il programma seguente:
Nella sezione dichiarazioni :
Private Declare Function EbExecuteLine Lib "vba5.dll" ( _
                            ByVal pStringToExec As Long, _
                            ByVal wolf1 As Long, _
                            ByVal wolf2 As Long, _
                            ByVal fCheckOnly As Long) As Long
Quindi
Private Sub Command1_Click()
Dim risultato As Long
x = 1      'Val(Text3)
List1.Clear
W = Str(x)
risultato = Esegui("x=" + W + ":form1.list1.additem " + Text1.Text)
If risultato = False Then
  Text2 = "errore"
  Exit Sub
Else
  If Mid(List1.List(0), 1, 1) = "," Then
      Text2 = "0" + List1.List(0)
  Else
      Text2 = List1.List(0)
  End If
End If
Text1.SetFocus
End Sub
Quindi la funzione di calcolo:
Function Esegui(stCode As String, Optional fCheckOnly As Boolean) As Boolean
  Esegui = EbExecuteLine(StrPtr(stCode), 0&, 0&, Abs(fCheckOnly)) = 0
End Function
Private Sub Form_Load()
Text1 = "x+sin(x)"
End Sub
In ambiente di progettazione tutto funzione bene.
Ma una volta compilato il programma mi segnala un errore del tipo:
"L'istruzione a "0x0fb21449" ha fatto riferimento alla memoria"0x00000000"
che non poteva essere "read""
Come mai?
Qualcuno sà come risolvere il problema???
Grazie ric.

Qualcuno sà come risolvere il problema???
Devi usare il Microsoft Script Control, che provvede a creare il
contesto necessario, sempre comunque con i limiti di condivisione
delle variabili di cui accennavo sopra.
-- 
ciao, hal

 delle variabili di cui accennavo sopra.
Beh, dallo Script Control _puoi_ accedere agli oggetti del compilato.
Bye, G.

Beh, dallo Script Control _puoi_ accedere agli oggetti del compilato.
Oh si', agli oggetti ci credo, non so se si possa fare giochetti
tipo "Dim i As Long" da una parte e "i = 20" dall'altra.
-- 
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Files compressi (.ZIP)

Ciao,
devo creare un file ZIP dal mio programma, ma ho qualche problema...
Inizialmente facevo una shell a PKZIP, ma e' troppo vecchio e mi risponde
NOTHING TO DO se gli passo un nome file "lungo" (non 8+3).
Esiste qualche DLL da chiamare o qualcosa con con funzioni simili ???
Grazie
Stefo'

Esiste qualche DLL da chiamare o qualcosa con con funzioni simili ???
pilotanto winzip32 dal tuo programma es:
winzip32 -min -a c:\files\file.zip file.txt

Oppure comprando l'ocx di winzip, riesci a fare tutto quello che vuoi, mi
pare che ci sia una versione demo scaricabile da Internet, purtroppo non mi
ricordo il sito......
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Timer ed API

 la API per avere una gestione del tempo 'reale'.
----------- Fine quoting -------------
Qualcuno mi sa dire, per favore, quale e' questa API che permette di
misurare il tempo in modo preciso?
--
Ciao ed alla prossima!
Paolo.
Fidonet: 2:331/374.68
e-mail: 
jom...@tiscalinet.it
Togli AS dall'indirizzo!

 wrote in message
7korer$43a$1...@aquila.tiscalinet.it...


misurare il tempo in modo preciso?
Dal sito comune ho appena scaricato un'ocx che corrisponde ad un timer
preciso, con un errore messimo di 1 millesimo......
Dai un'occhiata........
ByeZ!
Alkondor
P.S.
L'url del sito comune è in fondo al mex di molte persone....... Nel
mio no perchè non so come si mette la firma automatica con freeagent,
e anche perchè sono qui da poco e non faccio altro che
chiedere..........

 misurare il tempo in modo preciso?
Se ti serve solo misurare il tempo, puoi usare la GetTickCount o le
QueryPerformanceCounter, altrimenti se vuoi implementare un timer piu'
preciso ti conviene andare sul sito comune, dove qualche anima pia l'ha
gia' fatto per te...Il file si chiama MMtimer.zip, nella sezione
download.
Ciao
Brando
-- 
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' Sito comune di it.lang.vb  :  
http://www.murialdo.it/it_lang_vb
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

Newsgroup: it.comp.lang.visual-basic
Titolo: Data Grab

Tool che permette di catturare la trasmissione seriale tra 2 dispositivi
(utile per analizzare protocolli di trasmissione). I dati vengono
raffigurati in binario, esadecimale e testo, con tempistiche.. Inoltre sono
disponibili funzioni per pilotare e leggere i vari segnali (drt, rts,dsr,
ecc..). Implementa l'utilissima funzione "ping-pong" che ritrasmette in
uscita ciò che arriva.. e anche l'autodetect del baud-rate. Con un apposito
cavetto, il software si "infrappone" tra 2 apparecchiature e ne logga la
comunicazione! Buon divertimento!
http://www.redangel.it/Click_file.asp?m=335

Ma come ca_ _ o fai a fare programmi cosě velocemente?????!?!?!?!?!?!?!
Siete forse Andrea & Bruno? :)
                Ciao
                                    Allanon
P.S. Perdona la battutina, ma... "...e non solo programmi, ma anche
siti!!!!!"
Newsgroup: it.comp.lang.visual-basic
Titolo: Ne vale la pena?

Ho saputo dell'avvento di VB5 e, dato che posso usufruire dell'offerta
studenti, mi chiedevo se valesse la pena di spendere 200K lire per un
upgrade da VB4 a VB5.
Ho analizzato le caratteristiche decantate dalla Microsoft ma non credo che
siano un indice sufficiente per una decisione (ogni scarrafone è bello a
mamma soa).
Mi piacerebbe usufruire dei consigli di qualche utente piu' esperto o
informato di me...  :-) Grazie in anticipo a tutti i volenterosi.
--
Ciao da...  Christian Bernieri
E-Mail  
Highl...@bbs.infosquare.it
Homepage  
http://www.geocities.com/SiliconValley/Horizon/6675

mamma soa).
Se devi generare controlli ActiveX ti _serve_ VB5, oppure se hai
bisogno di maggior velocita' di running. Altrimenti ... pensaci bene!
  ;)
~~
Roberto Colmegna
roberto...@login.it
Ipotesi su di un linguaggio `multicromatografico`:
 
http://members.tripod.com/~roberto1972/


roberto...@login.it
Ciao da...  Christian Bernieri


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] ShellExecEx e WinExec

scusate, la differenza tra queste due funzioni non mi č chiaro. e no nmi č
chiaro soprattutto quando conviene usare la prima o la seconda...
Mario

 scusate, la differenza tra queste due funzioni non mi č
chiaro. e no nmi č chiaro soprattutto quando conviene usare la
prima o la seconda...
La seconda mai: e` obsoleta. Concetto chiarito in "Raccolta
API" di Cesare Rizzi. Con la partecipazione straordinaria di
Gaetano. Guest Star Roal Zanazzi. (Non l'hai ancora
scaricato?!?...Via! Di corsa...)
 
http://members.xoom.it/CesareRizzi
--
Ciao.
Maurizio
--------
?SPQR(C)
 X

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] [!] [DB] Creare Database

Sto cercando un metodo per creare da ZERO un database con ADO...
Ho trovato come aggiungere tabelle e definire chiavi primarie... ma... Come
creare un database NO...
Ipotesi: voglio creare un DB in SQL server o un DB Access... Come faccio?
        Grazie a tutti
                    Allanon
P.S.= Vi allego come si fa acreare una tabella e la sua chiave primaria...
;)
Q252908 - HOWTO: Create a Table with Primary Key Through ADOX
http://support.microsoft.com/support/kb/articles/Q252/9/08.ASP

 > Data Source=C:\123.mdb;User ID=admin;Password=;"
E ringrazio Sir Jo che che aveva scritto a proposito nel "lontano"
15-12-2000
            Ciao a tutti!
                    Allanon

 (dadabase)!!!!!!!!!
:)
un db anarchico, alogico, pacifista, ecc.
dim tt as new tzaraConnection...
gadj beri bimba.
gia', quella che hanno messo in musica i talking heads :)

 ha scritto nel messaggio
news:9f0194$1g3sd$1...@ID-51318.news.dfncis.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: MMCONTROL URGENTISSIMO!!! HELP ME!!!

Per favore datemi una mano!
Devo far eseguire un file .avi in una precisa posizione dello schermo
ma non ho capito come fare usando un controllo MMCONTROL.
Fra l'altro non so neppure se si puo' con quel controllo e volendo
manipolare un .AVI.
Leggendo l'help di VB ho verificato che MMControl mi consentirebbe di
fare qualcosa con oggetti di tipo MMMovie. Cosa sono? C'e' modo di
convertire un .AVI in qualcosa del genere?
In alternativa potrei usare la libreria ActiveVideo che mi permette di
piazzare il video dove voglio, pero' non avendo la documentazione non
sono capace di attivare il filmato quando voglio io. Posso solo farlo
eseguire all'apertura del form principale VB impostando la proprietà
Autostart=true del controllo ActiveMovie.
Vi prego, chi ha capito qualcosa di questo piagnisteo, AIUTATEMI!
NE HO BISOGNO ASSOLUTO ENTRO OGGI!!!
grazie, leonardo

NE HO BISOGNO ASSOLUTO ENTRO OGGI!!!
Spero di essere arrivato in tempo.
Ciao
Nando
       _  _______________________________  _     
      / )|                               |( \    
     / / |      FERDINANDO CECCHINI      | \ \   
   _( (_ |    
fdn.ce...@flashnet.it
   | _) )_ 
  (((\ \>|_/->_______________________<-\_|</ /)))
  (\\\\ \_/ /                         \ \_/ ////)
   \       /                           \       / 
    \    _/                             \_    /  
    /   /                                 \   \  
   /___/                                   \___\

Newsgroup: it.comp.lang.visual-basic
Titolo: Chiavi hardware economiche, dove?

Ciao,
a volte mi capita di leggere di  chiavi hardware a basso costo, è una
leggenda? :-)
Cercando in rete trovo solo chiavi ipertecnologiche e ipercostose...
:\
Possibile che non riesca a trovare una chiave, anche piccola e brutta
;), ma che costi poco? :-)


Per "costi poco" cosa intendi ?
Io ne uso una da 85.000 lire
Ciao
Sir Jo

 ha scritto nel messaggio
news:9j9gb9$1ccp2$1...@news02.it.net...



Resto della mia opinione: + o - costose, le chiavi hardware danno più grane
di quante ne risolvano.
(oltre ad essere odiosissime da parte del cliente)
ciao
ugo

 funziona benissmo
Ah ecco, 35.000 già mi sembra un prezzo più abbordabile, grazie :-)
E' il minimo che si trova in giro?
Saresti così gentile da dirmi che modello usi?
Il sito Eutron non va d'accordo con il mio IE. :\

 Io ne uso una da 85.000 lire
Siamo già nel campo delle ipercostose, per me :)

 ha scritto nel messaggio
news:9j9gb9$1ccp2$1...@news02.it.net...


 Stephen
Poi e' arrivato il software OS (Linux docet) che era liberamente
duplicabile, e M$ ha inventato Office XP, che ha una chiave legata alla
configurazione hardware, il che significa che se ti si rompe la motherboard
devi aspettare che mamma M$ ti dia una nuova chiave...
Che probabilmente arrivera' via snail mail, dato che anche winxp non
dovrebbe essere utlizzabile senza chiave magica...
Ciaotutti,
*
Newsgroup: it.comp.lang.visual-basic
Titolo: Valori Null

In una Form dove nelle text box visualizzo i valori di una tabella di un Db
Access, quando scorro tra i records ed incontro un campo che non ha un
valore (da tabella) il programma si blocca segnalando errore null nel campo
e quindi non mi valorizza la TextBox.
Controllando con If Not null
funziona, però se io avessi 50 campi nella tabella devo fare 50 if Not null
oppure c'è un modo per "saltare" l'errore dei valori Null?
Grazie mille
Ronny.
--------------------------------
Inviato via 
http://usenet.iol.it

 oppure c'è un modo per "saltare" l'errore dei valori Null?
Gestisci l'errore con 'On Error Resume...':
Private Sub cmdProssimoRecord_Click()
    Dim intResponse As Integer
    On Error Resume ErrorHandler
    ' Qui ci va
    ' la tua procedura
    ' per scorrere i record
ExitSub:
    Exit Sub
ErrorHandler:
    If Err.Number = Codice_Errore Then
        ' Il campo è Null
        ' fai quello che devi fare
        Resume Next
    Else
        Select Case MsgBox("Errore " & Err.Number & ":" & vbCrLf & _
            Err.Description, VbAbortRetryIgnore + VbCritical)
            Case vbAbort
                Resume ExitSub
            Case vbRetry
                Resume
            Case vbIgnore
                Resume Next
        End Select
    Endif
End Sub
Ciao!
--
Esteban
Hosted by 
www.seber.it
(Remove nonspammare for reply)

 oppure c'è un modo per "saltare" l'errore dei valori Null?
assegna alla TextBox "" & rs!campo
--
Lawrence Lebowsky
#marcone#@
sidsrl.it

 wrote in message
news:62Z10Z10Z79Y10...@usenet.iol.it...


 campo.
Ecco la funzione (si comporta come l'omonima funzione di Access):
'Se vntValue è null, ritorna il valore di default vntDefaultValue
Function nz(vntValue As Variant, vntDefaultValue As Variant) As Variant
    nz = IIf(IsNull(vntValue), vntDefaultValue, vntValue)
End Function
Esempio:
txtText1.Text = nz(rs!campo, "")
oppure:
txtText1.Text = nz(rs!campo, "<null>")


 'Se vntValue č null, ritorna il valore di default vntDefaultValue


Newsgroup: it.comp.lang.visual-basic
Titolo: Keypress e Keydown in VB2005

Salve a tutti.
Per gli eventi in oggetto ho bisogno di una dritta.
Mentre per una TEXTBOX sono riuscito a rilevare gli eventi in una
DATAGRIDVIEW non sono riuscito a rilevarli.
Cosa mi sfugge ????
TIA
Jordy54

 wrote:

Salve a tutti.
Ho fatto dei progressi !!!!!
Ho scoperto che i 2 eventi non sono rilevati se si è in EDIT, (forse
la DATAGRID perde il focus)  altrimenti sono rilevati correntemente.
Ho risolto rilevando gli eventi a livello di FORM.
Gli eventi non sono rilevati a livello di cella c'è un metodo
alternativo, per esempio nella gestione dell'EDIT.
Mi date qualche dritta ???
Jordy54
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Su dbgrid

Come si fa a scrivere un dato nella cella i,j di un DBGrid???
Per chi ha pazienza, quello che voglio fare e' utilizzare DBGrid per
aggiornare una tabella in cui e' presente la chiave di un'altra tabella
dunque nella griglia compare nella colonna corrispondente il numero relativo
alla chiave.
Io vorrei che l'utente, che vuole aggiornare la tabella,  non debba vedere
il numero (La chiave) ma veda direttamente il valore presente nella tabella
collegata ma se faccio un query la DBGrid non permette piu' l'aggiornamento
del DB tramite il DBGrid.
Volevo risolvere il problema aggiungendo una colonna non collegata al DB e
riempirla di volta in volta a run-time e gestire il resto da programma ma
non so come riempire le celle di una colonna di un DBGrid.
In poche parole come si fa a scrivere nella cella i,j di un DBGrid???
Grazie mille per ogni suggerimento
Ciao
    Alessio C.

...


 wrote in message
88kt34$nbt$1...@nslave1.tin.it...


Ciao ROberto
Forse non mi sono spiegato bene :) io non voglio solo evitare di mostrare il
campo Chiave ma voglio che al suo posto vi sia una colonna che contenga un
campo significativo della chiave ad esempio
    Contatti Nome Citta_ID Altro
    Citta     Citta_ID NomeCitta Abitanti ecc
Io vorrei che nel DBGrid compaia
    Nome NomeCitta Altro
e che l'utente possa scrivere direttamente "Pavia" e non 123 nel campo della
città
Il problema e' che se uso una Query si riesce a visualizzare quanto desidero
ma non e' poi possibile aggiornare i campi visto che il DBGrid e' collegato
a due tabelle contemporaneamente.
Se hai qualche idea fammi sapere
    Grazie
    Alessio C

 wrote in message
88tsmp$q76$1...@nslave2.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: vb a xls

¿Sabe alguien cómo exportar datos en formato excel desde una aplicación vb
3.0?


Here is code for exporting an actual recordset to an excel
spreadsheet. Thanks goes to Chris Shell.
Here is the code:
Private Sub CmdExport_Click()
'This code exports a recordset to an excel spreadsheet
Dim x
Dim xlApp As Excel.Application
Dim xlBook As Workbook
Dim xl As Excel.Worksheet
Dim icols
Dim expDB As Database
Dim rs As Recordset
Dim FldCount As Integer
Dim rsCount As Integer
Dim i, k, c, r
x = MsgBox("This function will export the current records in the
DBGrid to an Excel sheet, " & _
"If you do not have Excel an error will occur, do wish to
continue?", vbYesNo + vbQuestion, "Export Data?")
If x = vbNo Then Exit Sub
If IsNull(tmpData.Recordset) Then GoTo NoRS
Screen.MousePointer = vbHourglass
'Access Your recordset here it is from as
'Data control, it does not maatter where it
'comes from.
Set rs = lstdb.OpenRecordset(tmpData.RecordSource, dbOpenSnapshot)
'Declare application
Set xlApp = CreateObject("Excel.Application")
'Declare Workbook
Set xlBook = xlApp.Workbooks.Add(xlWBATWorksheet)
'Identify worksheet
Set xl = xlBook.Worksheets(1)
'Below this code determines the number of columns then
'labels each column with the appropriate field name.
'This code can be found in the 'CopyFromRecordSet' function
'of the Excel Object.
FldCount = rs.Fields.Count - 1
'Excel Column counts are kept seperate as fields may be skipped
c = 1
For icols = 0 To rs.Fields.Count - 1
'If the field is a system field then it skips it.
If rs.Fields(icols).Name Like "s_" & Chr(42) Then GoTo SkipName
xl.Cells(1, c).Value = rs.Fields(icols).Name
c = c + 1
SkipName:
Next
xl.Range(xl.Cells(1, 1), xl.Cells(1, rs.Fields.Count)).Font.Bold =
True
With rs
.MoveLast
.MoveFirst
rsCount = .RecordCount - 1
r = 2
Me.Height = 5970
'Here I have a statusbar on my form
Bar1.Min = 0
Bar1.Max = rsCount
lblExport.Visible = True
Bar1.Visible = True
'4 loops are being performed at once here.
'Loop 'k' loops through the rows of records and
'with each row 'r' for the Excel sheet.
'Inside this loop is another nested loop.
'Loop 'i' is looping through the Fields and along
'with i 'c' is moving through the columns.
'As mentioned above the reason for seperate counts
'between the recordset and Excel sheet are due to
'skipping system fields.
For k = 0 To rsCount
c = 1
For i = 0 To FldCount
If rs.Fields(i).Name Like "s_" & Chr(42) Then GoTo SkipField
xl.Cells(r, c).Value = rs.Fields(i).Value
c = c + 1
SkipField:
Next 'i
r = r + 1
.MoveNext
Bar1.Value = k
Next 'k
End With
'After loop is complete, show the sheet
xl.Visible = xlSheetVisible
xlApp.Visible = True
Bar1.Visible = False
lblExport.Visible = False
Me.Height = 5265
xlApp.Quit
Set xl = Nothing
Set xlBook = Nothing
Set xlApp = Nothing
Set rs = Nothing
Screen.MousePointer = vbDefault
Exit Sub
NoRS:
Screen.MousePointer = vbDefault
MsgBox "No Active recordset detected"
Exit Sub
Exp_Err:
Screen.MousePointer = vbDefault
MsgBox Err.Number & ": " & Err.Description
Resume Next
End Sub
design by jK© 1998-1999 jK soft, Jan KUDR
Newsgroup: it.comp.lang.visual-basic
Titolo: run time error 380

Ho realizzato un programma di contocorrente, sotto windows millenium e xp
nessun problema sotto windows 95/98 ho un errore di run time 380.
Chi puo' aiutarmi ?
Nicola



Prima di tutto, chi ti puo' aiutare veramente sei tu stesso.
Cosa fa il programma quando si verifica l'errore?
Riesci ad identificare la funzione in cui questo accade?
-- 
ciao, hal

 Chi puo' aiutarmi ?
Google (cernita obbligata):
http://makeashorterlink.com/?G21A11F03

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Stampa con printer.print , non mi accetta i fonts truetype

Ciao a tutti !!
Ho questo problemino con la stampa...
Se imposto il font come "Tahoma" , e l'orientamento di default.. va tutto
bene.
Ma se imposto l'orientamento orizzontale , e poi definisco il font...  il
programma utilizza il font standard della stampante..
Perche' diavolo lo fa ???
ho provato a settare prima il font e poi l'orientamento,  ho provato a
settare prima l'orientamento e poi il font, ho provat a settare il font
ogni volta che stampo una frase... NIENTE !!
sembra proprio che in direzione orizzontale non mi accetta i truetype.
Sapete se c'e' modo di obbligare la stampa ad usare i truetype anche in
orizzontale ?
Ciao e grazie e BUONE FESTE !!!
DaVe

-> Dave <- <Daveg...@ticino.moc> wrote in message
01bf4dfc$d4d528e0$9ec8bac3@davidece...

Ho letto da qualche parte che l' oggetto printer permette di cambiare i suoi
parametri(in modo che abbiano effetto sulla stampa) solo prima dell'
esecuzione di un comando printer.print

Newsgroup: it.comp.lang.visual-basic
Titolo: Mi date un consiglio....

Ciao a tutti, il mio problema č che sto impazzendo a gestire correttamente
date e numeri decimali, non volevo aiuto su un caso particolare ma solo
sapere in generale quale č il modo migliore per slegarsi completamente dai
Regional Settings perchč ogni volta che mettono le impostazioni
all'italiana con la virgola come separatore decimale non mi funziona piů
niente!
Grazie
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 niente!
Usa CStr() CDate() CLng() CDbl() CCur()
Ciao
--
mathParser = "
http://www.neodatatype.net
"
sitoComune = "
http://www.it-lang-vb.net
"

Newsgroup: it.comp.lang.visual-basic
Titolo: Access database

Ciao,
creo un database con access e gli metto una password,
guistamente da vb se gli voglio accedere mi da password non valida. ma dov'č
la proprietą sul controllo data per impostare la password valida???

il problema è che uso il controllo data, da codice non lo so fare.. :(
dovrebbe esserci un modo anche tramite il cotrollo di accedere a file con
password!
