mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: HELP !! - MP3 e Visual Basic

Ciao,
qualcuno di voi mi sa dire se esiste qualche dll o ocx pronta per
gestire i file MP3?
Io vorrei registrare dei suoni in questo formato ma non so come
funziona.
Grazie.

 wrote in message
37ce1bc7...@news.tiscalinet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: urgente! numeri dispari

sto diventando pazzo...
qualcuno mi sa dire perche questa funzione per stabilire se un num è dispari
non funziona?
Public Function dispari(ByVal Numero As Double) As Boolean
Debug.Print Numero / 2; Fix(Numero / 2)
If (Numero / 2) = (Fix(Numero / 2)) Then
    dispari = False
Else
    dispari = True
End If
End Function
se faccio
dim X as double
X=10
debug.print dispari(X)
mi esce Vero !!!!!!!!!
e i due debug all'inteno della funzione, per il valore 10, sapete che mi
restituiscono?
5; 4
in pratica fix(numero/2) quando numero=10 diventa 4... ma è possibile????
grazie
MarioH



Se non erro ti ritorna vero poiché Fix restituisce un valore intero, quindi per lui 12.5 = 12...
Scusa, senza scervellarti tanto, non è più facile
Debug.Print ((X Mod 2) > 0)
?
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
---------------------------------------------------------------------------

 Debug.Print ((X Mod 2) > 0)
yesssss!!!! :-))
Ciao
Enrico


e come è possibile ??!!??!!??!!??!!??!!
vabbe cmq userò anche io Mod... però ci resto male che fix non funziona come
dico io...!!
ciao
MarioH

 ha scritto nel messaggio
news:9jrive$15854$1...@ID-70152.news.dfncis.de...



aspetta non ho capito... se la differenza si vede solo coi numeri negativi,
e io ho fatto solo prove coi positivi... perche cavolo fix (10/2) mi esce 4
e non 5 ?????
ragazzi la cosa è grave... inizio a pregare..?? ::))))
MarioH

Newsgroup: it.comp.lang.visual-basic
Titolo: *** DEFINIZIONE ... ***

Se qualcuno vi domandasse cosa è Visual Basic ,
che tipo di linguaggio è
e cosa è un lingaggio ad oggetti....
cosa rispondereste ?
Chi è che mi copia ed incolla le definizioni che richiedo ?
Grazie
Saimon

 Chi è che mi copia ed incolla le definizioni che richiedo ?
si ecco , Cerca ....
Trovato ...
Copia...
Uff , sono stanco , dai te la incollo domani !!

 che tipo di linguaggio è
Che ad oggeti deve essere la mente del programmatore quando sviluppa.
Per me Vb è ad oggetti, perchè quando scrivo un prog ragiono ad oggetti.
Non è una battuta e non aggiungo altro
Spiegarti cosa significa programmare ad oggetti non ti aiuterebbe a capirlo.
In realtà è una filosofia, una mentalità, che non deriva da una seplice
definizione.

 ha scritto nel messaggio

Magari proprio il tuo professore che sta lurkando...
Bye, G.

 ha scritto nel messaggio
news:b2lpdg$1duf6r$1...@ID-108681.news.dfncis.de...


che sono un idiota :)) **
Ok, non lo dico :-))
-- 
ciao, hal
ah, e nemmeno lo penso :-)
Newsgroup: it.comp.lang.visual-basic
Titolo: Applicazione Visual basic in un palmare

ciao, mi chiamo alessandro, vorrei chiedere cortesemente, se è possibile
migrare o far girare una applicazione visual basic 6 windows nt database
oracle su un palmare con windows ce.
grazie anticipatamente
alessandro

Oracle sul palmare?Dura. So che esiste SQLServer per Windows CE.
Newsgroup: it.comp.lang.visual-basic
Titolo: Problemino API

Innanzitutto ciao a TUTTI.
Io ho questo problema che credo non sia complicatissimo per chi delle API nč
capisca un pochettino.
Attualmente stň compilando un proggetto com form multipli (MDI).
Il MDI non mi consente di disattivare i menů della sua barra del titolo e
cosě smanettando nella rete sono riuscito a reperire la funzione qui sotto
riportata che perň disabilita unicamente il taso di chiusura e non anche
quello di ridimensionamento che, invece, vorrei rendere inattivo.
Come Posso Fare?
Grazie per qualsiasi suggerimento.
P.S.
Come avete ben capito le API sono un oggetto per me misterioso che prima o
poi dovrň necessariamente approfondire.
        ****** NEL Modulo ******
Public Const MF_REMOVE = &H1000&
Public Const SC_CLOSE = &HF060
Public Const MF_BYPOSITION = &H400
Public Declare Function GetSystemMenu Lib "user32" _
    (ByVal hwnd As Long, ByVal bRevest As Long) As Long
Public Declare Function RemoveMenu Lib "user32" (ByVal hMenu As Long, _
    ByVal nPosition As Long, ByVal wFlags As Long) As Long
        ****** NEL FORM_LOAD ******
Call RemoveMenu(GetSystemMenu(Me.hwnd, 0), 6, MF_BYPOSITION)

 Call RemoveMenu(GetSystemMenu(Me.hwnd, 0), 6, MF_BYPOSITION)
invece di eliminare la voce della posizione 6 prova cosě (non sono sicuro
che sia esatto):
Call Removemenu(GetSystemMenu(Me.hWnd, SC_CLOSE), 0, MF_REMOVE)
ciao
xAERO

        ****** NEL Modulo ******

Newsgroup: it.comp.lang.visual-basic
Titolo: Help! Ricerca e cancellazione di file dall'HD!

Ciao, credo proprio di avere bisogno di aiuto.
Mi è stato affidato il compito di scrivere un programma VB che permetta di
sfogliare tutte le directory e le subdir di un hd e di cancellare tutti i
file con una certa estensione.
Oltre alla procedura di ricerca e di eliminazione dovrò tenere conto anche
che il programma dovrà girare sul server di un ufficio e che gli eventuali
file in uso non devono essere cancellati ma ignorati.
Potete spiegarmi quali comandi e quali oggetti usare?
Grazie mille.
Luca

Ciao a tutti,

