mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Creazione dsn ODBC a runtime

Chi mi sa dire come si effettua una connessione ad un dbf con ODBC via
codice ?
--
Grazie, Alberto (alias ALCAU)

Ma vuoi usare per forza un DSN?
Perchè invece non fai così (DAO):
Set db = OpenDatabase(App.Path & "\NomeCartella", False, False, "dBase IV;")
Set rs = db.OpenRecordset(NomeFileSenzaEstensione, dbOpenDynaset)

 Perchè invece non fai così (DAO):
Volevo usare DSN perchè nella mia app uso ADO.
Ci sono dei problemi se uso ADO e DAO nella stessa App ?
Grazie, Alberto


Non ci sono problemi se distingui le librerie in fase di dichiarazione, ad
esempio:
Dim cn as ADODB.Connection
Dim ADOrs as ADODB.Recordset
Dim db as DAO.Database
Dim DAOrs as DAO.Recordset
Il codice per creare un DSN a runtime l'avevo visto da qualche parte, ma non
ricordo dove. Comunque invece di un DSN di sistema o di utente, potresti
usare un DSN su file che potresti facilmente aggiungere nel pacchetto di
installazione!
Sto cercando di capire come accedere a un DBF con ADO senza usare un DSN...

> Sto cercando di capire come accedere a un DBF con ADO senza usare un
DSN...
Ecco la stringa di connessione giusta (ricomponila togliendo i ritorni a
capo):
cn.ConnectionString = "Driver={Microsoft Visual FoxPro Driver};
SourceType=DBF;SourceDB= PercorsoCartellaContenenteDBF"
cn.Open
rs.Open "NomeFileDBF", cn, (opzioni), (opzioni), adCmdTable

Ti ringrazio per l'interessamento ma questa stringa di connessione la usavo
già e funzionava solo se eliminavo il file .mdx (il file degli indici) che
ha lo stesso nome del .dbf.
Per questo motivo avev pensato al DSN, del quale ho trovato il codice per
crere la connessione a runtime, ma così come stanno le cose ho optato per
DAO.
Grazie, Alberto
Newsgroup: it.comp.lang.visual-basic
Titolo: Dannazione ComCtrl.....ocx

Salve a tutti,
scusate ma la Microsoft mi sta facendo proprio inca@@are,
Ma è possibile che ogni volta che reinstallo windows devo cambiare ogni
volta le barre degli strumenti e passare ore e ore a riscrivere il codice?
Scusate la mia probabile ignoranza, ma c'è un modo per risolvere questo
BUBBONE (altro che bug)?
Grazie
Robin


cioe' ?
ciao, hal

 ha scritto nel messaggio
news:9cgvqb$dp9ub$1...@ID-56381.news.dfncis.de...

anch'io non ho capito bene quale sia il bug.
mi associo al "cioe'"?
ciao
ugo

mi associo al "cioe'"?
Scusate ma pensavo di essermi spiegato e invece no.
Ok ecco cosa mi dice Visual Basic 5 (sic!!!) pagato 1.000.000 ...ncino
e che ogni volta che reinstallo windows mi si presenta sempre in
questo modo:
ecco il testo:
"Impossibile caricare 'C:\programmi\studio\COMCTL32.ocx" ---
Continuare a caricare il progetto?
Ma insomma Windows, l'ho comprato ed è sempre lo stesso, VB l'ho
pagato a caro prezzo, e alla fine mi devo sentir dire che non
riconosce il "SUO STESSO" COMCTRL?
Ecco il BUBBONE.
Certo dico BUBBONE perchè quasi non uso più i COMCTRL perchè ogni
volta che reinstallo windows devo riscrivere mezzo programma.
Scusatemi ma spero di essere stato più chiaro. Se poi non lo fossi
stato questo è tutto quel che mi dice VB5 del cavolo.
Grazie in anticipo a chi mi può aiutare  a risolvere questo problema.
Robin

 Continuare a caricare il progetto?
A me succede con l'ocx di un controllo textbox che uso... ma il rimedio e'
semplice:
rispondi "si" e carica il progetto, rispondi "ok" a tutti i messaggi di
errore, vai nel menu progetto-->componenti e aggiungi l'ocx mancante...
A questo punto NON salvare, esci da VB chiudendo la finestra con il pulsante
di chiusura "x" oppure dal menu file-->esci... quando ti chiede di
salvare -deseleziona- tutti i nomi di form o moduli tranne la voce relativa
al file di progetto. In questo modo aggiorni il file vbp e non tocchi i file
dei form e quando riavvi il progetto come per magia l'ocx viene trovato !
--
Fabio Musciatelli

 ha scritto nel messaggio
news:og%G6.199350$lj4.5...@news6.giganews.com...

Non è più semplice registrare di nuovo il controllo mancante?
ciao
ugo

 Non è più semplice registrare di nuovo il controllo mancante?
Dipende, alcune volte cambia il codice e bisogna fare come ha detto Fabio...
Ciao
--
Timothy Redaelli
timothy....@email.it


???

 ha scritto nel messaggio
news:9ck6dp$e6vu5$1...@ID-56381.news.dfncis.de...

Posso esprimere anch'io il mio ??? ?
;-)
ciao
ugo

Newsgroup: it.comp.lang.visual-basic
Titolo: Oggetti MapObject

Ciao!
Devo utilizzare gli oggetti Map Object, nessuno li conosce o li ha mai
utilizzati!
Io devo ricavare da una mappa (in formato db) i punti piu vicini ad una
determinata via!
Se qualcuno ha già esperienza mi fa sapere?
Grazie e ciao!

 anno fa).
E' un controllo ActiveX della ESRI, "papa'" di ArcInfo, ArcView ecc.
Danno accesso a parecchie funzionalita' per il trattamento delle mappe
principalmente per quanto riguarda il formato Shape File (.SHP)
Piuttosto (per Yuza) sono perplesso sulla mappa in formato "db"...
esattamente cosa intendi?
Ciao
--
Luca Dormio
luca....@tin.it
Newsgroup: it.comp.lang.visual-basic
Titolo: I miei messaggi????

Scusate ma i giorni scorsi ho inviato diversi messaggi.
Ma non li ho visti.
E' tutto regolare?
Oppure c'è qualcuno che filtra le richieste?
Grazie e scusate
Ciao
P.

[pi ero = 
circa_miopensieroT...@tiscali.it
 in
c44egu$o7g$
1...@fata.cs.interbusiness.it
] ha scritto:

Questo è in data 27/3. Lo vedo solo ora. Stamattina non c'era. Giuro.

 Questo è in data 27/3. Lo vedo solo ora. Stamattina non c'era. Giuro.
confermo.
è arrivato oggi, primo aprile, verso le 13:00
e non da solo.
-- 
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo
Newsgroup: it.comp.lang.visual-basic
Titolo: Elenco ODBC

