mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO URGENTE QUERY SQL IN VB

LA SEQUENTE QUERY IN SQL SERVER FUNGE ORA LA DEVO SCRIVERE IN VB
ECCO LA QUERY:
select * from azienda,fatture,anagrafica_clienti where fatture.fattura_n =
TextCodice and anagrafica_clienti.id_codice_cliente = TextCliente
ora in vb??????
e quest'altra query
select * from articoli where codice articolo between TextInizioCodice and
TextFineCodice
come devo fare?????
aiuto grazie
SCilla

 wrote in message
news:bBsO6.21209$iC1.7...@news6.giganews.com...


SCilla
--------------------------------
Inviato via 
http://usenet.iol.it
 

Scusa ho sbagliato una cosa prima perchè i segni di maggiore e minore vanno
inclusi tra le virgolette e me l'ero dimenticato:
query2 = "select * from
articoli where codice_articolo >= " & Me.TextInizioCodice & " and
codice_articolo <= " & Me.TextFineCodice
Ciao.


Newsgroup: it.comp.lang.visual-basic
Titolo: Comandi per database

Salve a tutti approfitto della vostra gentilezza per l'ennesima volta!!!
Avrei bisogno un'informazione: quali sono i comandi per dire a un programma
vb di andare a scrivere dati in un database?Come faccio a dire a un
programma vb di far scegliere all'utente una cartella da condividere e di
inserire i dati presenti nella cartella in un database?E ultima cosa come
faccio a cercare qualcosa in un database e collegare la cosa trovata
all'utente che, avendo questo progs nella cartella condivisa e quindi
inserito nel database, permette il download se disponibile???
Grazie mille
Ciao Zero0c00l
P.S. Il mio vero nome è Luca

 wrote in message
NLmx7.17396$g42.3...@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Confusione DataGrid VB6

Un saluto a tutti
Causa notti insonni sull'uso di datagrid vorrei chiedervi se esiste
una guida, il piu completa possibile, sull'accesso ai dati (ACCESS)
con adodc e come gestire la datagrid in modo avanzato (siti internet, 
newsgroup librei ecc.)
Sto diventando matto sul trovare una regola generale per associare
l'adodc ad access, se farlo in progettazione o via codice, e se le
faccio via codice devo dichiarare una variabile as database aprire la
connessione ecc. o semplicemente
Adodc3.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=C:\DatiA.mdb;Persist Security Info=False"
Adodc3.RecordSource = "SELECT marca, prodotto FROM GestioneDAti order
by Prodotto"
Per quanto riguarda la datagrid popolarla all'avvio è un gioco da
ragazzi ma se creo dei bottoni con istruzioni sql per farle
visualizzare devo chiudere e riaprire il form. Anche ridiminsionare le
singole colonne a mio piacimento è un bel grattacapo.
Naturalmente mi rendo conto che chiedere la soluzione a tutti questi
problemi mi sembra una richiesta esagerata ma ho tanta voglia di
imparare ma non riesco a trovare le fonti!
Vi prego HELP!!!
Grazie  1000 anticipate

 imparare ma non riesco a trovare le fonti!
informazioni di questo genere vanno cercate nei libri.
-- 
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo

Newsgroup: it.comp.lang.visual-basic
Titolo: Disegnare nuvola di punti...

sono un programmatore amatoriale di VB6.
avrei bisogno di disegnare migliaia di punti in uno spazio 3D per poi 
visualizzarli da diverse posizioni.
ho sentito parlare delle DirectX e delle openGL. qualcuno può aiutarmi ad 
iniziare?in realtà mi serve esclusivamente disegnare punti e stabilire punti 
di vista differenti.
Grazie a tutti 

 Grazie a tutti
Per iniziare con le DirectX
http://www.vbexplorer.com/VBExplorer/vb_feature/nov2000/d3d_Index.asp
Bye by SixaM 8-]
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Grazie a tutti
Guarda allora 
http://www.vb-helper.com/tut4.htm


 ha scritto nel messaggio 
news:4379d6d8$0$16211$4faf...@reader3.news.tin.it...
sistema la data del PC grazie!!

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

scusate l'ignoranza.....
come faccio a far lanciare un progratta di tipo nomeprogramma.exe , premento
un pulsante in un form di visual basic 5 ????
grazie a tutti

 grazie a tutti
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
Newsgroup: it.comp.lang.visual-basic
Titolo: [vb2005 express sql express] Problemi di aggiornamento dati tramite checkbox

Da una form di dettaglio, che si apre cliccando su un datagridview, tento di 
aggiornare un campo con dati boolean tramite l'evento checkboxchanged:
Me.Validate()
Me.TblArticoliBindingSource.EndEdit()
Me.TblArticoliTableAdapter.Update(Me.DsCatalogoDataSet.tblArticoli)
L'aggiornamento avviene perņ solo se effettuo due volte la variazione della 
checkbox:
es:
selezione, deselezione, selezione (aggiorna a true)
deselezione, selezione, deselezione (aggiorna a false)
selezione (rimane false)
deselezione (rimane true)
Come risolvo il problema? Grazie.


Ciao a me stesso,
ho risolto il problema lavorando sull'evento click del checkbox.
In questo modo, di fatto, il click rappresenta in ogni caso un cambiamento 
di stato alla pari di ChechedChanged (che avevo erroneamente chiamato 
checkboxchanged).
Ma cosě tutto funziona perfettamente.

Newsgroup: it.comp.lang.visual-basic
Titolo: Winsock esempi...

Salve a tutti.
Avrei voglia di sperimentare un po' il comando Winsock
del VB5.
Sapete indicarmi qualche sito dove reperire doc e/o
programmi di esempio?
Grazie per l'aiuto
Stefano
Albonett...@MailCity.com
Get your FREE E-mail at 
http://mailcity.lycos.com
Get your PERSONALIZED START PAGE at 
http://personal.lycos.com
--
Posted from 
fes.whowhere.com
 [209.1.236.79]
via Mailgate.ORG Server - 
http://www.mailgate.org

programmi di esempio?
Sulla documentazione online ci sono due piccoli esempi abbastanza chiari;
uno usa TCP/IP l'altro UDP

 
 
Grazie

Newsgroup: it.comp.lang.visual-basic
Titolo: Buffer al posto di un file di appoggio.

Ho un file di testo, da questo devo selezionare solo delle righe in base a
dei criteri. Per ora tramite un routine seleziono le righe che mi
interessano le copio in un file di testo di appoggio e poi lo stampo.
    Invece del file c'e' un modo per metterle in un buffer(quindi piu
veloce) per poi stamparlo, un sorta di file "virtuale".
Grazie.