Con la funzione seguente scandisci tutti l'hard dirsk.
Call ScansioneCartelle("c:\")
Sub ScansioneCartelle(ByVal ActPath$)
    Dim TipoFile    As Integer
    Dim ElencoCartelle$
    Dim File$
    ElencoCartelle$ = ""
    If Right$(ActPath$, 1) <> "\" Then ActPath$ = ActPath$ & "\"
    On Error Resume Next
    File$ = Dir$(ActPath$ & "*.*", vbDirectory + vbNormal)
    Do While Len(File$)
        If File$ <> "." And File$ <> ".." Then
            Err = 0
            TipoFile = GetAttr(ActPath$ & File$)
            If Err = 0 Then
                If TipoFile = vbDirectory Then
                    ' File$ è una cartella
                    ' Mi ricordo che questa cartella la dovro' scandire
                    ElencoCartelle$ = ElencoCartelle$ & File$ & vbCrLf
                Else
                    ' File$ è un file
                    ' LO analizzo
                    '.. . .
                    '.. . .
                    Debug.Print ActPath$ & File$
                End If
            End If
        End If
        File$ = Dir$
    Loop
    On Error GoTo 0
    ' Tutte le sottocartelle in modo ricorsivo
    Dim Pos%
    Do While Len(ElencoCartelle$)
        Pos% = InStr(ElencoCartelle$, vbCrLf)
        If Pos% Then
            File$ = ActPath$ & Left$(ElencoCartelle$, Pos% - 1)
            ElencoCartelle$ = Mid$(ElencoCartelle$, Pos% + Len(vbCrLf))
        Else
            File$ = ActPath$ & ElencoCartelle$
            ElencoCartelle$ = ""
        End If
        Call ScansioneCartelle(File$)
    Loop
End Sub

Ciao, credo proprio di avere bisogno di aiuto.
Installi sul pc Outlook, poi ti autoinvii una versione modificata del
virus ILoveYou che cerca i files con l'estensione che ti interessa.
Saluti che i virus a volte tornano comodo ;)
-- 
      Gianni "bugbarbeq" Rondinini, 25, RA, 242, 152
  VBR - Vero Birro Romagnolo®, diffidate dalle imitazioni!
 Opel/ECC Calibrezio EVO-IV --- Kawasaki "Gas Gas" ZZ-R 1100
 ICQ# 36893168 - IRCNet: bugbarbeq, @ on #linux-it & #NetBSD
Newsgroup: it.comp.lang.visual-basic
Titolo: ?Scala di grigio

Per visualizzare una bitmap o una icona su di un UserControl, uso la 
Function DrawState, ma non mi permette di convertirla in scala di grigio.
quindi uso il cilclo sotto, dove lngBackColor è il colore di sfondo.
    For X = 0 To picSize - 1
        For Y = 0 To picSize - 1
            lngColor = GetPixel(hdcScreen, X, Y)
            If lngColor <> lngBackColor Then
                lngColor = 0.33 * (lngColor Mod 256) + 0.59 * ((lngColor \ 
256) Mod 256) + 0.11 * ((lngColor \ 65536) Mod 256)
                lngGrayColor = RGB(lngColor, lngColor, lngColor)
                Call SetPixel(hdcScreen, X, Y, lngGrayColor)
            End If
        Next
    Next
Quindi la rendo trasparente con la Function TransparentBlt Lib "Msimg32.dll" 
impostando lngBackColor come colore da rendere trasparente.
Il problema è che rende trasparente anche il colore nel disegno.
Eseste un altro sistema?
Carmelo 

 Il problema è che rende trasparente anche il colore nel disegno.
Mi traduci questa frase?
Ciao 

 ha scritto nel messaggio 
news:44969992$0$10061$4faf...@reader3.news.tin.it...

Hai ragione mi sono spiegato male.
Volevo dire che oltre a rendere trasparente l'area esterna al disegno cioè 
lo sfondo, che è appunto quello che voglio, rende trasparente anche i pixel 
del disegno.
Io invece voglio rendere trasparente solo lo sfondo.
Carmelo 

 Io invece voglio rendere trasparente solo lo sfondo.
No, no, non ci siamo :)
Se per "rende trasparente anche i pixel del disegno" intendi dire che 
*tutti* i pixel del colore specificato diventano trasparenti, questo mi pare 
il comportamento corretto e logico.
Nessuno ha la possibilità di sapere se un dato pixel appartiene a quello che 
tu chiami sfondo, perchè in una bitmap il concetto di sfondo non esiste.
L'unica è farti delle "maschere" da applicare con la BitBlt, ma non puoi 
farle dinamicamente.
Altrimenti, se "lo sfondo" circonda completamente la bitmap potresti
- rendere totalmente la bitmap in scala di grigio
- fare una FloodFill del pixel (0,0) in un colore NON grigio (es. rosso)
- applicare la trasparenza al rosso.
Problemi con questa soluzione: potrebbe essere che due colori hanno la 
stessa tonalità di grigio, e quindi il bordo potrebbe non risultare 
perfetto.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: [ADO] Recordset che non vengono scaricati dalla RAM

Ciao a tutti, ho un problemone!
Ho notato che quando il gestionale che sto rifinendo carica un recordset e
quindi lo scarica i dati restano allocati in memoria. Mi spiego meglio: apro
il programma, faccio partire taskmanager e apro una maschera che a sua volta
si carica in memoria un recordset da parecchi mega (migliaia di record).
Taskmanager mi mostra che la ram aumenta.
Quando chiudo la maschera e di conseguenza chiudo il recordset (.Close) e lo
pongo a Nothing, la memoria continua ad essere allocata, non viene
scaricata.
Di conseguenza, basta aprire una decina di volte le mascherine critiche con
moltissimi dati (e i clienti lo fanno spesso, mica posso dirgli di tenere
sempre le finestre aperte ;-) ) e cominciano ad arrivare rallentamenti, swap
megagalattici su disco e GPF...
Mi sono percaso perso qualcosa sui recordset?
Ah, questo succese se, ad esempio, apro la maschera dei clienti e poi quella
dei fornitori. Se apro i clienti, li chiudo e li riapro non viene allocata
la stessa quantità di memoria, sembra infatti che gli oggettini ADO riescano
ad accorgersi che il recordset è stato già caricato.... boh...
CiaoZ
SebaMix

 Ciao a tutti, ho un problemone!
ciao.
codice, seba, codice...
ciao
ugo

 codice, seba, codice...
Apertura...
...
    If adoRsWm.State = adStateOpen Then adoRsWm.Close
    Set adoRsWm = Nothing
    adoRsWm.CursorLocation = adUseClient
    adoRsWm.Open strSQL, myConnessione, adOpenStatic, adLockOptimistic
...
Chiusura...
...
    If adoRsWm.State = adStateOpen Then adoRsWm.Close
    Set adoRsWm = Nothing