Salve a tutti.
Esiste una funzione che mi permetta di ottenere un elenco di tutti gli ODBC
in una Combo_Box?
Grazie a tutti
Ciao Alder

 ha scritto nel messaggio
news:YykW6.4541$T52.1...@news.infostrada.it...

Cosě di primo acchito, dai un'occhiata alla chiave:
HKEY_LOCAL_MACHINE\SOFTWARE\ODBC
ciao
ugo

 Così di primo acchito, dai un'occhiata alla chiave:


 Come faccio ad effettuare questa chiamata API ODBC GetDataSource?
Vedi, nell'esempio VisData fornito con Vb / Msdn la funzione:
GetDSNsAndDrivers
ciao
ugo

Newsgroup: it.comp.lang.visual-basic
Titolo: Dir List Box

E possibile far comparire in una Dir List Box una struttura di directory a
mio piacimento, passandogli i parametri delle sottodirectory e dei files?

 mio piacimento, passandogli i parametri delle sottodirectory e dei files?
tipo il pattern del file box ?
non mi sembrava. mi pareva che si potesse scegliere solo se visualizzare i
file rhs.
prob la puoi costruire col treeview.
ciao, a.

 wrote in message
C78K4.142221$pn3.1...@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: chiave software e codice dell'HardDisk

come posso creare e gestire la chiave di un software usando il codice di
serie dell'HardDisk?
In alternativa al codice di serie dell'HD cosa posso usare per gestire la
chiave di un programma?
Grazie

chiave di un programma?
Dipende dagli utenti del tuo programma. Se sono "utonti" allora basta il
numero di serie dell'hdd, altrimenti potresti usare il mac address,
sempre che il pc abbia una scheda di rete e che non appartenga ad una di
quelle partite sfigate di schede di rete con mac address uguale...
Se invece il software è destinato alla larga distribuzione, qualsiasi
metodo è inefficace, poiché si presume che il software sia d'interesse e
quindi verrà hackato in breve tempo.
Se invece il software è stato sviluppato su misura, considerando il
costo, aggiungici pure 50k e usa una chiave hardware...
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
---------------------------------------------------------------------------

 ha scritto nel messaggio
news:sq73rtsthadegpa2p...@4ax.com...


 ha scritto nel messaggio
news:9os5dk$7nd$1...@fe2.cs.interbusiness.it...

Come già detto guardati i vecchi post ed avrai tutte le risposte
Non postare 30 volte lo stesso messaggio per favore piuttosto
scrivi direttamente a qualcuno che pensi ti possa aiutare.
                            danilo

Moreno dimmi come si fa a segnalare con abuse!
Ehi, ma per chi mi hai preso??? Non sono mica così cattivo!
(basta che mandi all'indirizzo abuse del suo provider o all'x-compliants
il messaggio comleto di header, spiegando il motivo del tuo gesto (non
del suo, quello è ovvio... :-P))



Mi associo a tutto TRANNE la chiave hardware.
Non esiste nulla al mondo di più odioso delle chiavi hardware.
Per l'utente ma anche per te... (mai provato a dover riprogrammare la chiavi
perchè non vanno più sotto millennium o simili amenità...)
ciao
ugo

perchè non vanno più sotto millennium o simili amenità...)
Millenium? Cos'è "Millenium"??? ;-PPP


 Millenium? Cos'è "Millenium"??? ;-PPP
Quello del bug...
-> GbC

 ha scritto nel messaggio
news:Krjs7.5648$_42.2...@news.infostrada.it...

LOL
ciao
ugo

e magari fosse solo uno...
-> GbC

 e magari fosse solo uno...
mica a caso lo chiamano millennium...
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Sito comune

 [cut]
Ho seguito la stessa procedura per l'invio di un altro progettino di esempio
che e' correttamente arrivato e pubblicato.
Perche' il risponditore automatico mi dice che il messaggio e' arrivato e
poi mi si chiede di controllare l'indirizzo del destinatario ?
Sbaglio qualcosa ?
Ciao a tutti e grazie
Stefano

 wrote in message 861vpp$3p6$1...@nslave1.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: VB.NET o VS.NET? (quesito commerciale)

Al di là di tutte quelle informazioni della Microsoft che sembrano puntare a
vendere quasi esclusivamente tutto il pacchetto completo, gradirei conoscere
qualche parere...
Dove lavoravo prima utilizzavamo 
VS.NET
 2002 per i nostri progetti... adesso
che sono in proprio e faccio un po' più conti in tasca :) stavo valutando la
possibilità dell'acquisto dei pacchetti separati.
Sto per iniziare a lavorare ad un progetto che impegnerà due programmatori,
uno che svilupperà C#, l'altro VB.NET...
il dilemma amletico: 2 licenze di 
VS.NET
 2003 oppure una di C# e una di
VB.NET
 (pacchetti singoli)??
Visto il risparmio notevole pensavo di seguire questa "filosofia" :) ma,
ripeto, venendo da un'esperienza di sviluppo in VS, a cosa dovrei rinunciare
(oltre alla programmazione negli altri linguaggi che non mi interessa)?
Quali difficoltà potrei incontrare?
Insomma, cosa mi consigliate?
Ringrazio tutti coloro che mi aiuteranno in questa scelta!
DkS

 (oltre alla programmazione negli altri linguaggi che non mi interessa)?
Beh... se non sbaglio non potresti fare DLL e temo anche pagine 
ASP.NET
 e
Web Services...
O meglio potresti scriverti le classi e poi scorporarle per compilarle con
il compiler a riga di comando...
                        Ciao
                                                    Allanon

Newsgroup: it.comp.lang.visual-basic
Titolo: Scrivere in flexgrid

Mi scuso per la mia ignoranza.
potete dirmi se è possibile scrivere  direttamente da tastiera, dentro una
flexgrid.
Grazie.
Ciao.
Gianni.

 dentro una flexgrid.
si e no.
dipende
da un post dell'immancabile papero:
http://www.pbdr.com/vbtips/gen/Article-UsingFlexGrids(1).htm
-- 
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo

 > potete dirmi se č possibile scrivere  direttamente da tastiera,


potresti spiegarmi con parole tue?.
Il morale della favola è che la flex non permette l'inserimento
diretto da tastiera. Per ovviare a ciò devi gestire un textbox che
andrà posizionato sulla cella da editare ...
Ciao!

 andrà posizionato sulla cella da editare ...
io avevo capito una cosa leggermente diversa:
se associata ai dati è possibile l'editing diretto
se non associata devi gestire l'accrocchio del textbox
comunque, per gianni, come ho già avuto modo di dire: imparare l'inglese,
almeno nel nostro campo, è indispensabile.