...



Potresti copiarle nella ClipBoard.
    Clipboard.SetText Righe$
Ciao
By -MES-   Maronese Ettore
http://ilmes.freeweb.org
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://www.murialdo.it/it_lang_vb
Newsgroup: it.comp.lang.visual-basic
Titolo: Chiamare un cliente al telefono

Un signore mi dice: io ho i miei clienti nella rubrica su Outlook, 
cliccco su uno e parte la chiamata al telefono, senza che debbe 
comporre il numero, ed io prendo la telefonata in cuffia.
 
Mi chiedo: sarebbe possibile replicare una cosa del genere in vb6?
Da dove bisogrerebbe partire? Grazie per ogni info
 
-- 
Greg
 
 


Per la parte di outlook passo,solo per chiamare un munero con un modem PSTN
usando i comandi AT avevo postato un esempio in una discussione anni fa:
 
http://goo.gl/SbuzJE
 
 
il link non � pi� raggiungibile, lo trovi qui_
 
https://dl.dropboxusercontent.com/u/2370367/Dial.zip
 
 
 
--
ciao
  Stefano

 ha scritto nel messaggio
news:526186e4$0$23114$
4faf...@reader2.news.tin.it
 

http://msdn.microsoft.com/it-it/library/7x7cdt5c.aspx
 
 
VB5/6:
PhoneNumber$ = "(123)456-7890"
Open "COM1:" For Output As #1
    Print #1, "ATDT" & PhoneNumber$ & Chr$(13)
Close #1
 
 
-- 
-> G.Chiappori
www.chiappori.it
 
www.chiappori.com
 
 
 

Il 23/10/13 10.42.21 GbC ha scritto:

Grazie Gbc, ma mi serve qualche info im piu; cosi come è nn riesco a 
farlo funzionare. Nessun  segno, nè in immediata, nè in cuffia
 
-- 
Greg

Newsgroup: it.comp.lang.visual-basic
Titolo: immagine dentro un file exe

Come si puo' inserire un immagine dentro un file eseguibile senza portarsi
dietro il file?
Ciao e grazie
and...@tin.it

...

in un picture box nascosto

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

Non trovo nessun news che si occupi di sql7 quindi provo a chiedere a voi.
Sapete se ne esiste uno?
Ho il seguente errore nel Registro di SQL Server ma non riesco ad
interpretarli:
Log space info for tran 0:13438300 in database 7
LogRecs= 13 Used= 1304, Rsvd= 9265, SysUsed= 0
LogRecs= 25 Used= 2064, Rsvd= 0, SysUsed= 21364
12931, ShortComp= 12859, TotalUsed= 23428, Short%=54.9
Grazie a tutti in anticipo per l'aiuto
Ciao Andrea
--------------------------------
Inviato via 
http://usenet.libero.it

 voi. Sapete se ne esiste uno?
microsoft.public.it.sql (italiano)
comp.databases.ms-sqlserver (inglese)
Ciao
Alberto
--
E non so se avrò gli amici a farmi il coro,
o se avrò soltanto volti sconosciuti,
canterò le mie canzoni a tutti loro
e alla fine della strada
potrò dire che i miei giorni li ho vissuti...

comp.databases.ms-sqlserver (inglese)
Su it.comp.software.database 
si parla _anche_ di sql7 etc.
Stefano "HappyMan" (Lago Maggiore - NO)
--
Personal Web 
http://www.sgr.info
Email happyman69 (at) 
libero.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Vb & Excel !!!!!!!!!!!!!!!!

Qual'è il comando per posizionare al centro, a destra o sinistra un dato in
una cella?......o meglio in una colonna?
io uso questo ma non sembra funzionare....grazie mille!!
obfLavoro.Columns("C:H").HorizontalAlignment = xlCenter

> Alessandro Maggio:

Attiva il registratore macro poi impartisci i comandi che vorresti far
eseguire alla macro, quindi ispeziona il codice cosi` ottenuto.
Nel caso particolare, avendo precedentemente selezionato le colonne "C:H",
otterresti:
    Option Explicit
    Sub Macro2()
    '
    ' Macro2 Macro
    ' Macro registrata il 30/01/2001 da <...>
    '
    '
        With Selection
            .HorizontalAlignment = xlCenter
            .VerticalAlignment = xlBottom
            .WrapText = False
            .Orientation = 0
            .AddIndent = False
            .ShrinkToFit = False
            .MergeCells = False
        End With
    End Sub
La parte che ci interessa e`:
    .HorizontalAlignment = xlCenter
apparentemente uguale a quanto hai scritto tu. Diverso e`, invece, l'oggetto
alla cui proprieta` "HorizontalAlignment" viene assegnato il valore della
costante di Excel "xlCenter".
Infatti "Selection" restituisce un oggetto di tipo "Range". Bastera` quindi
che a "Selection" sostituiamo il range le cui celle desideriamo allineare,
nel caso in esame tutte quelle delle colonne da "C" a "H" del foglio di
lavoro:
    obfLavoro.Range("C:H").HorizontalAlignment = xlCenter
Ora premi F2 per attivare il "Visualizzatore oggetti", seleziona la libreria
"Excel" e scorri i nomi delle classi alla ricerca di "Columns". Non c'e`.
Perche' non e` una classe. Che sara` mai? Digita:
    columns
come "Testo da cercare" (E premi il pulsante col binocolo). Fra le tante
voci che appaiono ci interessano quelle in cui la parola compare da sola:
    Excel Application Columns
    Excel Range       Columns
    Excel Worksheet   Columns
Se le selezioni vedrai che sono definite come *proprieta`* delle classi
Application, Range e Worksheet. Una proprieta` che restituisce un oggetto
Range (intervallo). Quindi un intervallo di un intervallo. Un intervallo
particolare: tutte le celle della colonna o delle colonne di un dato
intervallo. Ecco perche' la scrittura:
    .Columns("C:H")
apparentemente non funziona.
    <un certo intervallo>.Columns.Range("C:H")
-oppure-
    <un certo intervallo>.Columns("C:H")
vuol dire: dato <un certo intervallo>, prendine le intere colonne quindi di
queste solo quelle dalla terza (C) fino all'ottava (H). E, chiaramente,
perche' "funzioni" occorre che <un certo intervallo> possegga almeno otto
colonne. Sperimenta il codice seguente:
    Sub Test()
      With ActiveSheet.Range("K1:T1")
        Debug.Print .Columns.Range("C:H").Address
      End With
    End Sub