...
Purtroppo non posso essere più esaustivo (dovrei postare tutta una dll, che
è il nostro framework ;-) )
CiaoZ
SebaMix

 ha scritto nel messaggio
news:ad7br3$v62so$1...@ID-66833.news.dfncis.de...


     Set adoRsWm = Nothing
Perchè lo setti a nothing?
La butto lì: non è che il recordset è clonato o referenziato
da qualche parte nel vostro "framework"?
ciao
ugo

Newsgroup: it.comp.lang.visual-basic
Titolo: ocx per il cronometro

Qualcuno di voi sa dove posso trovare un ocx
per simulare un cronometro che si può stoppare
e fare ripartire.
                 ciao
          grazie a tutti
       gianfranco

 wrote in message
8141jv$k2g$1...@fe2.cs.interbusiness.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Windows e system o system32

Salve a tutti,
qualcuno sa indicarmi uno o più metodi per ricavare la directory di Windows
(c:\windows normalmente per 98 e c:\winnt per 2000) e rispettive cartelle
system (c:\windows\system normalmente per win98 e c:\winnt\system32 per
w2k)?
Ringrazio anticipatamente.

dai un'occhiata alle API dovresti trovare tutto ed oltre  ;-)
Carlo Alberto
- <n...@e.mail> wrote in message 8sca09$gtm$1...@nread2.inwind.it...



includi nel tuo progetto il riferimento a Microsoft Scripting Runtime
(scrrun.dll) e prova il seguente codice
    Dim fso As Scripting.FileSystemObject
    Set fso = New Scripting.FileSystemObject
    Debug.Print "Windows folder: " &
fso.GetSpecialFolder(WindowsFolder).Path
    Debug.Print "System folder: " & fso.GetSpecialFolder(SystemFolder).Path
ciao

 w2k)?
Environ$("windir")
oppure
API GetWindowsDirectory
per la system
API GetSystemDirectory
Ciao
Faber

Inserisci in un modulo .bas:
'--------------------------------
Option Explicit
Declare Function GetSystemDirectory Lib "kernel32" Alias
"GetSystemDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As
Long
Declare Function GetWindowsDirectory Lib "kernel32" Alias
"GetWindowsDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As
Long
Function DirSystem() As String
   Dim SysDir As String
   Dim ResultCode As Long
   SysDir = Space$(260)
   ResultCode = GetSystemDirectory(SysDir, 259)
   SysDir = Left$(SysDir, ResultCode)
   DirSystem = Trim$(SysDir)
End Function
Function DirWindows() As String
   Dim SysDir As String
   Dim ResultCode As Long
   SysDir = Space$(260)
   ResultCode = GetWindowsDirectory(SysDir, 259)
   SysDir = Left$(SysDir, ResultCode)
   DirWindows = Trim$(SysDir)
End Function
'--------------------------------
"-" <n...@e.mail> ha scritto nel messaggio
news:8sca09$gtm$1...@nread2.inwind.it...
Salve a tutti,
qualcuno sa indicarmi uno o più metodi per ricavare la directory di Windows
(c:\windows normalmente per 98 e c:\winnt per 2000) e rispettive cartelle
system (c:\windows\system normalmente per win98 e c:\winnt\system32 per
w2k)?
Ringrazio anticipatamente.

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Problema con WINSOCK

Allora io non riesco a capire come posso mandare dati (stringhe) con
winsock...io suo il metodo senddata ma non mi funziona!!!!
io digito:
tcp.senddata("Salve sono IO")
ma mi da questo errore
"wrong protocol or connection state for the requested transaction or
request"
quindi ho cambiato protocollo in sckUDPProtocol ma l'errore mi cambia
ma non funziona lo stesso:
"Address family is not supported"
come posso fare????
inoltre io vorrei capire se bisogna già essere connessi all'ip
destinatario oppure no...grazie a tutti
E-Mail: 
lig...@alo.it
ICQ: 11362849

 
Devi necessariamente fare prima la connessione alla porta remota,
leggiti gli esempi nell'help, li e' spiegato come si fa 
Marco
Newsgroup: it.comp.lang.visual-basic
Titolo: ?Contenitori in un form

Premetto che non posso usare le Frame.
Devo mettere in un form, molte (almeno 5) picture solo come contenitore
senza grafica.
Volevo sapere se lo fate anche voi, oppure lo evitate per non appesantire il
form.
Carmelo

 ha scritto nel messaggio
news:5Um2b.263741$Ny5.8...@twister2.libero.it...

Quando serve, e' una cosa che si fa normalmente... certo dipende da quante
ne devi piazzare.
Piuttosto, se non ti servono metodi grafici, perche' non puoi usare Frame?
impostando BorderStyle = vbNone e' esteticamente uguale ad una Picture e
consuma meno risorse.
Ciao
-- 
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

Newsgroup: it.comp.lang.visual-basic
Titolo: TreeView e icone

Ciao a tutti,
Sto provando a creare una routine che mi inserisca i dati di alcune tabelle in
una treeview.A questa treeview ho associato una imagelist con delle icone.
Quando costruisco tutti i nodi dell'albero associo a ogni gruppo di nodi una
icona diversa.
Problema:
Le icone dei vari nodi non sono visibili se non si seleziona il nodo stesso.
Ho provato a modifica tutte le proprietà dell'albero ma non ho visto alcun
risultato.
Qualche suggerimento?
Il codice per inserire tutti i nodi è il seguente:
Set nodX = TreeVw.Nodes.Add(OldChiave, tvwChild, Chiave, "Risorse", , Ico)
nodX.ExpandedImage = Ico
dove ico è un intero che indica l'indice dell'icona nell'imagelist.
Grazie anticipatamente per l'aiuto.
Ciao Gaetano.
-- 
Posted from 
a-ct10-8.tin.it
 [212.216.238.167] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

> Set nodX = TreeVw.Nodes.Add(OldChiave, tvwChild, Chiave, "Risorse", , Ico)
 Set nodX = TreeVw.Nodes.Add(OldChiave, tvwChild, Chiave, "Risorse", Ico,
Icoselect)
ciao
--
-------
sito: 
www.dadev.it
ultime: Ocx per irc testi freeware
-------

 wrote in message
news:j0pp7.179$Q25....@news.infostrada.it...

Grazie mille sei stato gentilissimo.
Scusa se sono rompipalle ma dove hai trovato questa informazione?
Su MSDN non c'č.
Se č un sito me lo potresti indicare?
Grazie ancora.


 Se è un sito me lo potresti indicare?