almeno nel nostro campo, è indispensabile.
Concordo. Nel frattempo, dopo il mostro che ho generato sopra mi
iscriverò ad un corso di italiano!
Ciao!
Newsgroup: it.comp.lang.visual-basic
Titolo: line input

Se apro un file testo in lettura, esiste un limite di aperture 
contemporanee? piu' utenti possono interrogare lo stesso file senza
problemi?
(il famoso 3 giga txt)
thx.
Dim TextLine
Open "FILEPROV" For Input As #1 ' Apre il file.
Do While Not EOF(1) ' Ripete fino alla fine del file.
Line Input #1, TextLine ' Assegna la riga a una variabile.
' Debug.Print TextLine ' Scrive nella finestra Immediata.
Loop
Close #1 ' Chiude il file.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Close #1 ' Chiude il file.
ho come una sensazione di deja vu....
--
Salutoni
Sergio

 ho come una sensazione di deja vu....
:-DDD e' per questo che avevo scritto :  > > (il famoso 3 giga txt)


 problemi?
... For Input Shared ...

 .... For Input Shared ...
Quindi non ci sono limiti al numero di utenti, 1 nessuno centomila :-)


Newsgroup: it.comp.lang.visual-basic
Titolo: Scrolling automatico

Ho un testo che eccede la casella di testo, quidi si attiva la scroll bar
verticale. Vorrei che, dopo aver fatto la ricerca all'interno del campo di
testo per trovare un dato carattere, la scroll bar si muovesse
automaticamente per posizionare il testo nel punto in cui è stato trovato.
Grazie
hyppos

Grazie! proprio quello che cercavo!
ehm... e se volessi anche che il cursore mi lampeggiasse sul carattere
ricercato?
TestoDiRicerca="Ciao"
    I=Instr(1,Text1.Text,TestoDiRicerca)
    Text1.SelStart=I
Cioè in questo caso il cursore dovrebbe lampeggiare sulla C
Grazie ancora!
hyppos

 wrote in message
97mgki$q5cib$2...@ID-73994.news.dfncis.de...

Aggiungi
    Text1.SelLenght = 1
per evidenziare solo la "C" oppure
    Text1.SelLenght = Len(TestoDiRicerca)
per evidenziare tutta la parola.
Ciao
--
Luca Dormio
luca....@tin.it

 > Cioč in questo caso il cursore dovrebbe lampeggiare sulla C


Newsgroup: it.comp.lang.visual-basic
Titolo: interrogare le seriali

Buongiorno a tutti.
Vorrei fare un programma in Vb6 che una volta scelta una delle porte seriali
installate sul computer mi dic se su quella porta c'è quache dispositivo
collegato. sapete aiutarmi? Grazie!




Un'idea sarebbe quella di aprire la porta con il segnale RTS attivo
e testare se il segnale CTS va alto.
Se va alto, c'è qualche cosa, se rimane basso, no.
Però dipende dal tipo di dispositivo.
I modem, ad esempio, li senti.
Altri dispositivi, come lettori di tessere magnetiche, lettori di codici
a barre e altri dispositivi, non li sentirai mai,
poichè solo pochi usano il controllo di flusso RTS/CTS
Ciao
Sir Jo
Newsgroup: it.comp.lang.visual-basic
Titolo: MDIform

Salve a tutti, ho un problema dettato dalla misera esperienza come
programmatore!
Devo gestire diverse finestre "child" in un form MDI e vorrei però tenere,
in apertura, non visibile il  1° form da cui discendono tutti gli altri.
 In pratica non riesco a gestire in avvio la proprietà "visible", neanche
forzandola in più punti.
Come si può risolvere questo intrigo?
Grazie dell'attenzione e dell'eventuale aiuto.

 wrote in message
835s2t$ml$1...@pegasus.tiscalinet.it...

Invece di Form1.Show, prova a caricare la form con Load Form1.

Prima devi caricarla e poi puoi renderla visibilke:
Load Form1
Form1.Show
P.S. Mettilo nell'evento Load del form genitore..........è meglio.


Newsgroup: it.comp.lang.visual-basic
Titolo: Cerco Help su Cattura di una stringa

Salve a tutti , ho un piccolo problema :
Avendo una stringa contenente del testo tipo:
Nel mezzo del cammin di nostra vita mi ritrovai <Da...@Alighieri.it> Divina
Commedia
quale è il codice da usare per catturare nella stringa solo
Da...@Alighieri.it
tenendo presente che la stringa non ha lunghezza fissa e che gli unici
delimitatori statici sono < @ >
Ringrazio anticipatamente tutti coloro che risponderanno.

 wrote in message 85i3j0$8eq$1...@serv1.iunet.it...



Questa rountine mi è venuta sul momento e permette di isolare ciò che c'è
tra < e > e se il testo non contiene @ da una stringa nulla in uscita.
Dim Str_Origine as string, Str_Dest as string
Dim Insert as boolean, Veramente as boolean
Insert=false
Veramente=false
For a = 2 to len(Str_Origine)
    if  Mid$(Str_Origine,a-1,1) = "<" or mid$(Str_Origine,a,1) = ">" then
Insert=Not(Insert)
    if Insert then Str_Dest = Str_Dest + mid$(Str_Origine,a,1)
    if Mid$(Str_Origine,a,1)="@" then Veramente=True
Next
if not(Veramente) then Str_Dest=""

 wrote in message
85l4be$spu$1...@lacerta.tiscalinet.it...


 wrote in message ...

Newsgroup: it.comp.lang.visual-basic
Titolo: Refresh DataGrid???

Ciao a tutti e grazie anticipatamente.
Il Problema?
Non riesco a fare il Refresh di un DataGrid se non attraverso l'Unload e il
Load della form che lo contiene.
Ovviamente non mi sembra la soluzione piu' conveniente...
Il Panorama?
Data grid di sola lettura che e' collegato alla base dati attraverso un
DataEnvironment.
Cosa ho provato a fare?
refresh della form
refresh del recordset (anche se questo viene sicuramente aggiornato)
refresh del datagrid
risultato?
Il datagrid si tiene i valori iniziali senza aggiornarli?
Cosa posso fare?
:)

 wrote in message
9d89pv$77c$1...@fe1.cs.interbusiness.it...

Prova:
DBGrid1.ReBind
Ciao Mario

Sighhh non funziona!!!

trovatooo
Sintomo
datacombo e fatagrid non si aggiornano con il comando refresh.
soluzione
Usare ADO data control invece del dataenvironment  oppure fare il rebind del
dataenv.
Righe di esempio...
Set DataGrid1.DataSource = DataEnvironment1
Set DataCombo1.DataSource = DataEnvironment1
Set DataCombo1.RowSource = DataEnvironment1
FUNZIONAAAA!!!
MIC
"la soluzione non sta nel codice ma nella banda"...