Nella finestra immediata otteniamo:
    $M:$R
Perche'?
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------
Newsgroup: it.comp.lang.visual-basic
Titolo: Enable grigi

E' possibile che i caratteri dei campi resi non disponibili con enable
= false, si vedano con colore normale anziche' con un grigio poco
leggibile?
Grazie!
k...@vi.ats.it
*****************************************************
    --- Marco Giannini ---
 
k...@vi.ats.it

 
Usa la proprieta' locked=True per impedire le modifiche e non far cambiare colore alla TextBox.
Oppure se sono tanti e diversi metti tutti i controlli dentro una picturebox e poi disattiva quella.
Ciao
Riccardo
Newsgroup: it.comp.lang.visual-basic
Titolo: 00 00 .. -> FF FF ..

In una casella di testo ho il valore 00 00 00 00 00 00 00 00 00 00
Se scrivo un codice che aggiunga un'unita esadecimale al valore della
casella fino ad arrivare
a FF FF FF FF FF FF FF FF FF FF; quanto tempo impiegherà il computer a
svolgere quest'operazione?
Rispondetemi in e-mail
Grazie

 wrote in message
8lm56g$an3$9...@nslave1.tin.it...


 wrote in message
news:8lm7q4$6pm$1...@nslave2.tin.it...


conti, ovviamente approssimati  per difetto.
Fantastico... come hai fatto?
Ciao

 wrote in message news:8lmkpo$t77$1...@nslave1.tin.it...


 Gordon Rattray Taylor <La società suicida>
I magnamerda: razza inestinguibile? (PMF)
--
Ciao.
Maurizio
--------
?SPQR(C)
 X

Newsgroup: it.comp.lang.visual-basic
Titolo: spy++

ciao a tutti
sto le ggendo un libro su hooking & subclassing solo che per aver una 
buona comprensione dell'argomento dice che bisogna avere "spy++" ora ho 
cercato su internet ho trovato tante parole ma un link dove scaricarlo 
non lo ho trovato ( dovrebbe essere free) qualcuno mi saprebbe dare una 
mano come venire in possesso di questo spy++ oppure se � free e me lo 
vuole mandare sarebbe gentilissimo grazie

"fortunato"

http://www.freevbcode.com/source/EliteSpy.zip
da: 
http://www.freevbcode.com/ShowCode.asp?ID=3456
--
Fosco

 > buona comprensione dell'argomento dice che bisogna avere "spy++"
spy++ dovrebbe essere nativo di vb6
"C:\Programmi\Microsoft Visual Studio\Common\Tools\SPYXX.EXE"
--
Fosco

grazie , trovato


Newsgroup: it.comp.lang.visual-basic
Titolo: RID bancario

Salve a tutti,
è possibile reperire in rete qualche esempio di codice sorgente per formare
un tracciato x rid bancario?
grazie
Roberto

un tracciato x rid bancario?
Trovi tutti i tracciati che ti servono sul sito dell' abi: 
www.abi.it
-- 
hth, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: Bug o errore mio?

Con Vb5 e Vb6 mi capita il seguente inconveniente:
all'interno di una SSTab vado ad inserire due combo box una
parallela all'altra. Quando mando in esecuzione apro la
prima cbo in altro e la tendina mi copre quella piu' bassa.
Una volta che scelgo l'item e la tendina scompare sparisce
la cbo sotto.
Il fatto e' che la cbo c'e' ancora ed infatti se io clicco dove dovrebbe
essere ecco che riappare.
Questo succede anche se un nuovo form mi oscura un bottone,
esso scompare per magia quando lo chiudo (sempre su una SSTab).
Sbaglio io o e' un baco di VB?
Bye





 Bye
Cia
Riccardo

Con Vb5 e Vb6 mi capita il seguente inconveniente:
all'interno di una SSTab vado ad inserire due combo box una
parallela all'altra. Quando mando in esecuzione apro la
prima cbo in altro e la tendina mi copre quella piu' bassa.
Una volta che scelgo l'item e la tendina scompare sparisce
la cbo sotto.
Il fatto e' che la cbo c'e' ancora ed infatti se io clicco dove dovrebbe
essere ecco che riappare.
Questo succede anche se un nuovo form mi oscura un bottone,
esso scompare per magia quando lo chiudo (sempre su una SSTab).
Sbaglio io o e' un baco di VB?
Bye





Ciao,
č vero č capitato anche a me. Piů che di un bug
si tratta di una ca....ta.
Prova che il tab strip. Anche se č piů noioso da usare in quanto non vi si
possono incollare controlli direttamente sopra (deve usare una picture con i
controlli per ogni
tab), non ha quei difetti.
Bye-Bye
Newsgroup: it.comp.lang.visual-basic
Titolo: Convertire jpg in pdf