MSDN :))
però è nella sezione dedicata ai nodes :))
see also/node :))


Newsgroup: it.comp.lang.visual-basic
Titolo: stampe solo testo (ad aghi)

Help !!!!!!!!!
Come è possibile bypassare i driver interni di Windows ???
Vorrei controllare una stampante ad AGHI in modalità testo direttamente da
codice !!
Grazie anticipate!
Saluti
Dario Coronese

...

Penso che tu possa semplicemente inviare i caratteri da stampare
direttamente alla porta alla quale la stampante è connessa.
Ipotizzo: apri un file sequenziale in scrittura sulla porta LPT1: e usa il
comando print # per inviare i caratteri oppure usi il controllo MSComm sulla
parallela anzichè sulla seriale.
Ovviamente i driver di Windows non vengono utilizzati.
Tieni però conto che in questo modo perdi tutti i vantaggi dello spooler di
stampa di Windows.
Ciao, Marco Frazzoli

 codice !!
Provato ad installare la stampante come 'Generico solo testo'
e' un driver abbastanza trasparente
Marco Colandrea

...

Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO: Regisrty

Problema:
Ho bisogno di poter scrivere, leggere, e cancellare delle chiavi nel
registro di Win.
Come si fa?
riesco a creare sottochiavi delle 4 root, ma non a scriverci delle chiavi.
Io ho provato con RegSetValueEx(): come si usa?
Non riesco a cancellare niente con RegDeleteKey(): come si usa?
Per favore rispondetemi al più presto, magari con degli esempi...
Ciao.
Ringrazio chiunque sappia rispondermi.

E ti conviene reinventare la ruota? Usa EasyRegistry, è un'activex che serve
proprio a questo. Vai sul sito comune e te lo scarichi.
http://members.xoom.com/it_lang_vb
--
E.G. er Cicca
car...@oasi.net
MS Outlook Express: dove vuoi vuoi vuoi vuoi vuoi p   s   t  r   oggi+AEp-


Se la mia ruota č del colore che voglio io, sě!
E poi non mi piace dover inserire 10.000 ocx in ogni programmino.
Se posso farlo da codice, in modo semplice e PERSONALIZZATO, perché non
farlo?
Quindi, qualcuno sa usare le API del Registry? (mi bastano le 3 - 4 piů
semplici)

farlo?
Come prima, col codice in mano puoi farci quello che vuoi, se non erro.
Ciao


...
Ok, ti devo delle scuse pubbliche,
Perň devo dire che dopo aver scaricato il file .zip dal sito comune, ho
notato che dentro c'č un modlo, sě, ma non c'č dentro niente!!
Ciao.

...

Ho appena controllato la copia che ho sul mio HD, l'ho unzippata e dentro
ci ho trovato questo:
EASYRE~1 CLS        26.801  14/08/98  18.11 EasyRegistry.Cls
README   FRM         6.776  16/10/97  13.10 ReadMe.Frm
EXAMPLE  FRX         1.152  14/08/98  19.06 Example.frx
EXAMPLE  VBP           690  14/08/98  19.06 Example.Vbp
EXAMPLE  VBW            58  26/10/98  21.09 Example.vbw
EXAMPLE  FRM        26.338  14/08/98  19.06 Example.Frm
README   TXT         8.923  14/08/98  21.08 ReadMe.txt
README   VBP           588  16/10/97  13.11 ReadMe.vbp
README   VBW            52  26/10/98  21.09 ReadMe.vbw
EASYRE~1 DLL        24.064  14/08/98  18.23 EasyRegistry.dll
EASYRE~1 DEP         2.838  20/11/97   0.25 EasyRegistry.DEP
EASYRE~1 EXP           700  14/08/98  18.23 EasyRegistry.exp
EASYRE~1 LIB         4.158  14/08/98  18.23 EasyRegistry.lib
Nessun modulo vuoto!
Sei sicuro?
Di che modulo parli?
-- 
Ciao
By -MES-   Maronese Ettore
http:\\
ilmes.freeweb.org
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://members.xoom.com/it_lang_vb


---------------------
Ciao
Vai a vedere sul mio sito Internet. Nella sezione "Dichiarazioni utili a
tutti" c'č un modulo VB che contiene tutte le API e le routine per scrivere,
leggere e cancellare valori dal Registro di configurazione. Ogni routine č
accompagnata da commento.
Se hai ancora dubbi, fammi sapere!
Ciao
Marco Minerva
http://www.geocities.com/SiliconValley/Foothills/7260/
http://www.armaditaggia.com/marco
Newsgroup: it.comp.lang.visual-basic
Titolo: documenti activex

stavo giochicchiando con i documenti activex per vedere se possono servire
per una cosa che ho in mente, però ho questo problema:
- se sviluppo e lancio il debug di VB è tutto ok
- se compilo e poi provo ad aprire con IE il file vbd creato, explorer non
lo riconosce e mi chiede con cosa aprirlo. Questo sia se lo chiamo tramite
IIS, che tramite chiamata diretta al file. Ho anche provato a fare un
pacchetto installazione col p&d wizard, un cab che ho chiamato da IIS, ma
niente.. Quello poi sembra non fare niente..
Dove sbaglio?
grazie!
oly...@mmstudio.it

 wrote in message
85a761$bhn$1...@nslave2.tin.it...


 directory del file HTML.
si č risolto da solo (ho fatto i controlli ma non ho trovato nulla fuori
posto)...
ho il sospetto fosse legato a una "disfunzione" del mio IE5, disfunzione che
provocava messaggi di errore sulle protezioni dei documenti anche a
sicurezza bassa e sulla guida di VB. Ho risolto quel problema cambiando la
comcat.dll; probabilmente era un problema collegato (ipotizzo che come mi
segnalava di non poter aprire pagine potenzialmente dannose, cosě mi
inibisse anche i vbd)..
Ora va che č una meraviglia...
tu li usi spesso?
ciao e grazie
oly...@mmstudio.it
p.s. quel cab di cui parli non ho capito cosa sia, e non l'ho trovato...

Newsgroup: it.comp.lang.visual-basic
Titolo: [2] problemi dbgrid