La connessione non farla ad un DataEnvironment altrimenti non funziona (W
Microsoft che ci vuole sempre tanto bene) falla
attraverso un'oggetto AdoDC e ogni volta ke devi aggiornare il DataGrid
aggiorna l'intera connession
Se l'oggetto (ad esempio) si chiama Adodc1 e la griglia DataGrid1, dovrai
scrivere :
Adodc1.recordset.open "Connessione che vuoi aprire o Query da genereare"
Adodc1.recordset.refresh
Adodc1.refresh
DataGrid1.refresh
Vedi funziona, ho avuto il tuo stesso Prob.
By
Alex (Al...@GalleriaDelCorso.it)

hai letto il mio post delle 16.20 in merito?
hai magari riscontrator dei problemi con il metodo il secondo metodo
indicato?
grazie
mic
"la soluzione non sta nel codice, e' nella banda"





come da subject...
Newsgroup: it.comp.lang.visual-basic
Titolo: Ridimensionamento array..è_é

Salve ragazzi, ho un piccolo intoppo con l'uso degli array.. In pratica mi
servirebbe riempire un vettore ridimensionandolo di volta in volta in modo
tale che la sua grandezza sia uguale al numero degli elementi contenuti. Vi
posto il mio codice..
Dim grandezza() as  variant
i = 0
While i < UBound(size)
ReDim Preserve grandezza(UBound(grandezza) + UBound(size))
grandezza(UBound(grandezza) + 1) = size(i)
i = i + 1
Wend
Grandezza č il vettore in questione.. Size č il vettore contenente i dati da
copiare in grandezza.
Questo codice mi genera l'errore "Subscript out of range"..perchč? Grazie
per le eventuali risposte! :)
--
ByeZzZ
`Vinxi`

 per le eventuali risposte! :)
imho l'errore č dovuto al fatto che avendolo dimensionato senza dimensioni
(scusa il gioco di parole) l'istruzione ubound non č utilizzabile
Salutoni
Sergio

 Wend
Dim grandezza() as  variant
' initialize array
Redim grandezza(-1 to -1) as  variant
' Add an item
Redim Preserve grandezza(0 To Ubound(grandezza) + 1)
P.S.: non ho ben capito il senso del tuo loop.
Ciao
--
' // Initialize the expression evaluator
Engines.Evaluator = CreateObject("
http://www.neodatatype.net
")
' // you can find resources for and from the NG here!
Me.SitoComune = "
http://www.it-lang-vb.net
"

 Ciao
--
ByeZzZ
`Vinxi`

 ha scritto nel messaggio
news:apodjs$578$1...@fata.cs.interbusiness.it...

1) Innanzitutto tieni conto che UBound non ti resituisce il numero di
elementi ma l'UpperBound dell'array, ossia l'indice dell'ultimo elemento,
che puň essere 0 in casi come questo:
Dim size(0) As Variant
In questo caso, Ubound(size) vale 0, ma l'array contiene 1 elemento e non 0.
Se ti interessa sapere quanti elementi ci sono nell'array:
iNumElementi = UBound(size) - LBound(size) + 1
2) Da quello che ho capito, la tua funzione dovrebbe essere riscritta in
questo modo:
Dim iNumElementi As Integer
Dim iStart As Integer
Dim i As Integer
Dim iFirst As Integer
iFirst = LBound(size)
iNumElementi = UBound(size) - iFirst + 1
iStart = UBound(grandezza)
Redim Preserve grandezza(LBound(grandezza) To (iStart + iNumElementi))
for i = 0 To iNumElementi - 1
    grandezza(iStart + i + 1) = size(iFirst + i)
next

Newsgroup: it.comp.lang.visual-basic
Titolo: Cosa strana

Ciao a tutti,
ho notato che chiudendo explorer con visual 
studio.net
 iconizzato, l'accesso
remoto non mi chiede se voglio chiudere la connessione. La domanda viene
fatta se chiudo 
vs.net
.
Vuol dire che .net utilizza la connessione? E che ci fa? Perche non mi
chiede il permesso?
Succede pure a voi?
ciao
nello
P.S. Non mi dite che se ne è parlato qualche post fa, ho fatto una ricerca
infruttuosa su google/gruppi

 chiede il permesso?
Il Grande Fratello non era quello di Orwell, nè quello di Silvio. Sta
esattamente in mezzo.

 Succede pure a voi?
Certo che sě
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: SMS

Sto disperatamente cercando un OCX free o un metodo per inviare SMS da
un'applicazione vb a tutti i numeri contenuti in una list box. C'č
qualcuno che mi puņ aiutare ??
Grazie,
       Stefano
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 qualcuno che mi può aiutare ??


 ha scritto nel messaggio
news:a5qpr8$hnj$1...@lacerta.tiscalinet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Vb Crystal Report 7

Ciao spero di non essere OT ma confido nella vostra pazienza :-)
Dunque Ho realizzato un report in cui ordine delle sezioni in base ad un
campo data:
cioč:
data 10/02/2001
    sezione
data 10/03/2001
    sezione
ecc ecc
Tuttavia il campo data e' memorizzato in un campo di testo.
l'ordinamento avviene confrontando i caratteri che non corrisponde al giusto
ordinamento delle date! Non posso cambiare DB, come devo fare a vostro
parere?
2) devo sommare dei campi in cui sono contenuti i valori di un campo che
rappresenta dei secondi. Devo necessariamente utilizzare un campo in DB
numerico perche' devo fare delle somme. Tuttavia nel layout si vuole che la
visuallizzazione di questi secondi avvenga nel formato 12.09.34 ad es e non
come valore assoluto dei secondi So che in Cry 8 esiste il TimeSerial tipo
VB ma sto utilizzando il Crystal report 7!!! Come cavolo faccio???
Grazie a chi mi potrą aiutare!!!


Al volo in vb (anche in forma leggermente "didattica"):
Adattala al basic di Crystal Report.
Public Function FormatSeconds(ByVal nSeconds As Long) As String
    Const TIMESEP = "."
    Dim nMin As Integer, nHour As Integer
    Dim sSeconds As String, sMin As String, sHour As String
    nMin = Int(nSeconds / 60)
    nSeconds = nSeconds - (nMin * 60)
    nHour = Int(nMin / 60)
    nMin = nMin - (nHour * 60)
    sHour = Trim(Str(nHour))
    sHour = String(2 - Len(sHour), "0") & sHour
    sMin = Trim(Str(nMin))
    sMin = String(2 - Len(sMin), "0") & sMin
    sSeconds = Trim(Str(nSeconds))
    sSeconds = String(2 - Len(sSeconds), "0") & sSeconds
    FormatSeconds = sHour & TIMESEP & sMin & TIMESEP & sSeconds
End Function
ciao
ugo

 ha scritto nel messaggio