Salve a tutti,
ho la necessit� di convertire "n" (dove n � un numero piccolo... max 5) 
immagini in pdf per poi fare il merge con un documento padre. Al momento 
faccio in questo modo ma mi consuma molte risorse, tant'� che la cpu mi 
arriva quasi all'80% e mi chiedevo se ci fosse un modo piu' snello:
Public Function ElaboraJPG(srcPath As String, Riferimento As String, dstPDF 
As String)
Dim objPDF
Dim objJPGin
Dim objJPG
Dim objPDFout
Set objPDFout = CreateObject("AcroExch.PDDoc")
Set objJPGin = CreateObject("AcroExch.AVDoc")
Set objJPG = CreateObject("AcroExch.PDDoc")
ok = objPDFout.Open(srcPath & "\" & Riferimento & ".pdf")
DoEvents
If Not ok Then GoTo FINE
myName = Dir(srcPath & "\" & Riferimento & "*.jpg")
Do While myName <> ""
    objJPGin.Open srcPath & "\" & myName, ""
    Set objJPG = objJPGin.GetPDDoc
    objJPGin.PrintPagesSilent 0, -1, 2, 0, 1
    objPDFout.InsertPages objPDFout.GetNumPages - 1, objJPG, 0, 1, 0
    If objPDFout.Save(1, srcPath & "\" & Riferimento & ".pdf") = False Then
        MsgBox "Impossibile salvare"
    End If
    objJPG.Close
    objJPGin.Close 1
    myName = Dir
Loop
objPDFout.Close
On Error Resume Next
objJPG.Close
FINE:
Set objPDFout = Nothing
Set objJPGin = Nothing
Set objJPG = Nothing
On Error GoTo 0
End Function
come noterete dal codice, le jpg hanno il nome uguale al pdf al quale vanno 
aggiunte, fatta eccezione che il nome file finisce con _1, _2 etc
Che ne pensate? Avete altre soluzioni?
Grazie 1000
A. 

 Che ne pensate? Avete altre soluzioni?
PDFSam fa il merge dei file da riga di comando.
Io trasformo i singoli file in PDF con una stampante virtuale tipo BullZip
o PDFCreator.
http://groups.google.it/group/it.comp.lang.visual-basic/msg/e011d1aecc388248?hl=it
Parti da questo eventualmente per vedere se ti va bene.

"Andrea [Work]" <andrea.isw...@gmail.invalid> ha scritto nel 
messaggio news:fwviyz0h2lg7.12...@40tude.net...

Grazie Andrea, anche io tempo fa avevo fatto qualcosa con PDFCreator, ma non 
so se guadagno in tempo e risorse utilizzate... Acrobat lo devo per forza 
instanziare per la ricerca del testo all'interno dei pdf, e se dovessi 
utilizzare PDFCreator dovrei, aprire le immagini con shellexecute, impostare 
pdfcreator come stampante di default e stampare.... boh... adesso faccio una 
prova e vedo
Grazie 1000
A.
Newsgroup: it.comp.lang.visual-basic
Titolo: Oggetto LIST

Sara' un problema banale, ma non ho trovato cosa devo usare.
Sto usando un oggetto lis con la proprieta' checkbox, per fare venire
insomma i quadratini di selezione a X ( o a V ) ma non so come capire
alla fine quali voci sono state segnate. Come si usa allora il
controllo ?
Ciao !
°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°
 -----------Federico Emanuele Galli----------
 ----------Visual Basic's Programmer---------
 
 Sideralis Programs (Visual-Basic and Delphi)
 
http://www.geocities.com/colosseum/loge/2151
°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°
                 Trust no ONE.
Per rispondermi via E-Mail togli STOPSPAMMERS.
Vai al NG it.comp.sideralis ! Quando sara' creato...

controllo ?
Diciamo che hai una ListBox con stile checkbox con n item nella lista. Devi
semplicemente scorrere tutti gli item dal numero 1 al numero n e per ognuno
devi controllare se la proprietà Selected è False o True:
La listbox si chiama lst
ReDim ar(0 To 0) As String
Dim x as Long
Dim t as Long
For t= 0 To lst.ListCount - 1
    If lstFile.Selected(t)= True Then
        ReDim Preserve ar(0 To x)
        ar(x) = lstFile.List(t)
        x = x + 1
    Else
        '
    End If
Next t
In pratica si riempie un array chiamato ar() con le voci selezionate
(stringhe). Se invece ti interessano gli indici crea un array di long invece
che di string e salvaci dentro i valori che troverai con ListIndex.
Complimenti alla Microsoft, così sì che si implementa un controllo in
maniera lineare!!! troppo difficile implementare un'altra proprietà array
come List (chiamiamola SelectedItems) che contenesse gli elementi
selezionati?
Ciao,
Domenico

selezionati?
Questo me l'ero chiesto anche io ! Cavoli, Diversi controlli hanno la
proprieta' Selected e questo qui proprio no. Grandioso veramente.
Ciao.


Newsgroup: it.comp.lang.visual-basic
Titolo: cd installazione visual basic 6.0

come molti di voi hanno detto, per l'installazione di MSDN è necessario un
secondo CD, vi risulta che sia possibile scaricare msdn library da qualche
sito? Anche visual studio 6.0a non risulta installato perchè è sul secondo
cd di msdn.
ringrazio per le risposte già ricevute.

sito?
Usa la tua copia pirata e, per favore, non rompere piu'.
-- 
hal

 Usa la tua copia pirata e, per favore, non rompere piu'.
micolas te la sei cercata!!!

 ha scritto nel messaggio
news:bc727l$g4gtj$1...@ID-106271.news.dfncis.de...


 che non mi sono ritornati totalmente. Tolgo il disturbo
Guarda non prendertela ma mi sa che e' peggio che tu li abbia prestati che
comprarli al marocco ! ^_^
Newsgroup: it.comp.lang.visual-basic
Titolo: Vedere se c'è un file

Salve vorrei eseguire un programma che appena si avvia, controlla se esiste
il file "conf.exe",
.se non esiste va al form1
.se esiste va al form2
Solo che non so controllare se esiste un file o no, e soprattutto vorrei
farlo all'avvio!
Ringrazio anticipatamente.

 .se esiste va al form2
Ecco un metodo:
Public Function FileExists(FullPathAndFile$) As Boolean
    On Error Goto ErrHandler
    Call FileLen(FullPathAndFile)
    ErrHandler:
    If Err = 0 Then FileExists = True
End Function
Ciao
--
Timothy Redaelli

Ciao,
Devi far partire l'applicazione da un modulo MAIN anzichè da un form
(proprietà di progetto) e poi nel mai scrivi il seguente codice...
If Dir("C:\pippo\conf.exe")="" Then
    'Non esiste
    form1.Show
Else
    'Esiste
    form2.Show
End If
Byez
Tango

 Devi far partire l'applicazione da un modulo MAIN anzichè da un form...
Non è strettamente necessario, basta fare la verifica all'interno
dell'evento "Load" del primo form; se il file esiste si esegue "show.form2"
e di seguito "Unload  Me" (ovvero form1, che lo sta eseguendo).
In questo modo si evita di creare e caricare un ulteriore modulo (il MAIN,
appunto) solo per questo scopo.
st...@hotmail.com

 appunto) solo per questo scopo.
non è permesso eseguire l'unload me di un form nel suo evento load.
in questo caso la soluzione migliore è proprio un modulo, in quanto, se il
file non esiste, non avendo caricato alcuna form, è sufficiente un end per
terminare il programma.
ciao, assa.

 non č permesso eseguire l'unload me di un form nel suo evento load.
Non mi risulta. E' uscito un decreto legge? :-)))
Prova anche tu direttamente dall'IDE e vedrai che funziona cosě come ho
suggerito!
st...@hotmail.com


Utilizza la funzione DIR

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

Esistono da qualche parte documentazioni che vadano al di lą dell'help di
VB, siti ad esempio...
Grazie.
Tiziano.

VB, siti ad esempio...
Guarda tra i miei links quelli marcati con "tutorial" o "tips & tricks":
spesso ci sono informazioni non presenti (o mal spiegate) sulla guida VB.
Ciao
--
-
MIX (VB5SP3)
post...@yahoo.com
80 links ai siti VB
http://space.tin.it/computer/gaais
http://www.tempolibero.com/user/mix/
 (alternativo)
-

http://members.xoom.com/it_lang_vb

Newsgroup: it.comp.lang.visual-basic
Titolo: Domanda da principiante

Qualcuno di voi mi saprebbe dire come si fa ad aprire una cartella in VB
??(esattamente come quando ci clicco sopra due volte ! )
Grazie mille a tutti quelli che mi aiuteranno

 wrote in message
news:X2ef5.44539$sE5.4...@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] è un bug di vb?

Provate a scrivere un file sul blocco note in questo modo: scrivete varie lettere e fate invio due
volte. Poi scrivete ancora. Chiudetee salvate  il file e tentate di aprirlo con l'istruzione 
open  "miofile.txt"for input as #1
e poi siccome ci sono tre righe nel file creato col blocco note allora...
line input #1, miavar1
line input #1, miavar2
line input #1,miavar3
Alla seconda riga a me dice: Input oltre la fine del file. Perchč? eppure una riga vuota dovrebbe
assegnare il valore null. Che ne dite?

 ha scritto nel messaggio
news:3b9362e5...@news.inwind.it...


On Mon, 03 Sep 2001 11:07:21 GMT, 
s.a...@inwind.it
 (Salvo Aiola)
wrote:

Ho fatto esattamente come hai descritto, ma senza alcun errore.
Sorry

Il Mon, 03 Sep 2001 13:04:56 GMT, 
bun...@libero.it
 (Giovanni TB) non avendo niente di meglio da
fare, pigiando a caso sulla tastiera, scrisse:

E' vero. In effetti quello che ho scritto si trovava all'interno di altro codice in un prg e deve
avermi tratto in inganno. Scusate l'errore

 Alla seconda riga a me dice: Input oltre la fine del file. Perchè? eppure


 wrote in message
3b9362e5...@news.inwind.it...

Intendi dire un file tipo questo?
AAAA
BBBB
CCCC
a me ha sempre funzionato perfettamente... ma il file l'hai proprio creato a
mano? non e' che ti ci e' finito dentro qualche carattere "svizzero"?
Ciao
--
Luca Dormio
luca....@tin.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Errore - C Runtime Error R6016

Ricevo questo errore
C Run-time Error R6016
qualcuno sa dirmi cos'è
Reno

...


...


Newsgroup: it.comp.lang.visual-basic
Titolo: Cerco esempi di sorgenti di vusal Basic

Cerco esempi di visual basic che gestiscono database con file di testo.
Ciao Max

Cerco esempi di visual basic che gestiscono database con file di testo.
Sito Comune, tanto per cominciare...
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: controlli

ciao
e' possibile escludere un componente a run-time?
grazie
La nostra difficolta non e' nelle dimostrazioni, 
ma nel capire che cosa dimostrare.
					 Emil Artin.

 e' possibile escludere un componente a run-time?
Sě, basta non usarlo.

 grazie
Mi sembra come il principio che per iniziare a smettere di fumare 
occorre rinunciare *solo* alla prima sigaretta della giornata.
Che significa?
Ciao

>Che significa?
se posso fare in mdo che se la libreria non c'e' non includere il
componente?
ciao
La matematica puo' definirsi come la materia nella quale 
non sappiamo mai di cosa stiamo parlando 
ne' se quel che stiamo dicendo e' vero.
					 B. Russel.

 componente?
Ma qual è la logica di tutto ciò?
Stai intervenendo su un programma (ovviamente EXE) fatto da altri, vero?!
Quando il programma viene caricato, vengono caricati tutti gli accessori che
lo stesso prevede.
Se qualcuno manca, al caricamento o (appena più tardi, ma inesorabilmente)
al riferimento/uso, si arrabbia.
Ma perchè mai dovrebbe mancare, se il Setup ha fatto il suo dovere?
Ora, dicci, ... che stai facendo?

Newsgroup: it.comp.lang.visual-basic
Titolo: REPORT IN VB.NET

Ciao a tutti!
Una gentilezza, qualcuno sa dirmi come si usa il famoso datareport di vb6 in 
vb.net
?
Grazie mille per un'eventuale risposta.
nicola

 ha scritto nel messaggio

Semplice: non esiste :)
Puoi usare CrystalReport, incluso dalla ver. Pro in su, oppure prova il mio, 
molto più simile al "vecchio" DataReport di VB6 come semplicità e 
funzionalità: 
www.neodatatype.net
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Strategie di recupero/controllo dati in db