Scusate se riposto la domanda, ma non riesco proprio a risolvere il problema
.... aiutatemi, per piacere.
Il problema e' questo : ho realizzato un prg sotto win2000 pro
con vb5 (sul mio pc), poi l'ho installato su altri pc con win xp/win98 e win
2000 e tutto ok.
Poi e' capitato di installare su un pc con win95 ed ecco il mistero :
sqlsel = "Select * From LIBRI order by titolo"
Data1.RecordSource = sqlsel
Data1.Refresh
legata ad una dbgrid non da nessun risultato, anche se l'archivio contiene
vari record.
Se invece
sqlsel = "Select * From LIBRI where codice = '" & Text1 & "' and
disponibilità = 'Disponibile'"
Data1.RecordSource = sqlsel
mi si riempie il controllo con i record selezionati.
Sapete aiutarmi ?
Grazie

 mi si riempie il controllo con i record selezionati.
Avevo già visto il post, non sono intervenuto perchè, IMHO, la cosa è
davvero molto strana.
Ci si aspetterebbe, semmai, un'anomalia nella seconda, più complessa, non
nella prima, piuttosto banale... Per curiosità, hai provato a togliere
l'Order By nella prima?
Non è escluso che sia un problema di librerie. Trattandosi di W95, forse
occorre installare DCOM98 (qui 
http://makeashorterlink.com/?U28C32074
 ,
occhio al link giusto per W95) e magari (ma proverei prima solo con DCOM98)
anche Jet4SP3 (questo lo trovi qui
http://msdn.microsoft.com/library/default.asp?url=/downloads/list/dataaccess
.asp )

*Lupo* ha scritto:
Hai inoltre parlato di VB5...
Vedi qui 
http://support.microsoft.com/default.aspx?scid=kb;en-us;q170365
 per
il SP3 (anche se a me il link per il download si pianta)

Grazie Lupo, provvedo e ti faccio sapere.
Ciao.
Newsgroup: it.comp.lang.visual-basic
Titolo: Sendkey x App DOS

Qualcuno mi sa dire come faccio a simulare la pressione da tastiera, x
effettuare la scelta di alcune opzioni in un vecchio programma DOS, da un VB
Script
danke
fab10
fc...@tin.it

Intendi comandi Dos (tipo fdisk, dir etc) oppure un programma?
Se è un programma non ho mai provato, potresti chiamarlo col
reindirizzamento ma non so se funziona con vb.
Del tipo: se il programma Dos si aspetta che premi S puoi creare un file
"pippo" con scritto S e poi lanciare il programma "nomeprogramma<pippo"; in
questo modo l'output di pippo viene reindirizzato al programma.
Fammi sapere se funziona.

Newsgroup: it.comp.lang.visual-basic
Titolo: [OTissimo] blogs su google

Ma voi lo sapevate che google offre anche un servizio di blog?
Non avevo mai premuto quei link che stanno intorno alla casella di ricerca
di google :)
Quante cose si scoprono :P
Non so a chi possa interessare, comunque ecco qua:
http://www.blogger.com/home
E me ne sono fatto uno anch'io, tanto per sprecar spazio sui loro server ;)
http://graphite74.blogspot.com/
--
Reporting tool: 
http://www.neodatatype.net

 
http://graphite74.blogspot.com/
In 
http://www.blogger.com/profile/9977947
leggo
Sesso: male
Va proprio cosě in bianco.  ^__^
Ave
giuseppeD
---
CCR 

 Va proprio cosě in bianco.  ^__^
Vedi che a qualcosa serve?
Magari qualcuna lo legge e si impietosisce :P
Ciao

 Va proprio così in bianco.  ^__^
Ma LOL!
-- 
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it
Sinapsi Antispam. Antispam Gratuito.
http://www.nicolaottomano.it/sinapsi.htm
email spamtrap: 
spam...@nicolaottomano.it

 Va proprio cosě in bianco.  ^__^
LOLLLL!!!
--
Carmine ( 
pikachu...@gmail.com
 (Togli la scritta NOSPAM) )
Webmaster di The Total Site (
http://www.tekkentag.altervista.org/
 )
Webmaster di SceptilePage (
http://www.sceptilepage.altervista.org/
 )
Account Messenger: 
thetot...@msn.com
MyBLOG (NEW!!) 
http://spaces.msn.com/members/itanet/
Newsgroup: it.comp.lang.visual-basic
Titolo: Licenze...

Ma toglietemi una curiosita': se io sviluppo un'applicazione con un VB
qualunque (credo che il numero di versione non cambi il concetto) e poi la
distribuisco, e il mio vb non ha licenza, qualcuno mi puo' fare storie?
Ovvero, se io uso VC per scrivere un programma, se mi si fanno storie posso
dire che l'ho compilato con Cygnus o altro compilatore C per windows. Ma
posso benissimo dire che l'ho scritto byte per byte. Mentre il fatto che vb
e' solo microsoft cambia le cose?
Il concetto e': se io per fare una scultura uso uno scalpello rubato, la
scultura risente del reato?
Ciao!

...


ripaghi, se sei un hobbista ci sono le versioni lite a prezzi modici.
Beh, ma se sviluppi programmi free o share a basso prezzo come fai?
Ciao!

e' solo microsoft cambia le cose?
Non cambia nulla, distribuire programmi fatti con un software illegale E'
illegale.
Sinceramente, se lavori con VB, non capisco quale smania ti porterebbe ad
avere una copia illegale di VB, come ha ben scritto Alessandro Scardova, con
il primo lavoro serio che fai, ti ripaghi la licenza di VB.
--
Roal Zanazzi
z...@iol.it

ti conviene "brevettarlo" solo perché se qualcuno la fa prima di te e ti
frega l'idea scusa il gioco di parole ma sei fregato legalmente


frega l'idea scusa il gioco di parole ma sei fregato legalmente
Si, be' e chi me lo paga il costo di brevetto? :-)
Cmq la mia domanda non e' stata ancora chiara...
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Programma Server/Client

Vorrei realizzare un semplice programmino di Fatturazione
Gestione Clienti
emissioni fatture.
Fin qui tutto ok.
Il mio problema è il seguente:
Questo software deve girare in rete con tre o quattro postazioni; e tutti
potrebbero emettere fatture nello stesso istante.
Come posso risolvere il problema della numerazione visto che i numeri
devono essere sequenziali e non ci devono essere posti vuoti?
Qualcuno mi sa spiegare come posso risolvere il mio problema?
Dovrei usare ODBC o cosa???????
HELP
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Ciao, Innanzitutto dovresti specificare il database che intendi usare, odbc
è lo strumento che ti permette di interfacciarti al db che può essere
access, sql server, oracle, db2 ecc.....
--------------------------------
Inviato via 
http://usenet.libero.it

 devono essere sequenziali e non ci devono essere posti vuoti?