news:oLOm8.58283$%g7.18...@twister2.libero.it...
| Ciao spero di non essere OT ma confido nella vostra pazienza :-)
| Dunque Ho realizzato un report in cui ordine delle sezioni in base ad un
| campo data:
| cioè:
| data 10/02/2001
|     sezione
| data 10/03/2001
|     sezione
| ecc ecc
| Tuttavia il campo data e' memorizzato in un campo di testo.
| l'ordinamento avviene confrontando i caratteri che non corrisponde al
giusto
| ordinamento delle date! Non posso cambiare DB, come devo fare a vostro
| parere?
|
| 2) devo sommare dei campi in cui sono contenuti i valori di un campo che
| rappresenta dei secondi. Devo necessariamente utilizzare un campo in DB
| numerico perche' devo fare delle somme. Tuttavia nel layout si vuole che
la
| visuallizzazione di questi secondi avvenga nel formato 12.09.34 ad es e
non
| come valore assoluto dei secondi So che in Cry 8 esiste il TimeSerial tipo
| VB ma sto utilizzando il Crystal report 7!!! Come cavolo faccio???
|
| Grazie a chi mi potrà aiutare!!!
|
|
|
Newsgroup: it.comp.lang.visual-basic
Titolo: Domanda stupida su database

Utilizzando il controllo ado, ovviamente collegato ad un db,  come faccio a
fargli trovare ciò che scrivo in una textbox? (Suppondo con il comando find,
ma sono ai primi passi....)
Grazie 1000

 fargli trovare ciň che scrivo in una textbox? (Suppondo con il comando


 wrote in message
news:7vajed$baj$1...@nslave1.tin.it...


 fargli trovare ciň che scrivo in una textbox? (Suppondo con il comando

Newsgroup: it.comp.lang.visual-basic
Titolo: AD: Garanzia hard disk

Cari amici, questa news letter potrebbe essere interpretata come una
pubblicità e in effetti in un certo senso lo è ma da delle notizie che
riteniamo siano utili per molti di voi, Infatti chissà quanti hanno da
qualche parte degli HD rotti e non sanno che sono ancora in garanzia o, pur
sapendolo non sanno come farsela riconoscere.
Premesso che il periodo di garanzia varia da tre a cinque anni a seconda
delle marche e dei modelli gli acquirenti in genere si vedono riconoscere la
stessa solo per un anno dall' acquisto e spesso a fronte di pesentazione di
documenti fiscali non sempre di facile reperibilità.
Sena contare che qualora la garanzia venga riconosciuta, i nuovi hard disk
vengono resi con lunghissimi tempi di ritorno.
Utilizzando il nostro servizio si evitano tutte le proceedure burocratiche
legate ai numerosi fornitori, e in una sola volta si raggiungono tutti i
costruttori.
La procedura è molto semplice: ci basta conoscere la marca, il modello e il
serial number ed in pochi minuti sappiamo dirvi se il vostro HD è in
garanzia o meno.
Stabilito che l' HD è in garanzia dovrete spedirlo alla nostra sede di Roma
e con procedura di scambio anticipato o qualche giorno di attesa riavrete un
disco nuovo, spesse volte upgradato.
Al momento attuale effettuiamo il servizio di garanzia per le seguenti case
costrruttrici:
Seagate
Quantum
Maxtor
Hitachi
Fujitsu
Western Digital
IBM
Samsung
Ulteriori informazioni sui servizi offerti dalla ns. società le potrete
trovare sul nostro sito:
www.savedata.com
Ceti di avervi fatto cosa utile siamo a vs. disposizione per ogni altro
eventuale chiarimento.


E' la terza volta che ce lo dici.
Una volta si diceva che PERSEVERARE E' DIABOLICO.
--
 
federic...@planet.it
Eliminare NOSPAM dall'indirizzo! Delete NOSPAM from address!
Newsgroup: it.comp.lang.visual-basic
Titolo: [Ri-aiutino] Mi dite perchè nn va??

Hola NG,
ho provato a fare il programma di cui parlavo stamattina ma mi da errore
40020.
Mi dite perchč??
----------------------------------------------------------------------------
-----
Option Explicit
Dim TestoInArrivo, Server, NickMio, NickTuo As String
Private Sub cmdChiudiConnessione_Click()
Winsock1.Close
cmdChiudiConnessione.Enabled = False
End Sub
Private Sub cmdConnetti_Click()
Server = txtIP.Text
Winsock1.RemoteHost = Server
Winsock1.RemotePort = 1000
Winsock2.RemoteHost = Server
Winsock2.RemotePort = 1001
Winsock1.Connect
Winsock2.Connect
Winsock2.SendData NickMio
cmdChiudiConnessione.Enabled = True
End Sub
Private Sub cmdInvia_Click()
ListaChat.AddItem "/" & NickMio & ": " & txtChat.Text
ListaChat.ListIndex = ListaChat.ListCount - 1
Winsock1.SendData txtChat.Text
txtChat.Text = ""
End Sub
Private Sub cmdLocalIP_Click()
MsgBox "Il tuo ip:" & Chr(13) + Chr(10) & Winsock1.LocalIP, 0, "Local IP"
End Sub
Private Sub Form_Load()
NickMio = InputBox("Inserisci il tuo il tuo nick name!!", "Nick")
Winsock2.LocalPort = 1001
Winsock1.LocalPort = 1000
Winsock2.Listen
Winsock1.Listen
End Sub
Private Sub Winsock1_ConnectionRequest(ByVal requestID1 As Long)
If Winsock1.State <> sckClosed Then
   Winsock1.Close
End If
If MsgBox("Vuoi accettare la connessione??", vbYesNo, "Tentativo di
connessione") = vbYes Then
    Winsock1.Accept requestID1
    cmdConnetti.Enabled = False
Else
    Winsock1.Close
End If
End Sub
Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
TestoInArrivo = ""
Winsock1.GetData TestoInArrivo
ListaChat.AddItem "/" & NickTuo & ": " & TestoInArrivo
ListaChat.ListIndex = ListaChat.ListCount - 1
End Sub
Private Sub Winsock2_ConnectionRequest(ByVal requestID As Long)
If Winsock2.State <> sckClosed Then
    Winsock2.Close
End If
Winsock2.Accept requestID
End Sub
Private Sub Winsock2_DataArrival(ByVal bytesTotal As Long)
Winsock2.GetData NickTuo
Winsock2.Close
End Sub
----------------------------------------------------------------------------
---------------
Sperando di nn rompere troppo, bye bye
    Dosa

 Dim TestoInArrivo, Server, NickMio, NickTuo As String
1° errore (formale):  come le hai dichiarate NickTuo è una stringa, le
restanti sono Variant
 Dim TestoInArrivo As String, Server As String, NickMio As String, NickTuo
As String
Dove ti dava errore? in che punto?
sarebbe meglio tu postassi il testo dell'errore piuttosto che il suo codice.
Fabio

Newsgroup: it.comp.lang.visual-basic
Titolo: Domandina sui form

Ciao a tutti, qualcuno mi sa dire come si realizza l'interfaccia grafica che
ha un form principale con i menů e un frame laterale (stile sito web) con le
sezioni principali del programma?
Per caso devo creare un form MDI e poi inserire un form figlio a lato con
misure fisse?
Vi ringrazio in anticipo


Se ho capito bene potresti usare un form MDI, dei menu e delle picture box,
che possono errere agganciate ai 4 lati della finestra..
ciao Biagio
Newsgroup: it.comp.lang.visual-basic
Titolo: Bitmap trasparente su sfondo colorato

Salve a tutti, sto realizzando un semplice gioco per mia nipote. Come posso
fare per rendere trasparente gli angoli di una immagine di automobile che
cammina su un certo sfondo ? Grazie a tutti.
Stefano
--------------------------------
Inviato via 
http://usenet.libero.it

 su un certo sfondo ?
Vai sul sito comune ( 
http://www.it-lang-vb.net
 ) e cerca "Region". Nello
specifico dai una occhiata all'OCX di zanna:
http://www.it-lang-vb.net/download.asp?file=Archivio/Binari/axRegn301.zip&ID
=243
Ciao
*Roby*

Newsgroup: it.comp.lang.visual-basic
Titolo: [MinMeeting] Ultimo avviso

Ok ho appena sentito Paperino e AndreaMoro ed hanno confermato, purtroppo
David Ruscelli e' influenzato e resta sul "Forse"
mancano altri all'appello , vi prego di confermare il prima possibile
(stasera e' meglio)
Di seguito i dati :
Data : Giovedi 10 luglio 2003
Localita' : Casa di Paperino (tra pescara e montesilvano)
Menu' : Tutta robina buona dagli arrosticini agli affettati con contorni
vari
FATE ANCORA IN TEMPO AD AGGREGARVI !!!
Rispondete a questo messaggio se siete interessati (fornite anche una mail
valida)
Grazie
-- 
-Gigio@Work(?)-

 ha scritto nel
messaggio news:behh1a$4vk80$
1...@ID-174485.news.dfncis.de


 ha scritto


Newsgroup: it.comp.lang.visual-basic
Titolo: Query con apice

Devo fare delle query relative a nomi di paesi. Però quando incontro nel
paese l'apostrofo tipo san' ecc.. si incazza vb.
Esiste qualche metodo per evitare che mi vada in errore la query e
soprattutto che funzioni ?


Qualche giorno fa, a qualcuno con un analogo problema è stato consigliato
l'uso della funzione Replace().
Ciao!
-- 
Esteban
www.seber.it
Questo post è stato scritto con bit riciclati.


L'unico che non si incazza è proprio Vb, visto che lui la query al provider
la passa senza problemi.
E' proprio il provider (o il dbms, dipende) che si incazza.
Duplica l'apicino e sei a posto.
Ciao
Alberto

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con combobox

Ho una combobox dove ci sono dei dati risultatnti da una query(nome dei
contati); vorrei che nella combo ci fosse, ma nn visualizzato, l'ID del
contatto.
Come posso fare ?

 ha scritto nel messaggio
news:9vkvhh$b7j$1...@fe2.cs.interbusiness.it...

Denis... hai postato la stessa domanda una settimana fa e Luca dormio ti ha
anche risposto...
comunque, nel ciclo con il quale riempi il combo, metti:
combo1.additem rs("testo da visualizzare")
combo1.itemdata(combo1.newindex)=rs("id del contatto")
questo naturalmente se l'id č un long... se č una stringa allora devi creare
un array dimensionato come il numero dei contatti ed associarlo al combo...
aloha
--
Stefano Zamboni (
sz...@libero.it
)
--------------------------------------------------------------
"If Bill Gates had a dime for every time a Windows box crashed...
...Oh, wait a minute, he already does."

hai ragione,ma ho Outlook express mi ha cancellato la risposta :(
cma grazie ancora :)
Newsgroup: it.comp.lang.visual-basic
Titolo: Compressione DB access da VB

Esiste la maniera di impartire il comando di compressione ad un DB Access da
VB? Io normalmente uso DAO.
Ciao.

 
DBEngine.CompactDatabase "path1.mdb",path2.mdb"
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!


Il fatto di definire due path suppone che debba assegnare un nuovo nome al
DB?


Gia', poi cancelli e rinomini ... (access lo fa in maniera trasparente)
ciao
	maxx
P.S. Attento a questa operazione perche' se succede qualcosa di strano 
perdi il db ( i miei utenti di solito, stanchi di attendere 20 secondi 
la compattazione perche' devono andare a pranzo, spengono il pc!)


Thanks

Newsgroup: it.comp.lang.visual-basic
Titolo: Creazione archivi

Ciao a tutti. Premetto che inizio adesso la programmazione su Visual
Basic.
Vorrei capire come fare a prendere il contenuto di alcuni TextBox e
scrivere un
archivio, possibilmente binario. Successivamente, avrei bisogno di
prendere
le stesse informazioni scritte su di un archivio e leggerle.
Grazie a tutti.

...

...manuale di tecniche di accesso ai database...
o visto che sei all'inizio un bel "Programmazione di Visual Basic 6.0" dove
trovi di tutto un pò...
Mai disdegnare i manuali!!!!
ciao!

...

...manuale di tecniche di accesso ai database...


...

...manuale di tecniche di accesso ai database...


Nel frattempo perň puoi provare:
inserire un controllo data (in Dao o Ado scegli tu), inserire una textbox in
un form e, nelle proprietŕ, scegliere datasource, impostargli il controllo
scelto (ad esempio Adodc1). A questo punto il textbox č collegato al db,
perň devi gestire l'upload del recordset e il richiamo dei dati dal db.
Guarda sulla guida in linea come si usano i controlli data (dao) e Adodc
(Ado).
Ti suggerisco perň di studiare su qualche buon testo perchč dubito che
spiegato cosě tu abbia capito qualcosa. Io ho iniziato con Visual Basic 6.0
ed professional Passo per Passo edito da mondadori. Mi ha aiutato molto.
Ciao

Tutto dipende da cosa devi fare: sappi che comunque non esistono solo i
database, anche se spesso sono la soluzione più comoda, ma non certo la
più funzionale e veloce, in termini di prestazioni... hai parlato di
binario: se vuoi leggere/scrivere un file in binario devi guardarti le
funzioni Open, Close, Get, Put e Seek che ti consentono di fare
praticamente tutto quello che vuoi con i files.
Byez!
Newsgroup: it.comp.lang.visual-basic
Titolo: Tasto ACK

A quale tasto corrisponde sulla tastiera  ACK ???

 A quale tasto corrisponde sulla tastiera  ACK ???
Intendevi forse BACK (Backspace)?
--
Dark Hado
This posting is provided "AS IS" with no warranties, and confers no
rights.

 A quale tasto corrisponde sulla tastiera  ACK ???
vbKeyBack 0x8 BACKSPACE key
*.vbs
'--SendKeys . Questo apre Notepad ed adopera SendKeys per scrivere del testo.
'--Apre il dialogo Salva con nome, mette il titolo, e lo salva.
Dim sh
Set sh = CreateObject("WScript.Shell")
sh.Run "notepad.exe"
'--Il programma ha bisogno del FOCUS.  *Senza nome - Blocco note* e' la caption
 Do Until sh.AppActivate("Senza nome - Blocco note")
 Loop
 sh.SendKeys "Dimostrazione di Sendkeys. Questo file e' stato salvato come Demo.txt in c:\ Documenti."
 sh.SendKeys "%fv"
WScript.Sleep 1500
 sh.SendKeys"{backspace}Demo~"
WScript.Sleep 2500
sh.AppActivate("Senza nome - Blocco note")
 sh.SendKeys "%fe"
set sh = nothing
--
Fosco

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

Vorrei riproporre il mio quesito in quanto non ho avuto risposte, o meglio
la risposta che ho ricevuto non mi č stata molto chiara.
Come faccio, a creare un file .ini che contiene il percorso del mio DB per
poi richiamarlo da codice?Mi potreste fare un esempio per favore?
CIAO A TUTTI E BUONA DOMENICA.

il file .ini si trova nella directory del programma (se vuoi fargli spostare anche quello... ^__^) e si chiama
config.ini; il database si chiama db1.mdb
do
	dove=inputbox "dove cappero hai messo il db???"
loop until dove<>""
open config.ini for output as #1
print #1, dove		'dove= ad esempio: c:\documenti\database\
close #1
Quando devi aprire il db:
open config.ini for input as #1
line input #1, percorso
close #1
set dbase=opendatabase(percorso & "db1.mdb")
Ovviamente, al posto dell'inputbox, usa una common dialog:
imposti tutte le proprietà della commondialog, poi:
do
commondialog1.showopen
loop until commondialog1.filename<>""
set dbase=opendatabase(commondialog1.filename)
Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)

...
Ma questo non è un file "ini" a tutti gli effetti.
Non so se sul sito comune c'è qualcosa per gestirli, e comunque M$ consiglia
di usare il registro in quanto i files ini cadranno presto in disuso (anche
se io preferivo i ini non posso far altro che sottostare a M$ :( )
Per il registro sul sito comune qualcosa c'è anche se non è il massimo.
se a qualcuno interessano i files ini me lo dica che posterò al sito (se già
non c'è) il mio modulo per la gestione.
Ciao.
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Aiuto con Imagelista... .ListImages.Add = errore

Salve,
come da subject, ho un problemino con una imagelist. Ho all'
interno diuna sub questa riga:
   ilsMp3.ListImages.Add , ResMp3,
LoadResPicture(ResMp3, vbResBitmap)
quando la eseguo per la prima volta
non mi da nessun errore, quando poi richiamo la stessa sub, e quindi
rieseguo questa roga di codice mi esce l' errore:
   Errore di run-time
'35602'
   La chiave non è univoca nell' insieme
Ma quale chiave?
ResMp3 non va bene?
Saluti...
--------------------------------
Inviato via 
http://usenet.iol.it

Risolto...


ho un problemino con un programma che sto scrivendo, Questo programma
dovrebbe leggere dei dati da delle textbox, introdurli in una DataGrid e
salvarne il risultato. Questa Datagrid č soggetta a cambiamenti dovuti al
fatto ke il database a cui č collegato, č un sottoinsieme di un database piů
grande : ho un database con delle intestazioni, a seconda delle intestazioni
genera una query che mi visualizza un tot di record (aventi un valore in
comuni).
Dov'č il problema ?
Nello scrivere il prog. tutto ok, tranne x il fatto che non mi permette di
eliminare nessun oggetto presente nella datagrid : non mi permette di
effettuare l'UpdateBatch e quindi scaricare la cache nel database.
Il fatto strano č che perň mi permette di aggiungere record .....
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] cambiare colori a parte di una textbox (o richtextbox)

Devo inserire in una textbox una stringa di colore diverso. come faccio
senza cambiare il colore di tutto il testo contenuto nella textbox (o
richtext)?
Grazie mille
Ale
-----= Posted via Newsfeeds.Com, Uncensored Usenet News =-----
http://www.newsfeeds.com
 - The #1 Newsgroup Service in the World!
-----==  Over 80,000 Newsgroups - 16 Different Servers! =-----

 wrote in message
39255...@corp.newsfeeds.com...


Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi con l'utilizzo dell'oggetto Printer.

Ho fatto una applicazione che utilizza per la stampa l'oggetto printer
(printer.print), anziche' il crystal report.
E' la prima volta che
utilizzo questa modalita', ho installato la mia applicazione su un'altro
computer con windows 98 (anche io lavoro con windows 98), quando eseguo la
stampa si blocca tutto il sistema tanto che devo spegnere fisicamente il
computer, non mi da nessuna segnalazione.
C'e' qualquno che puo' darmi una
mano?
--------------------------------
Inviato via 
http://usenet.iol.it


Se le due stampanti sono diverse c'è la possibilità che stai accedendo ad
una proprietà non suportata dalla seconda stampante, e il driver magari
Bacato ti inchioda il sistema.... di più a sto punto ninzo...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Ridimensionamento controlli

Sembra ormai assodato che il problema dei controlli che si ridimensionano e
non mantengono le dimensioni scelte dipenda dal tipo di caratteri (small o
large) installato sulla macchina.
Esiste qualche soluzione da applicare per rendere indipendente l'applicativo
dal tipo di carattere installato?
Ciao a tutti e grazie
Steama

 wrote in message
news:8vdars$apc$1...@nslave2.tin.it...

Cosi', al volo:
1. tenersi larghi;
2. non disegnare form piene di controlli.
Seguendo queste due regole (free) non ho mai avuto problemi.
Ciao
Aldo

 ha scritto nel messaggio

Newsgroup: it.comp.lang.visual-basic
Titolo: Report Crystal reprt

Ciao a tutti:
anche qualche mese fa ho provato a mandare questo post,
non ho rimediato molto, spero oggi di avere più fortuna:
tramite un programma in Visual Basic 6 
ho una lunga serie di letture di dati che faccio via driver ODBC da AS400
che, opportunamente selezionati m sto attualmente depositando  in Excel
2000.   La procedura non accetta l'aggiornamento ad Excel di Office 2003: 
prima o poi excel lo devo abbandonare, quest'altro anno esce Excel 2007,
non si può continuare con quel metodo.
Successivamente tutti questi dati li mando in stampa.
Sarei comunque in grado di raccogliere i dati in un recordset.
Quello di cui avrei bisogno è di un esempio di come mandare in stampa
questo  recordset   in VB6   usando Crystal Report.
Un'altra buona alternativa è raccogliere i dati in una tabella di Access.
Sono qui favorito perchè mi creo il file di report banalmente con Crystal
Report.
Ma torno al problema  un filino simile: come mando in stampa questo report
dall'interno di Crystal Report?
Grazie
Ciao
Indriano
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Indriano
scusa, non vorrei aver capito male...ma se tu hai Il db access...hai Crystal 
Reports...
come sarebbe come fai a stamparlo dall'interno di Crystal??
Apri Crystal, crei un nuovo report, punti il db nella locazione che gli hai 
assegnato quando lo hai creato,
apri le proprietà, scegli i campi, i raggruppamenti, il layout, definisci la 
stampante
e fai click col pul. sinistro del mouse.. :-))
O forse non ho capito il problema?
Bye
Johnny

Newsgroup: it.comp.lang.visual-basic
Titolo: Creating a custom calendar form

Hello, 
I want to make a calendar form for scheduling of surgery operating
rooms in a hospital which shows in horizontal bar(columns) the
operating rooms and vertical (rows)the times for which a room is
closed. In the blocked box I want to be appeared the name of doctor,
patient and the kind of operation.
All above information are found (room id, patient id, doctor id,
beginning time of surgery, ending time of surgery, kind of operation)
stored in a SQL Server table. The whole aplication's forms have been
constructed in VB.
Do you have any ideas how I can make this form quickly? Is it a good
idea to use Excel and a build a form there which sees data in SQl
server or to make directly a form in VB that sees the SQL Server
table?
Thank you in advance!

 wrote in message
news:42a43c0e.03072...@posting.google.com...

Personally I'd do it in VB using ADO and the Data Bound Grid
Read the data into an ADO recordset and bind the grid to the
recordset
Keith
Newsgroup: it.comp.lang.visual-basic
Titolo: Formato ore,minuti,secondi a due cifre?

Cia a tutti,
ho la seguente tematica: la funzione Hour(Date) mi  restituisce come intero
l'ora corrente.
Se sono le 1 di notte mi restituisce 1.
Come faccio ad avere un'ora sempre a 2 cifre (es. 01)?
Saluti
Mosca


dim oa2cifre as string
ora2cifre=format$(date,"hh")
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

 ha scritto nel messaggio
news:at9ogl$11g4p9$1...@ID-97197.news.dfncis.de...


 ha scritto nel messaggio
news:at9ogl$11g4p9$1...@ID-97197.news.dfncis.de...



guarda che emmexx ti aveva detto di fare una cosa diversa...
se proprio vuoi usare la funzione second devi fare:
? Format$(Second(Now),"00")
Salutoni
Sergio

Newsgroup: it.comp.lang.visual-basic
Titolo: Creare un IDE

Salve,
    cerco un aiuto per capire come poter creare un IDE nello stile VB ma per
uno script che mi sono creato io per l'esame all'università. Il mio prof. mi
ha richiesto di creare una base di IDE nello stile VB. Avete qualche esempio
grazie
Michelangelo

Salve a tutti,
    sono nel pallone più totale!! Come faccio ad emulare il sistema di vb
per la costruzione dell'interfaccia?
Grazie
Michelangelo
-- 
##########################
# Yahoo Messenger: ShineMiku
# Ti aspetto per chiccherare su
# Programmazione, Tecnologie
# Collaborazioni di Lavoro
##########################
Newsgroup: it.comp.lang.visual-basic
Titolo: DHTML

Vorrei un vostro parere sul DHTML. Che ne pensate? Ha un futuro? Ha
dei limiti rilevanti?
Mangiafuoco

dei limiti rilevanti?
hai provato su it.comp.html ?



No, anche perchè questo gruppo di discussione ha migliori requisiti
per rispondere sul dhtml.
Mangiafuoco

per rispondere sul dhtml.
geee ! vuol dire che e' un ng super ! :)
ciao, hal

 per rispondere sul dhtml.
ipotesi azzardata; parlando di _buon_ DHTML s'intende l'utilizzo di
JavaScript, e non di VBScript (supportato solamente da browser MS)
Faber

Faber
Ipotesi? :)
Faber, se posto qui ovviamente mi interessa il VBScript (non l'html,
non il javascript ).
Ciao,
Mangiafuoco

 non il javascript ).
il DHTML è _normalmente_ implementato con HTML e JavaScript (o JScript, per
chi tifa MS); che si possa fare anche con VBScript non lo so (ma credo di
si, visto che te ne interessi  :)), il punto è che se decidessi di
implementare qualcosa in DHTML, lo farei con JavaScript in modo da essere
[quasi] sicuro che funzioni con qualunque browser dell'ultima generazione
(Opera, Netscape, IE)
Faber

 non il javascript ).