Ciao a tutti,
vorrei mettere in pratica degli algoritmi di recupero dati e controllo 
coercizione dati in un gestionale.
Vi sono degli algoritmi predefiniti i funzionanti per tale questione ?
es. in un gestionale di magazzino la somma della merce in entrata deve 
essere uguale a quella in uscita etc. etc.
Grazie e buon lavoro.

 essere uguale a quella in uscita etc. etc.
Se mettessi un blocco del genere nel gestionale i clienti me lo tirano
dietro dopo 2 minuti.
Un esempio hanno un ordine di 10pz, ne fanno la bolla che però ha 12pz per
accordi presi col cliente dopo, hanno il corriere davanti, mettono 12pz, si
beccano magari un avviso ma fanno la bolla. Poi magari vanno a rimodificare
l'ordine.
Noi di norma abbiamo delle stampe di controllo, a seconda di quello che
serve.

 wrote in message 
news:i654sf$13v$1...@nnrp-beta.newsland.it...

Ma toh!
Ho sempre pensato che in un magazzino la somma della
merce in entrata fosse maggiore o uguale a quella in uscita.
Ma in che mondo vivo?
Bruno 

Romano ha scritto:

E quando mai 2+2 fa 4?
-- 
Greg 

 Ma in che mondo vivo?
Mica vero!
Nella realtà vi sono molti casi in cui ciò non è vero. A partire da
magazzini con merce fatturata e merce a nero. Merce messa in carico e
merce non ancora caricata (ma che può essere venduta e quindi
fatturata), merce virtualmente a magazzino ma non più presente
(deperimento, taccheggiatori, altro...) ecc...
Credo che la logica dell'OP sia sbagliata, vincolare l'utente (al netto
di richieste specifiche) è da evitare.
Nicola


Nei cartoni animati 

 ha scritto nel messaggio 
news:4c865bbd$1...@newsgate.x-privat.org...


 il clienet ti paga , la matematica no !