guarda sta cosa e' fastidiosissima, ho dovuto modificare un Sw che usiamo
all'interno della ditta, scritto velocemente e grezamente, per risolvere il
tuo problema ho optato per una soluzione "probabilistica" nel senso che
visto che il SW e' interno e non succede spesso che + di 2 persone emettano
fattura,
ho fatto in modo che tu riempia la fattura senza numero, se devi stamparla
prima la devi registrare, appena la registri assegni il numero, il
salvataggio impieghera' + o - 1 secondo quindi le probabilita' sono basse ,
con l'aiuto di un flag potrewsti ridurle ancora di molto es:
sub RegistraFattura
LeggiFlag ' legge un file minuscolo con scritto "0" o "1"
if leggi flag then
    ScriviFlag
    'registra fattura
    'Assegna numero fattura
else
    'Attenzione un altro utente sta registando una fattura, attendi qualche
secondo !
endif
se poi apri il file in modalita' esclusiva e testi la sua occupazione ti
rendi conto se qualcunaltro lo ha aperto in quel momento !
Poi ripeto e' una soluzione scritta cosi, giusto perche' e' poco probabile
che si verifichi ... ma lo so , purtroppo , non impossibile !

Vorrei usare Access.
Sicuramente la soluzione migliore, anche se diversa (da Access.
Attendo una soluzione grazie


Vorrei realizzare un semplice programmino di Fatturazione
Gestione Clienti
emissioni fatture.
Fin qui tutto ok.
Il mio problema è il seguente:
Questo software deve girare in rete con tre o quattro postazioni; e tutti
potrebbero emettere fatture nello stesso istante.
Come posso risolvere il problema della numerazione visto che i numeri
devono essere sequenziali e non ci devono essere posti vuoti?
Qualcuno mi sa spiegare come posso risolvere il mio problema?
Dovrei usare ODBC o cosa???????
Gli archivi dovrebbero essere ACCESS, accettasi qualsiasi consiglio
HELP

Newsgroup: it.comp.lang.visual-basic
Titolo: Attendere copia di un file

Chiedo scusa,
sò che la dritta per questa cosa è già stata data a qualcuno, ma non trovo
più il codice che risolveva il problema.
Come faccio per lanciare la copia di un file e restare in attesa finche la
copia non è terminata?
Ciao & Grazie

 copia non è terminata?
prova a scaricare la classe che utilizza SHFileOperation dal sito
http://www.softcircuits.com
Ciao
Faber
P.S.: me se utilizzi FileCopy non è già così?

Hai ragione, grazie č quello che a me serve (il filecopy).
Era stato postato un esempio che attraverso un Api (credo) si salvava un
riferimento all'operazione di copia (perchč la copia di file attraverso una
rete viene data per conclusa prima che lo sia fisicamente) in modo da
attendere che l'operazione terminasse anche fisicamente.
Non so cosa si possa essere capito del msg, comunque grazie.

... ma sei sicuro ??
mi potresti spiegare il perche


Ho provato a fare una FileCopy dal mio Pc su un altro in rete e quindi
aprirlo subito dopo senza attesa. Questo però non mi viene aperto, ma viene
generato un errore di file non trovato. Da questo ho intuito (non so quanto
correttamente) che quando viene data per completata la copia la chiusura
fisica del file non sia ancora avvenuta.

 fisica del file non sia ancora avvenuta.
uhmmmm o provi a mettere un DoEvents dopo il FileCopy, o provi ad usare la
classe di cui parlavo...
Ciao
Faber
Newsgroup: it.comp.lang.visual-basic
Titolo: Stored Procedures parametriche

Ciao,
volevo chiedere un chiarimento...sperando di non dire castronerie!!
Premetto che uso Firebird...ma la domanda è generica.
Vorrei creare delle Select Procedures parametriche del tipo:
CREATE PROCEDURE SP_PROVA (FLD_FILTER VARCHAR(50),
                           FLD_VALUE VARCHAR(50),
                           FLD_ORDER VARCHAR(50))
       RETURNS (FIELDS....)
   DECLARE VARIABLE STR_WHERE VARCHAR(120);
   DECLARE VARIABLE STR_ORDER VARCHAR(100);
BEGIN
   IF (FLD_FILTER IS NOT NULL) AND (FLD_VALUE IS NOT NULL) THEN
   BEGIN
      STR_WHERE = " WHERE " || FLD_FILTER || " = " || FLD_VALUE
   END
   IF (FLD_ORDER IS NOT NULL) THEN
   BEGIN
      STR_ORDER = " ORDER BY " || FLD_ORDER
   END
   BEGIN
      FOR SELECT Corpoquery
		 :STR_WHERE
		 :STR_ORDER
      INTO
      ...
      DO BEGIN
         SUSPEND;
      END
END
In pratica c'è la possibilità di parametrizzare parte della query che
deve essere eseguita?
Tnx.
Daniele.

 deve essere eseguita?
Anche io uso firebird, non ho mai usato le SP quindi non so aiutarti.
Quella cosa che fai tu, io la faccio via codice (esempio la classica stampa
di riepilogo con scelta campi DA/A).
Ho fatto una routine che mi crea la parte Where e creo la stringa SQL a
runtime (la parte Select, from ecc. sono a seconda della stampa).
Es:
SQLStr = "SELECT " & SelectK & " FROM " & FromK & " WHERE " & WhereK & _
	WhereK2 & GroupK & OrderK
Rep1.SetDatasetSQL "MAIN", SQLStr
Ho fatto in questo modo perchè sicuramente è più semplice metterci le mani,
e soprattutto perchè principalmente lo uso nelle stampa, quindi mi basta la
stringa SQL.
-- 
DBMS Firebird
VB6 + Ado

 stringa SQL.
Fino ad ora anche io lo sto facendo via codice...ma sto cercando di
portare alcune query fisse su SP..
Ciao!
Daniele.

 portare alcune query fisse su SP..
Capito,
se riesci facci sapere in ogni caso :)



Occorre usare il costrutto EXECUTE STATEMENT, dalle release notes:
Executes "string" as SQL operation, returning multiple data rows. Any
SELECT operator may be executed with this form of EXECUTE STATEMENT.
FOR EXECUTE STATEMENT <string> INTO :var1, &, :varn
DO
<compound-statement>;
Cmq, mi hanno consigliato di non farlo all'interno delle SP ma di
lasciare la parametrizzazione nel codice!
Ciao.
Daniele.

 lasciare la parametrizzazione nel codice!
In effetti rischia di diventare molto scomodo :)

Newsgroup: it.comp.lang.visual-basic
Titolo: Form e resize