A mio parere il DHTML ha un futuro solo se posti su it.comp.lang.javascript
(leggi: "dimenticati VBScript")
--
Princi, 
princ...@programmer.net
----------------------------------------------------------------------
"Tutti sanno che una cosa è impossibile da realizzare,
finché arriva uno sprovveduto che non lo sa e la inventa." A.E.

Faber
Si concordo con te sul javascript,  sarebbe la soluzione migliore
qualora si dovesse sviluppare qualcosa accessibile a una utenza vasta
e non controllabile per quel che riguarda il browser. 
Nel mio caso pero', mi interessa per una intranet in cui si adopera
IE.
Ciao,
Mangiafuoco

 (leggi: "dimenticati VBScript")
dici che se lo dimentica anche ms ? in questo momento il 90% dei browser, a
occhio e croce, lo supportano...
certo, niente e' da escludere. su .net che aria tira al riguardo ?

certo, niente e' da escludere. su .net che aria tira al riguardo ?
javascript
ciao, hal

 javascript
be', java e' il top, lo so benissimo :)

 IE.
se la situazione è questa puoi utilizzare VBScript, non credo che MS lo
abbandonerà tanto presto; ricordati, però, che nel momento in cui vorrai
utilizzare pezzi di codice che hai scritto per realizzare nuove pagine che
andranno sul Web, li dovrai rifare...
tra l'altro, a mio avviso, JavaScript è decisamente più versatile e potente
di VB, per il solo fatto che non c'è distinzione fra variabili e funzioni
(come in Lisp...)
Ciao
Faber

 certo, niente e' da escludere. su .net che aria tira al riguardo ?
beh, credo che M$ punti tutto su C# (non ne so praticamente niente ma non mi
sembra improbabile che ne venga presentata una versione "Script")
Ciao.