A me di norma quando mi fanno richieste che è matematico che poi non ci
possano lavorare (non so se questo è il caso, va valutato di persona), di
norma li metto all'erta.
Poi se non capiscono abbozzo la modifica, e di norma si accorgono e mi
fanno tornare indietro.

 possano lavorare (non so se questo č il caso, va valutato di persona), di


Newsgroup: it.comp.lang.visual-basic
Titolo: inviare email da label in vb si potrà?

sapete come eseguire un mailto: da label in vb?
Grazie.

 wrote in message
b6naks$e6v$1...@lacerta.tiscalinet.it...


 Devi includer i Microsoft MAPI Controls nel progetto
UAZ!
Esagerato!
ShellExecute( 'mailto:
indirizzo
','open',null,SW_SHOWNORMAL )
Vedi bene la sintassi di ShellExecute ma dovrebbe essere simile a
questa!
Andrea

 wrote in message
b6p1tg$483$1...@lacerta.tiscalinet.it...

UAU!.
Mi piace molto di più...mo' ci provo...
Bye, Ste


io ho provato con shellexecute ma non ci sono riuscito se ce la fate mi
postate un esempio?
grazie.

 sapete come eseguire un mailto: da label in vb?
Beh, se sai come usare le due API per le mail basta che le utilizzi sul
click della
label...
Alex
Newsgroup: it.comp.lang.visual-basic
Titolo: Uso MSWINSCK.OCX all'interno di un OCX

Devo realizzare un OCX che utilizzi il controllo della Microsoft 
MSWINSCK.OCX. E' possibile farlo?
Vi ringrazio 

 MSWINSCK.OCX. E' possibile farlo?
Certo, perchè no?
Ciao
-- 
NeoDataType : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

Newsgroup: it.comp.lang.visual-basic
Titolo: Rotellina mouse

Chi sa' come intercettare il movimento della rotellina del mouse...
Ciao

Chi sa' come intercettare il movimento della rotellina del mouse...
Devi subclassare il form per intercettare il messaggio  WM_MOUSEWHEEL.
Per adesso ho trovato in rete questo esempio, penso che dovresti
adattarlo facilmente al tuo caso:
ACC2000: How to Detect and Prevent the Mouse Wheel from Scrolling
Through Records in a Form
http://support.microsoft.com/?kbid=278379
-- 
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: Installazione...durante

Salve a tutti.
Supponiamo di fare un'installazione di un pacchetto software su una rete di
PC
Durante l'installazione sappiamo se stiamo installando sul server o no.
Tutto viene installato regolarmente.
Ora, sul server, voglio mettere in esecuzione un prg VB, cioè un EXE, in
automatico; in pratica deve avviarsi ad ogni accensione del server in
automatico.
Qualche idea?
E poi l'idea è uguale per ogni sistema operativo o no?
Grazie, maurizio

 automatico.
Forse, guida del sistema operativo
"Avviare un programma all'avvio di Windows"
Ave
giuseppeD
Newsgroup: it.comp.lang.visual-basic
Titolo: Intercettare parti di stringa.

Salve, cč una funzione che mi permetta, x una qualsiasi stringa di caratteri 
che posso avere, di intercettare le prime 2 lettere di ogni parola che 
compone la stringa?...
ad es.:
stringa = "ieri sono andato a casa"    > IESOANACA
stringa = "oggi sono felice" > OGSOFE
..e cosě via.
Grazie,
TG 

> Salve, cè una funzione che mi permetta, 
mmm... scrivertela mi sembra la soluzione migliore
comunque c'é una funzione "left"  che fa (mi pare ) un pezzetto di quello
che ti serve, controlla! 
ciao
mmmmmminchiaa
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Un modo, ad esempio:
Public Sub m()
    Dim s As String
    Dim ss As String
    Dim lng As Long
    s = "Ciao amico come stai?"
    ss = Left(s, 2)
    For lng = 3 To Len(s)
        If Mid(s, lng, 1) = " " Then
            ss = ss + Mid(s, lng + 1, 2)
        End If
    Next
    MsgBox UCase(ss)
End Sub
La routine vuole corretta per ciň che riguarda
eventuali parole di una sola lettera,
di spazio piů punteggiatura in fondo alla frase.
-- 
---------------------------
Mauro Gamberini
http://www.riolab.org/
 


ti allego la seguente implementazione tra le tantissime possibili 
perche' utilizza la tecnica degli automi ( aka macchine ) a stati finiti
tecnica molto interessante perche' permette di implementare 
semplicemente una grande varieta' di problemi simili al tuo,per esempio 
sarebbe banale estendere il numero di lettere da prelevare e/o 
capitalizzare selettivamente il primo carattere o accettare anche le 
cifre o ....
nota bene  questa funzione considera i solo caratteri a-z A-Z come 
facenti parte di una parola e tutti gli alti caratteri come separatori 
di parola
'' inizio del codice
Const A_State As Integer = 1
Const A1_State As Integer = 2
Const S_State As Integer = 3
Private Function GetTwo(s As String) As String
Dim i As Integer
Dim c As String
Dim state As Integer
Dim res As String
     res = ""
     state = A_State
     For i = 1 To Len(s)
         c = Mid(s, i, 1)
         Select Case state
         Case A_State
             Select Case c
             Case "A" To "Z", "a" To "z"
                 res = res & c
                 state = A1_State
             Case Else
                 state = S_State
             End Select
         Case A1_State
             Select Case c
             Case "A" To "Z", "a" To "z"
                 res = res & c
                 state = S_State
             Case Else
                 state = A_State
             End Select
         Case S_State
             Select Case c
             Case "A" To "Z", "a" To "z"
                 state = S_State
             Case Else
                 state = A_State
             End Select
         End Select
     Next
     GetTwo = res
End Function
'' fine del codice
Newsgroup: it.comp.lang.visual-basic
Titolo: Errore Imprevisto (60062)

Ciao,
dunque, ho un progetto contenente alcuni controlli utente (.CTL)
inseriti all'interno del progetto stesso.
Ora, ho spostato alcune cartelle per riorganizzare la struttura e di
conseguenza sono cambiati i percorsi.
Se vado ad aprire un form contenente uno di questi controlli mi si
presenta l'errore in oggetto.
Stessa cosa se creo un nuovo form e cerco di piazzargli sopra uno dei
suddetti controlli.
Qualcuno ha idea di come risolvere il problema?
Tnx.
Daniele.

 wrote:
Spippolando un po' sembra che il problema non siano i controlli ma i
Data Report.
Escludendoli dal progetto tutto funziona, se li inserisco (a mano nel
file .vbp), mi si presentano gli errori di cui sopra.
Inoltre, cercando di aprire uno dei DR, mi da un errore "Impossibile
caricare C:\..bla bla\VBF7.tmp"
Domanda: come faccio ad inserire in un progetto un data report
esistente?!
Tnx.
Daniele.

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Icona per exe modulo

Salve,
è possibile impostare l'icona di programma di un eseguibile composto
soltanto da un modulo? Aggiungendo un form dal quale estrapolare
l'icona aggiungo solo 4kb al file, quindi per ora ho risolto così. Ma
sarebbe possible (forse con un'API apposita) impostare l'icona da
codice?
Grazie,
--
Dos
minic...@cheerful.com

 soltanto da un modulo?

Newsgroup: it.comp.lang.visual-basic
Titolo: vista su datatset?

Ciao a tutti, mi cheise se esiste un modo rapido per il seguente
caso:
ho 2 datatable in relazione fra loro avente un proprio
bindinsgsource.
Su un datagrid vorrei vedere alcuni dati della prima datatable e
altri
della seconda.
In caso di modifica userei i table adapter per apportare le modfiche
alle tabelle DB.
Come faccio a far visualizzare in un unico datagrid i dati
provenienti
dalle 2 fonti dati?
Un modo che mi viene in mente è quello di realizzare una nuova
datatable con relativo dataadapter e metterla in binding con il
datagridview.
Altri modi?
Grazie

 Ciao a tutti, mi cheise se esiste un modo rapido per il seguente
ti ho risposto di la :-)
.m
-- 
Mauro Servienti
{C67C0157-5D98-4733-A75E-93CAEE4BADC8}
Microsoft MVP - Visual C# / MCTS
http://mvp.support.microsoft.com
blog @ 
http://milestone.topics.it
whynot [ at ] topics [ dot ] it

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

Salve a tutti,
devo fare un programma in VB6 per gestire la porta seriale !!
Devo ricevere e spedire una serie di bit (almeno un centinaio) !!!
Non è che per caso qualche d'uno sa darmi dei consigli !
Purtroppo sono un neofita di VB6, anche se sapevo usare un po' VB3 !!
È per un mio progetto scolastico !! sigh.
Tnx a lot.
Bye

 wrote in message
38F85EA6...@die.supsi.ch...

Newsgroup: it.comp.lang.visual-basic
Titolo: Grid con celle combo....

Qualcuno sa gentilmente dirmi se esiste un controllo Grid con le celle che,
invece di essere semplice testo, sono caselle combinate??
L'avevo fatto in C++ tanti anni fa, ci ho riprovato in VB, ma farlo in VB
e' un bordello.....
Ciao e grazie!
Luca Menegotto.


C'è la TrueDBGrid della Apex, ti puoi scaricare la demo su
www.apexsc.com
Ciao
Riccardo

Esiste il pacchetto Data Widgets della Sheridan, che contiene dei controlli
associati ai dati con varie proprieta' aggiuntive, fra cui credo ci sia
quello che cerchi.
Ciao, Marco
Luca Menegotto ha scritto nel messaggio <01be0bc7$3a198120$060164c4@luca>...


Luca Menegotto.
------------------------
E-mail
gd...@tin.it
Microdev HomePage
http://micordev.dynip.com
http://www.grisnet.it/microdev/

> e' un bordello.....
Sul sito comune nella sezione "Piccole Perle" c'e' un esempio di come usare
una combo con la DBGrid.
http://members.xoom.com/it_lang_vb
Spero sia quello che cerchi.
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

Newsgroup: it.comp.lang.visual-basic
Titolo: SQL 6.5 o SQL 7.0

Devo fare un porting di un progetto Access sotto SQL Server.
Quale versione mi consigliate ?
Grazie

Max wrote:

SQL Server 7.0 : è piu' recente , è più versatile a livello di utente ed
è stato ricostruito quasi da zero(così dicono)!


Anche io ti consiglio la 7.0 ma ricordati di installare anche il service
pack 1
Ciao

 ha scritto nel messaggio
news:8fau27$d9r$1...@fe2.cs.interbusiness.it...





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

scusate la domanda
ma con flexgrid di vb6 non è possibile selezionare una cella e scriverci
dentro?
Grazie

 ha scritto nel messaggio
news:x3lB6.18378$r67.4...@news2.tin.it...


 wrote in message
news:CXrB6.3214$s93.2...@news.infostrada.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Come si centra una CommonDialog ?

Sono rimba e non riesco a trovare il modo di centrare a schermo un
commondialog, nè per impostare la stampa, nè per salvare o aprire file. Le
uniche proprietà disponibili sono left e top, per cui come cavolo faccio a
centrale in screen ? Dovrei fare CD.left=(screen.width-CD.width)/2 purtroppo
però non esiste CD.width ossia la larghezza del CommonDialog.....
Non ci sono proprietà di alignment ... insomma come si fa ?
--
mike...@triesterivista.it
http://www.interware.it/users/mike/
http://www.triesterivista.it/

Il problema è questo: come centrare sullo schermo una Common Dialog?
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] LVM_SETBKCOLOR..... come si usaaaaa!!!!