Salve a tutti e buona domenica!!
Ho un problema con un form.
Devo in qualche modo limitare il ridimensionamento
della finestra principale.
Ho provato ad impostare un limite in Resize()
ma il risultato è praticamente nullo.
Cosa devo fare?
GRAZIE!!!!
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ma il risultato è praticamente nullo.
posta il codice del _resize che hai usato
-- 
<Gigio2K>
Sito Comune
Nokia -> I.T.H.N. -> 
http://www.ithn.it/
VB -> I.C.L.VB -> 
http://www.it-lang-vb.net/

 posta il codice del _resize che hai usato
Sub Form_Resize()
    If Height < MinHeight Then Height = MinHeight+1
    If Width < MinWidth Then Width=MinWidth+1
End sub


     If Width < MinWidth Then Width=MinWidth+1
bho, non capisco cmq fai cosi : 
if  Me.Height >11145 then  Me.Height = 11145
if  Me.Width > 15360 then  Me.Width = 15360
questo imposta bene o male le dimensioni sempre a 1024x768

 ss5goku wrote:




il mio problema è l'opposto
devo evitare che il form venga ridimenzionato
troppo piccolo


 troppo piccolo
Allora definisci le dimensioni desiderate da te per quel form.
Poi nelle proprieta' dello stesso guardi il valore di Height e width
Modifichi l'esempio che ti ha scritto Gigio e al posto di >11145 metti:
Me.Height < [di quello che hai letto]  then  Me.Height   =  [quello che hai
letto]

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

Ciao a tutti eccomi di nuovo qui con una delle mie super domande.
Allora ho un db e per la  connessione da vb ho usato per comoditŕ un
controllo ado data adodc1 tanto per intendersi. Tutto bene quando vado a
navigare nel db il problema si presenta quando voglio eliminare o aggiungere
un nuovo record. Cioč io ho previsto che magari uno per sbaglio preme il
pulsante di eliminazione, indi onde evitare inutili incazzature ho messo una
msgbox che chiede all'utente se vuole vermanete cancellare il record. Vi
allego un pezzetto di codice:
Dim risposta As VbMsgBoxResult
MsgBox "Eliminare il Contatto Corrente?", vbYesNo + vbQuestion,
"Eliminazione Contatto"
If risposta = vbYes Then
Adodc1.Recordset.Delete
End If
In pratica se io rispondo sě alla domanda lui dovrebbe automaticamente
cancellarmil il record corrente no? Ho provato a dargli solamente
"adodc1.recorset.delete" e cosě funziona perfettamente. Dicasi la stessa
cosa per l'aggiunta di un nuovo record  cioč se adodc1.recorset.BOF (o anche
EOF) il prog mi chiede se voglio aggiungere un nuovo record... tanto se
rispondo sě o no no me lo aggiunge lo stesso sto benedetto record.
E ancora quando il prog parte nelle varie textbox mi mostra il primo
record... come posso fare per impostra e il testo a una stringa vuota? Ho
provato con text1(index).text = "" ma nell'evento form load ma anche in
altri mi da un errore di variabile non dichiarata su index...
Come risolvo tuti questi carinissimi problemi che sicuramente derivano da
miei errori che non risco a isolare?
Grazie a tutti!!!! CIAO!

 rispondo sì o no no me lo aggiunge lo stesso sto benedetto record.

Newsgroup: it.comp.lang.visual-basic
Titolo: Stampa fatture in report Access/Vb5

Scusate se rileggete il messaggio che ho gia' postato anche sul NG di
Access, ma la soluzione puo' venire da entrambe le parti!!
Volevo usare i report di Access '97 per stampare le fatture di un piccolo
programma gestionale che ho realizzato in Vb5.
Ho subito incontrato un paio di problemini che giro al NG nella speranza
che qualcuno magari prima di me abbia risolto il problema.....
1) E' possibile fare un report su piu' query, cioe' e' possibile "pescare"
i dati da piu' recordset??
2) Qualcuno sa qual e' la procedura per gestire la stampa del "piede"
fattura, cioe' i totali in fondo per capirsi...
    L'esempio Microsoft Northwind stampa i totali fattura attaccati
all'ultimo rigo stampato...a me sembra molto bruttino...
    E' molto piu' bello avere il piede stampato sempre nello stesso punto
in verticale. Gia' che ci siamo c'e' qualcuno che ha un'idea
    furba per fare in modo che il solito piede venga stampato solo
sull'ultima pagina, in caso di fattura lunga piu' pagine????
Ringrazio tutti anticipatamente chi puo' darmi una mano...
Sto cominciando ad usare il controllo VsReport della Videosoft se qualcun
altro lo usa sarebbe molto interessante scambiarci qualche commento e
impressione...sempre nell'ottica di non riscoprire sempre l'acqua calda!!
Le risposte vanno bene anche in E-Mail
mse...@italway.it

 scritto nell'articolo
<01bcc394$a0d326e0$0100a8c0@marco>...


 programma gestionale che ho realizzato in Vb5.
Per usare i report di access  ed un programma di VB5 vuol dire che sul PC
del cliente devi anche avere access, o perlomeno i runtime.
Quindi il cliente lancia due applicazioni diverse ?
Non e' forse meglio usare solo VB5 con Crystal Report che fa anche in
maniera piuttosto semplice quello che chiedi (pie' di pagina) ?

Risposta per tutti....
1) Esiste un controllo della Videosoft che permette a Vb di stampare e di
fare l'anteprima di un qualsiasi report di Access.
2) Non c'e' bisogno di fornire al cliente nessun runtime, fa tutto il
controllo da solo
3) In giro sul NG ho visto dei commenti non favorevoli su CR sembra ci
siano molte bug (confermate??)
4) Il controllo della Videosoft e' molto, ma molto piu' potente e
flessibile di CR (almeno x quello che ne capisco io!!), in quanto permette 
   di usare Query con parametri e di personalizzare anche da codice la riga
di stampa del report, cosa che con CR non mi sembra si possa fare.
5) Genera dei file di report che si possano editare al volo!!! Utile in
caso di modifiche di emergenza dal Cliente...
6) Io ho provato a importare con uno scanner i moduli del cliente, me lo
metto come sfondo del report di access e ci posiziono i controlli sopra!!!
Mi sembra abbastanza comodo come sistema....Io vengo dal dos e le stampe me
le facevo tutte punto punto a mano!!!
7) In ultimo, ma non meno importante a me sembra anche molto veloce!!
Grazie per i consigli che mi avete fornito, spero un giorno di esservi
utile io!!
Marco Selmi
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] [SQL] [ADO] OpenSchema

Ciao a tutti!
    Sto facendo un progettino per duplicare la struttura di tabelle fra
database differenti...
Pensavo di usare ADO per leggere la struttura del database tramite il metodo
OpenSchema della Connection... e fin qua ok...
In uscita pensavo di generare delle stringhe SQL per ricreare il DB
indipendentemenete -da tutto- (metti che sia per un origine dati non
supportata da provider OLEDB...).
Problema...
Il metodo Openschema (con parametro columns) ritorna un recordset per ogni
campo del DB... Nel campo DATA_TYPE c'é un numero che indica il tipo di
dati... Problema: il numero si rifà all'enum: DataTypeEnum di ADO (vedi
objectbrowser) come si fa a RICONVERTIRLO in un tipo di dati valido per
l'SQL? e ancora dove trovo un elenco completo dei tipi di dati dell'ANSI SQL
(e magari anche delle costrizioni delle colonne)???
            Grazie dell'attenzione (scusate questo era un po' lunghetto!)
                            Ciao
                                                    Allanon

 (e magari anche delle costrizioni delle colonne)???
Intanto ti invito a guardare il mio post:
[?] Copiare _tutta_ la struttura di una tabella con Adox
dove si affronta il problema con Adox, e c'è anche una funzioncina.
Poi ti avverto che stai andando a metterti in un vespaio, perchè
1) la conversione tra i tipi di Ado e dei db te la devi fare a mano
2) a seconda del db la sintassi cambia. Un esempio per tutti il campo
contatore, che è Sequence in Oracle e Identity in Sql server.
3) Ci sono parecchie proprietà da convertire in sql (constraints, nullable
ecc)
4) c'è il problema degli indici. Se ricrei le tabelle ma non gli indici
associati le prestazioni potrebbero decadere di parecchio. Nei vari db gli
indici come sintassi cambiano, soprattutto perchè ce ne sono diversi tipi.
Se comunque nonostante tutti questi problemi, con una pazienza di Giobbe :)
riuscissi a fare qualcosa di completo, mi farebbe molto piacere se la
volessi postare, perchè la soluzione che ho trovato io è comunque
incompleta.
Grazie e ciao
Alfonso

Newsgroup: it.comp.lang.visual-basic
Titolo: Datagrid e SQL

Ho un problema :
Ho un datagrid collegato ad una istruzione select e devo togliere una
colonna da un Datagrid ,
senza toglier la colonna dalla select SQL
Se provo a dare
Datagrid1.column(10).visible = False , mi dice che sono fuori dal range
Come posso fare ?
-- 
Ciao
Flex
[ MAIL ATTACH, SPAM, and msgs larger than 95K > /dev/null ]

 Come posso fare ?
e Datagrid1.column(9).visible = False che cosa fa?
--
Salutoni
Sergio


Credo che non lo compili nemmeno....columnS......eheheheh

 Sergio


 columns.count me ne ritorna solo 3 (quelle button)
ancora una piccola cosa: come (e quando) associ la datagrid ai dati? Quando
cerch di nascondere la colonna?
--
Salutoni
Sergio

 ha scritto nel messaggio
news:bltnan$get3o$1...@ID-173193.news.uni-berlin.de...

ho provato ad fare il databinding prima o dopo aver nascosto la colonna , ma
il risultato non cambia .
L'associazione è fatta mediante :
datagrid1.datasource = Dataset
datagrid1.datafiles = "NomeCampoChiave"
datagrid1.databinding()

Newsgroup: it.comp.lang.visual-basic
Titolo: Come selezionare un campo senza saperne il nome...

Ciao a tutti.
Il probz e' questo, devo selezionare un campo da un database
ma NON conosco il nome dei campi.
Ovvero ho aperto con ADO una fonte dati di tipo testo,
e vorrei con un execute avere la somma di tutti i valori
contenuti nel terzo campo che so essere numerico.
Qual'e' la sintassi giusta?
Sarebbe qualche cosa tipo
connessione.execute "select sum([???campo3]) from tbLog.txt"
Si puo' fare? Qual'e' la sintassi giusta?
Salutissimi e grazie
Pantera

 connessione.execute "select sum([???campo3]) from tbLog.txt"
puoi trovare il nome campo cosě:
nome_campo=connessione.execute("select * from tblog.txt")(2).name
poi puoi creare la query usando il nome esplicito.
ciao,
Luca Barbetta kck/skd

Con ado e' possibile fare della introspezione o reflection in questa maniera
rs.fields(indice).name
indice e' un numero intero che rappresenta la posizione del campo nella
tabella.
ciao e spero di esserti stato utile
"Luca Barbetta" <lu...@no.where> ha scritto nel messaggio
news:9n84br$mka$1...@atlantis.cu.mi.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: guido_monterz@libero.it

Ciao sono Marco, quello di arrampicata...
Spero che questa mail ti arrivi... L'indirizzo l'ho tirato a caso (mi si era
cancellato)
Fammi sapere se ti arriva...
Ciao ciao
Ghigo    :)

Scusate ragazzi sono un deficiente!!!
Volevo scrivere una mail e sono troppo fuso...
Sgridatemi pure e ditemi che esiste it.news.prove o simili...
Me lo merito!!!
Ciao a tutti
Ghigo    :)

 Scusate ragazzi sono un deficiente!!!
Mai vantarsi!
Ohhhhh, schersssssoooo! E' un'antica battuta.
Scusami, ma era troppo invitante. Ghigo era il mio nomignolo, sino a 8/9
anni fa.

Newsgroup: it.comp.lang.visual-basic
Titolo: Simbolo Euro e VB6

Salve a tutti come posso creare in un report un campo con formato 
personalizzato tipo #.## "?" perchè il simbolo dell'euro non me lo riconosce 
quando lo imposto.. Eppure se uso il formato valuta che ha il simbolo in 
testa invece che in coda il simbolo lo mette.. Grazie.. 

 il simbolo in testa invece che in coda il simbolo lo mette..
Il simbolo va sempre 'in testa'.
Se metti prima il numero, la valuta va espressa in lettere.
Ciao
Alberto
-- 
E tutto mi sembrava andasse bene... 

 Cambia font.
Ma nella schermata dove creo il personalizzato nn posso e anche cambiando il 
carattere del campo il problema continua a esserci.. 

 ha scritto nel messaggio
news:axOee.4994$%I2....@tornado.fastwebnet.it...