Ciao, ho cjiesto come modificare il colore di una cella di una ListView e mi
hanno risposto cosě:
vai qui
http://msdn.microsoft.com/library/psdk/shellcc/commctls/ListView/ListView_Ov
erview.htm
ed ho visto che collegava al MSDN Library, allora ho cercato sulla mia ed ho
trovato questo:
LVM_SETBKCOLOR
LVM_SETBKCOLOR
    wParam = 0;
    lParam = (LPARAM) (COLORREF) clrBk;
Sets the background color of a list view control. You can send this message
explicitly or by using the ListView_SetBkColor macro.
Returns TRUE if successful, or FALSE otherwise.
clrBk
Background color to set or the CLR_NONE value for no background color. List
view controls with background colors redraw themselves significantly faster
than those without background colors.
A parte il mio inglese scadente, ma quando compio l'istruzione in VB5 mi da
errore suol   ;   (punto e virgola).
Dove devo scriverlo il codice?? qualcuno puň rispondermi??
Grazie 1000
Paolo :-))

Dove devo scriverlo il codice?? qualcuno puň rispondermi??
Forse nella finestra del codice del tuo progetto?
Dopo aver dichiarato la api, la usi come una qualunque funzione inserendo
gli appositi parametri, che presumo siano l'hwnd della listview, la costante
lvm_setbkcolor, 0 e il colore da assegnare
Spero di non aver detto idiozie, ma la dichiarazione dell'api dovrebbe
renderti tutto piů chiaro

> Dove devo scriverlo il codice??
una cosa tipo 
sendmessage LVM_SETBKCOLOR, 0, RGB(0,0,0)
dopo che hai dichiarato la funzione Sendmessage()
ps: ora non ho da provare...
-- 
 Pastrano

Newsgroup: it.comp.lang.visual-basic
Titolo: !! IPC in rete Windows ??

Qualcuno conosce un metodo per realizzare in Visual Basic una comunicazione
tra applicazioni Windows 95 che girano su macchine diverse, in una rete
Windows (quindi non TCP-IP)?
In pratica vorrei un controllo OCX (piu' facile quindi da usare del Net DDE
;-)) per implementare qualcosa che possa somigliare ad esempio alle "pipe"
(leggi "paip", ossia "tubo" ;-)) di Unix. Mi basterebbe qualcosa di simile
al DDE, con un evento che viene scatenato ogni volta che l'applicazione
riceve un dato ed un metodo per inviare dati. 
Diro' di piu': dato che ho una applicazione server che dovrebbe poter
dialogare con un numero indefinito di applicazioni client (quindi una
struttura "a stella") mi sarebbe utilissimo poter configurare questi link o
fornendo ogni volta che devo inviare un dato anche l'address/identificativo
dell'applicazione destinazione, oppure avere una comunicazione "a bus" dove
ogni messaggio inviato viene ricevuto da tutti i client linkati (quindi
sara' cura del client "sapere" che il dato e' per lui ed ignorare gli
altri).
Pls, rispondetemi anche via e-mail.
----------------------------------------------------------------
Alex Palmese
Internet: 
al...@programatic.it
 
http://www.programatic.it/~alex/

Mi associo alla richiesta, si prega quindi di rispondere sul Newsgroup
Grazie anticipatamente !!
Frank
Newsgroup: it.comp.lang.visual-basic
Titolo: Porta Parallela

Come si fa (in Visual Basic) a scrivere dei dati sulla porta parallela????
Vorrei accendere dei led (8) che ho collegato ad ogni pin dati della porta
parallela.
La mia č una seconda porta parallela (LPT2) indirizzo: 278H settata come
"standard".
Grazie a tutti

 La mia è una seconda porta parallela (LPT2) indirizzo: 278H settata come



Lo puoi fare solo sotto Win95/98.
Guarda il progetto win95io.zip presente sul Sito Comune.
http://www.murialdo.it/it_lang_vb
Ciao
By -MES-   Maronese Ettore
http://www.maronese.com/mes
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://www.murialdo.it/it_lang_vb

 >


Interessante, prova a mandarla al WM del Sito Comune, che magari la
pubblica.
Oltre a I/O e sheft, fa altre cose?


 
http://www.maronese.com/mes
La DLL è costruita in DELPHI (o in C++Builder), ...... "perchè? "...
domanderai..
...si sfrutta la possibilità di utilizzare l'assembler (che è anche
veloce!), così per fare un semblice OUT su una porta  il codice diventa:
   asm
        push dx                              {Salva DX nello stack}
        mov dx, PortAddress      {Carica DX con la porta definita in
PortAddress}
        in al,dx                             {Legge PortAddress e mette il
valore in AL}
        mov ByteValue,al             {Salva il risultato nella variabile
ByteValue}
        pop dx                               {Ripristina il registro DX}
    end;
oltre ai fronzoli necessari (dichiarazioni ecc... ecc...)
quindi le funzioni possono essere parecchie:
SHIFT (sx,dx)
ROT(azioni 8,16,32 bit sx e dx)
TOGGLE (8,16,32 bit)
SET BIT (come sopra)
SWAP NIBBLE (o quanti bit si vuole a secondo della lunghezza della parola)
SORT (vari algoritmi il LM) lavorazione in corso!!!
LPT_START (cerca l'indirizzo di LPT1)
.......altre? Basta un po' di fantasia :-) !!!!
by [_AmaRoK_]
P.S. Vi interessano i sorgenti di BOREPLY (ovvero come rispondere ai
cattivoni.....)????

 cattivoni.....)????
qued e' ?
yoda one ? non c'era obi one e un solo yoda ("one yoda", non "a yoda") ? :)

Newsgroup: it.comp.lang.visual-basic
Titolo: Passare parametri ad un prg

Salve.
Come e' possibile passare un parametro da prompt ad un programma visual
basic?
ad esempio: visprod.exe 000001
Grazie

 wrote in message 8onq1k$6...@small.edisons.net...


> ad esempio: visprod.exe 000001
Con la funzione command
"Restituisce la parte degli argomenti della riga di comando utilizzata per
avviare Microsoft Visual Basic o un programma eseguibile sviluppato con
Visual Basic"

> ad esempio: visprod.exe 000001
"Command" ti rende l'intera stringa

 wrote in message 8onq1k$6...@small.edisons.net...


 ad esempio: visprod.exe 000001
Consulta la voce della guida "Funzione Command".
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
Newsgroup: it.comp.lang.visual-basic
Titolo: [?} DAO e MDB con attributo ReadOnly

Il mio problema:
sto cercando di aprire, in solo lettura, un database MDB, impostato
con l'attributo ReadOnly, senza successo.
Il codice utilizzato:
Set MyDefaultWorkspace = DBEngine.Workspaces(0)
Set MyDB =
MyDefaultWorkspace.OpenDatabase("C:\Programmazione\pepper\dati\Pepper.
MDB", False, True)
L'errore:
3051         The Microsoft Jet database engine cannot open the file
'C:\Programmazione\pepper\dati\Pepper.MDB'.  It is already opened
exclusively by another user, or you need permission to view its data.
Inutile dire che sono l'unico utente, non è stata impostata nessuna
password e, se tolgo l'attributo ReadOnly al file, tutto funziona.
C'è qualcosa che non ho capito del DAO, del JetEngine, di Windows,
della vita, o esiste qualche trucco?
Grazie
Federico
--
 
federic...@planet.it
Eliminare NOSPAM dall'indirizzo! Delete NOSPAM from address!

Ho risolto!
Ci ho sbattuto la testa per diverse ore, ma era una cosa molto
stupida:
i due parametri dell'opendatabase sono Variant con valori Booleani e
non Booleani, quindi, aggiungendo un Cvar(Valore) il database si è
aperto.
MyDefaultWorkspace.OpenDatabase("C:\Programmazione\pepper\dati\Pepper.
MDB", cvar(False), cvar(True))
