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

Ho provato ad usare la funzione API SHFileOperation, ma mi dà l'errore
"Can't find DLL entry point  SHFileOperationA in shell32.dll".
Il sistema operativo è Window NT 4.0 SP6 e questo è il codice che ho usato:
--------------------------------------------------------------------
'Dichiarazioni
Public Declare Function SHFileOperation Lib "shell32.dll" Alias "
SHFileOperationA" (lpFileOp As SHFILEOPSTRUCT) As Long
Public Type SHFILEOPSTRUCT
        hwnd As Long
        wFunc As Long
        pFrom As String
        pTo As String
        fFlags As Integer
        fAnyOperationsAborted As Long
        hNameMappings As Long
        lpszProgressTitle As String '  only used if FOF_SIMPLEPROGRESS
End Type
Public Const FO_COPY = &H2
Public Const FO_DELETE = &H3
Public Const FO_MOVE = &H1
Public Const FO_RENAME = &H4
'funzione che fa la copia di un file
Public Function CopiaFile(ByVal aszSource As String, ByVal aszDest As
String) As Boolean
    Dim struct As SHFILEOPSTRUCT
    CopiaFile = False
    With struct
        .hwnd = frmMain.hwnd
        .wFunc = FO_COPY
        .pFrom = aszSource
        .pTo = aszDest
    End With
    CopiaFile = (SHFileOperation(struct) = 0)
End Function
--------------------------------------------------------------------
L'errore me lo dà in corrispondenza della chiamata alla funzione
SHFileOperation.
Qualcuno saprebbe indicarmi una soluzione ?
Ciao e grazie

Il sistema operativo è Window NT 4.0 SP6 e questo è il codice che ho usato:
Dovrebbe funzionare :-(
Hai verificato che la versione della dll sia almeno la 4.0 ?
-- 
ciao, hal

 wrote in message
news:a50037$dn9$1...@newsreader.mailgate.org...


Comunque l'ho provato anche su Win 2000 e dà lo stesso problema.
Non e' che c'e' qualche spazio di troppo nella dichiarazione?
_Deve_ funzionare.
-- 
ciao, hal
p.s. per favore, si risponde _sotto_ il testo riportato e non sopra.

 wrote in message
news:a508t8$jfp$1...@newsreader.mailgate.org...


Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Conoscete qualche buon libro su XML??

Ciao a tutti
mi rendo conto di essere OT ma segue questo newsgroup da molto tempo e
non vorrei spostarmi su un altro solo per una domanda...
Conoscete qualche buon libro, magari reperebile in rete, che mi
spieghi l'XML considerando che ne so veramente poco???
Grazie
Saluti
Max



Io ho acquistato "XML Passo per Passo" della "Mondadori Informatica -
Microsoft"
Molto semplice!
Ciao

"Max" <barr...@REMOVEtin.it> ha scritto

www.w3schools.com

On Sat, 13 Oct 2001 11:14:31 GMT, Max <barr...@REMOVEtin.it> wrote:

"Sviluppo di Soluzioni XML", Ed. Mondadori.
Poi ce ne sarebbe un altro... ce l'ho in ufficio: domani ti posto il
titolo.
Ciao,
Moreno
-- 
sirri at morenosoft dot com
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
---------------------------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: [Help ADO] Problemino con Delete

Perchè non riesco a cancellare questi record con ADODC? Mi dice sempre che
l'azione non può essere eseguita nel contesto attuale...mannaggiupatataus!!!
With adoElementi
    .ConnectionString = sOptConnectionString
    .RecordSource = "tblVociListini"
    .Refresh
    With .Recordset
        .Filter = "[IDListino] = 1"
        .Delete adAffectGroup
    End With
End With    ' of adoElementi


Io Delete lo uso per cancellare il singolo record, ma se vuoi cancellare un
gruppo
di record ti consiglio di usare il comando DELETE di SQL
Ciao
Sir Jo

Però se esiste nei comandi di ADO un motivo ci sarà! :-)
Grazie comunque,


 wrote in message
92mrr0$7ldmv$1...@ID-52601.news.dfncis.de...


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Listbox e file.ini (AIUTO!)

Salve a tutti,
E' un po' che leggo il Ng ed ora mi sono deciso a scrivervi per vedere
se riuscite a darmi una mano a risolvere un piccolo problema che mi
assilla ormai da diverso tempo.
Il problema e' questo:
ho una filelistbox (denominata filListaDeiFile) dove ovviamente
compaiono dei nomi di file. Facendo un doppio click sui nomi, questi si
memorizzano su una listbox (ListTemp) completi di path.
Quello che vorrei fare io, e' salvare la lista dei file contenuti in
ListTemp in un file .ini (e fin qui ci sono quasi riuscito solo che mi
salva solamente l'ultima path selezionata) per poi
poterli visualizzare tranquillamente anche al prossimo caricamento del
programma, semplicemente premento un tasto. 
' Questo e' per salvare i dati nel file .ini
Private Sub Command5_Click()
for i=0 to lsttemp.listcount-1
        r% = WritePrivateProfileString("Directories", "dir",
lsttemp.list(i), inipath$)
next i
_______________________________________________________________________________________
' Questo per leggere i dati contenuti nel file.ini
Private Sub Command4_Click()
LstTemp.Add GetFromINI("Directories", "dir", iniPath$)
 
Qualcuno potrebbe indicarmi dove sbaglio e perche' quando cliccko il
Command4, nella ListTemp non compare niente?
Ciao a tutti
Duke Fleed
 
P.s.:
Se vado a vedere con un editor di testo il contenuto del file .ini, mi
accorgo che ha memorizzato solamente la directory dell'ultimo file che
ho selezionato nella  ListTemp, anche se ne ho selezionati 3 o 4.
Qualcuno sarebbe cosi' cortese da aiutarmi anche in questo senso?
Ciao e Grazie a tutti quelli che hanno avuto la pazienza di Leggermi.

 wrote in message
3795B7C1...@mediacom.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Grafici matematici

Ciao a tutti.
Scusate per l'eventuale ingenuita' della domanda, ma sono agli, e non ho
trovato niente ne' sul sito comune, ne' su altri link ad esso collegati
(certo non li ho visitati tutti tutti, ma spero eventualmente in qualche
segnalazione meritevole).
Quello che cerco di fare e' disegnare degli assi cartesiani (e fin qui sono
a posto, almeno questo riesco a farlo), e su di essi disegnare degli inisemi
chiusi tipo un cerchio, un rettangolo, un'ellisse, ma anche qualcosa di
irregolare. Ad ogni bottone sulla mia form corrisponde una diversa figura
che appare sul piano cartesiano.
Mi chiedevo se e' possibile rappresentare graficamente forme irregolari e
forme geometriche predefinite (tipo cerchio o ellisse, appunto) tramite le
loro equazioni matematiche. Questo mi servirebbe perche' poi ho bisogno di
far scorrere una retta parallela agli assi (prima a x e poi ad y) e
calcolare le intersezioni con le figure disegnate precedentemente.
E' possibile fare cio'? Ho visto tante belle funzioni sul sito di Cesare
Rizzi, ma non riesco a scaricarle (problemi di server?).
Grazie,
Davide.


Penso che potrebbe farti comodo il Platform SDK, con riguardo alla 
Windows GDI, in cui sono spiegate, ad esempio, le 
Filled Shape Functions
The following functions are used with filled shapes. 
Function Description 
Chord Draws an area bounded by an ellipse and a line segment. 
Ellipse Draws an ellipse. 
FillRect Fills a rectangle using a brush. 
FrameRect Draws a border around a rectangle using a brush. 
InvertRect Inverts the color values of the pixels in a rectangle. 
Pie Draws a pie-shaped wedge bounded by an ellipse and two radials. 
Polygon Draws a polygon. 
PolyPolygon draws a series of closed polygons. 
Rectangle Draws a rectangle. 
RoundRect  Draws a rectangle with rounded corners. 
Se ti manca, il Platform SDK e' comunque accessibile on-line
su (se il reader la spezzasse, ricomporre la riga):
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/sdkintro/hh/sdkintro/sdkmainportal_71ut.asp
hth, hal

 wrote in
news:oacm7.3296$
ul3.1...@news.infostrada.it
: 

Public Sub DrawFunc()
Dim X, Y As Long
Dim StrX As String
Dim OldX, OldY As Long
For X = -DrawPIC.ScaleWidth / 2 To DrawPIC.ScaleWidth / 2 Step (Precisione)
  DoEvents
  Y = f(x)
  if (ci sono stati errori) Then OldY = Invalido
  If Not OldY = Invalido And Not Y = Invalido Then _
    DrawPIC.Line (OldX + (DrawPIC.ScaleWidth / 2), OldY + 
(DrawPIC.ScaleHeight / 2))-(X + (DrawPIC.ScaleWidth / 2), Y + 
(DrawPIC.ScaleHeight / 2)), (Colore)
  OldX = X
  OldY = Y
Next X
End Sub
nel caso di una parabola f(x)=ax^2+bx+c
neclepsio

Grazie mille per le risposte.
Provero' e vi sapro' sapere.
Grazie,
Davide.
Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto su List Box

avrei bisogno di selezionare con un tasto tutti gli item visualizzati su una
list box e poi stamparli
grazie
ciao
--------------------------------
Inviato via 
http://usenet.libero.it

 list box e poi stamparli
<questa casa non è un helpdesk>
E io ho bisogno di completare per settembre il compilatore per il mio pseudo
linguaggio visuale. :)
</questa casa non è un helpdesk>
Ciao
--
y = f(
http://neodatatype.interfree.it/index.html
)

 <questa casa non è un helpdesk>
LOL

scusate è che non riesco a farlo

--------------------------------
Inviato via 
http://usenet.libero.it

 > > > list box e poi stamparli
Vedi la proprietą Selected (for n=0 to List1.ListCount-1)
Per la stampa dipende da molti fattori: La stampante, il formato, il font,
lo strumento usato, etc.

 scusate č che non riesco a farlo
Il problema č che non puoi scrivere "voglio a fare un programma" :)
1) č troppo generico
2) non č una domanda
3) Suona un po' troppo "mentre io faccio altro voi occupatevi del mio
problema"
Per la listbox penso ti basti leggerne l'help, per la stampante... qui devi
specificare: stampa diretta? tramite report? con oggetto printer?


Newsgroup: it.comp.lang.visual-basic
Titolo: RtlFillMemory - RtlZeroMemory. Prototipi VB.

Chi mi sa dare i prototipi di funzione (declare sub ...) di queste due
interessanti funzioni della libreria Kernel32?
Grazie anticipatamente!!!
---Bruno

 Declare Sub ZeroMemory Lib "kernel32" Alias "RtlZeroMemory" (pDst As Any,
ByVal ByteLen As Long)
Declare Sub FillMemory Lib "kernel32" Alias "RtlFillMemory" (pDst As Any,
ByVal ByteLen As Long,byval Char as byte)
La  FillMemory prendila con le pinze...
Ciao
Corrado
Newsgroup: it.comp.lang.visual-basic
Titolo: VB5 NT4 PROBLEMA

Ho usato la funzione exitwindowsex(1,0) per arrestare il sistema ma con nt
non funziona chi sa il perchč?
grazie.


Perche' in NT devi PRIMA settare i diritti per poter fare lo shutdown del
sistema.
Prova questo codice:
with this code you can reboot, shutdown and/or logoff your Windows NT 4.0,
if you want to use with 95 just add a function to test
the OS and in W95 don't call the AdjustToken().
'=========================DECLARE.BAS===================================
Option Explicit
Public Const EWX_LOGOFF = 0
Public Const EWX_SHUTDOWN = 1
Public Const EWX_REBOOT = 2
Public Const EWX_FORCE = 4
Public Const TOKEN_QUERY = &H8
Public Const TOKEN_ADJUST_PRIVILEGES = &H20
Public Const SE_PRIVILEGE_ENABLED = &H2
Public Type LUID
    UsedPart As Long
    IgnoredForNowHigh32BitPart As Long
End Type
Public Type TOKEN_PRIVILEGES
    PrivilegeCount As Long
    TheLuid As LUID
    Attributes As Long
End Type
Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal
dwReserved As Long) As Long
Declare Function LookupPrivilegeValue Lib "advapi32" Alias _
    "LookupPrivilegeValueA" (ByVal lpSystemName As String, ByVal lpName As
String, _
    lpLuid As LUID) As Long
Declare Function GetCurrentProcess Lib "kernel32" () As Long
Declare Function OpenProcessToken Lib "advapi32" (ByVal ProcessHandle As
Long, _
    ByVal DesiredAccess As Long, TokenHandle As Long) As Long
Declare Function AdjustTokenPrivileges Lib "advapi32" (ByVal TokenHandle As
Long, _
    ByVal DisableAllPrivileges As Long, NewState As TOKEN_PRIVILEGES, _
    ByVal BufferLength As Long, PreviousState As TOKEN_PRIVILEGES,
ReturnLength As Long) As Long
'====================REBOOT=================================================
=
'
' Codice di esempio per il reboot, logoff e riavvio di un sistema Windows NT
'
Option Explicit
Private Sub Logoff_Click()
    AdjustToken
    Call ExitWindowsEx(EWX_LOGOFF Or EWX_FORCE, 0)
End Sub
Private Sub Reboot_Click()
    AdjustToken
    Call ExitWindowsEx(EWX_REBOOT Or EWX_FORCE, 0)
End Sub
Private Sub Shutdown_Click()
    AdjustToken
    Call ExitWindowsEx(EWX_SHUTDOWN Or EWX_FORCE, 0)
End Sub
'
'  Taken from MSDN
'
Private Sub AdjustToken()
    Dim hdlProcessHandle As Long
    Dim hdlTokenHandle As Long
    Dim lBufferNeeded As Long
    Dim tmpLuid As LUID
    Dim tkp As TOKEN_PRIVILEGES, tkpNewButIgnored As TOKEN_PRIVILEGES
    hdlProcessHandle = GetCurrentProcess()
    OpenProcessToken hdlProcessHandle, (TOKEN_ADJUST_PRIVILEGES Or
TOKEN_QUERY), hdlTokenHandle
    LookupPrivilegeValue "", "SeShutdownPrivilege", tmpLuid
    tkp.PrivilegeCount = 1
    tkp.TheLuid = tmpLuid
    tkp.Attributes = SE_PRIVILEGE_ENABLED
    AdjustTokenPrivileges hdlTokenHandle, False, tkp, Len(tkpNewButIgnored),
tkpNewButIgnored, lBufferNeeded
End Sub
--
Roal Zanazzi
z...@iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto su Pulsanti Trasparenti.

Si possono creare in Vb5 o VB6 Pulsanti trasparenti in modo che non mi
coprano l'immagine di sfondo del form???
Grazie a tutti quelli che mi risponderanno.


Prova a creare un controllo activeX nel quale metti 4 linee a quadrato
Quella in alto e quella a sinistra di colore chiaro,le altere 2 scure.
in mezzo ci metti una label trasparente senza testo e in secondo piano
rispetto alle linee.
poi crea l'event Click e richiamalo dalla routine label1_click
nell' evento Mousedown e Mouseup sempre della label scrivi il codice per
scambiare il colore alle linee.
Ciao Flash
http://members.exploit.it/flashback

Newsgroup: it.comp.lang.visual-basic
Titolo: Voi che controllo scegliereste ?

Devo realizzare un'applicazione che si occupi di gestire appuntamenti per un
centro di assistenza. Avrei bisogno di realizzare, quindi, un planning
dentro al quale visualizzare i giorni, i nomi dei tecnici , il numero degli
appuntamenti fissati per ogni tecnico etc.
Ovviamente, i dati (nomi tecnici, appuntamenti etc.) sono contenuti
all'interno di un db.
In pratica.... :
l'intestazione delle colonne deve contenere la data
l'intestazione delle righe deve contenere i nomi dei tecnici
le intersezioni di riga e colonna devono contenere il numero degli
appuntamenti fissati per il tecnico X nel giorno Y.
Sono riuscito a realizzare una cosa simile utilizzando la Flexy Grid.
Mi stavo chiedendo, pero', se non esistesse un controllo VB specifico per
questo tipo di applicazioni.
Il massimo, sarebbe avere un controllo che riunisca tutte le proprieta' ed i
metodi del  "Calendar Control" + quelli della "DBGrid".
In pratica ...... un "due in uno" !!!    :-)
Esiste qualcosa di simile, o chiedo troppo ???
Grazie come sempre a chi vorra' darmi la sua opinione.
Saluti
Aldo

esiste un controllo chiamato schedule.ocx, prova a darci un'occhiata.
ciao

 ha scritto nel messaggio
news:2Cv57.3586$sE4.1...@news6.giganews.com...

Newsgroup: it.comp.lang.visual-basic
Titolo: Comandare posizione del puntatore Mouse

Ciao.
Sapete se esiste un modo per spostare il punatore del mouse tramite la
tastiera quindi senza spostare il mouse?
Grazie in anticipo.

Puoi usare la API SetCursorPosition.
Berets
p.s: togliere STEREB dal mio indirizzo per risposte.

...

-------------
Ciao!
Per spostare il mouse tramite la tastiera, devi utilizzare le API di
Windows. Ecco le dichiarazioni necessarie:
Private Type POINTAPI
    x As Long
    y As Long
End Type
Private Declare Function GetCursorPos Lib "User32.dll" (lpPoint As POINTAPI)
As Long
Private Declare Function SetCursorPos Lib "User32.dll" (ByVal x As Long,
ByVal y As Long) As Long
Per muovere il mouse, inserisci questo codice nella routine Form_KeyDown:
    Dim pa As POINTAPI
    'Recupera la posizione attuale del puntatore del mouse.
    GetCursorPos pa
    'Calcola la nuova posizione.
    Select Case KeyCode
        Case vbKeyLeft
            pa.x = pa.x - 10
        Case vbKeyRight
            pa.x = pa.x + 10
        Case vbKeyUp
            pa.y = pa.y - 10
        Case vbKeyDown
            pa.y = pa.y + 10
    End Select
    'Sposta il puntatore del mouse.
    SetCursorPos pa.x, pa.y
Il codice sopra riportato sposta il puntatore in risposta alla pressione dei
tasti freccia. Il valore "10" è il valore che viene aggiunto o tolto, a
seconda del tasto premuto, alle coordinate precedenti del mouse; puoi
variare questo numero a tuo piacimento. Un consiglio: imposta la proprietà
"KeyPreview" del Form su True, in modo che gli eventi della tastiera vengano
generati prima per il form stesso e, successivamente, per gli eventuali
controlli.
Penso di averti detto tutto. Alla prossima.
Marco Minerva
http://www.geocities.com/SiliconValley/Foothills/7260/
http://www.armaditaggia.com/marco

Newsgroup: it.comp.lang.visual-basic
Titolo: come fare per imparare???

Ciao a tutti
Sono un programmatore vecchio stampo (C, cobol, clipper, basic)
vorrei incominciare a programmare in visual basic chi mi può dare dei
consigli?????
mi raccomando rispondetemi
esistono dei programmi che insegnino a programmare in visual basic???

vorrei incominciare a programmare in visual basic chi mi puņ dare dei

Newsgroup: it.comp.lang.visual-basic
Titolo: Visual Basic 6 e Access

Sono completamente nel pallone!!!
Chi mi può far chiarezza...
Ho creato un applicativo in Vb6 che lavora con un db access97 (mdb), ora
devo installare su una macchina che non ha nessuna versione di access
installata....
-Quali riferimenti devo mettere nel mio progetto?
-Quali accorgimenti devo avere?
-Come posso fare per fare eseguire delle semplici query memorizzate su db?
    " Set oggetto = CreateObject("Access.Application")
    " oggetto.OpenCurrentDatabase ("c:\giudici\giudPop.mdb")
    " oggetto.DoCmd.OpenQuery ("qryEsporta")
    " oggetto.Quit
Non funziona?? Cosa ho Dimenticato??
Grazie a tutti per l'aiuto.
Romano.

la via piu' facile e' usare il setup standard di Vb e accettare per
default
tutte le dll che ti vuole dare.
E' +  probabile che te ne metta una in + che una in meno!! :-))))
Ciao
GL

Scusami non mi sono fatto capire, devo installare su un pc di un cliente e
non posso installare tutto il vb, devo compilare e distribuire il prodotto,
allo stesso modo per problemi di licenze non se ne parla di installare
access.
Cosa ne pensi?? Ciao...

In VB c'è il programma di installazione delle applicazioni, includi un po'
di DLL che ti servono e lui le registra automaticamente.
Ciao

ti ha risposto AlexMessoMalex
....visto???....


Hai frainteso i messaggi miei e di GL; non intendiamo farti installare VB
sul PC del cliente, ma per distribuire le applicazioni, VB contiene
un'utilità tipo InstallShield che include un po' di DLL e l'eseguibile che
hai creato tu.
Crea dei dischetti di installazione con l'ormai standard SETUP.EXE !!!
Fammi sapere.

Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto.....................||||||||||||||||||||||....................-----------------________

Ciao a tutti,
è la prima volta che scrivo se potete datemi una mano grazie.
Ho un problemino con VB5 e VB6.
Sto cercando dei controlli per regolare i contrasti delle IMG e la
luminosità.
-------------------------------------------------------------------
Qualcuno ha sorgenti o controlli x IMG.
Linguaggio:Visual Basic 5.0/6.0
Ho la necessità di poter gestire con un ciclo for la luminosità ed il
contrasto di fotografie.
Se qualcuno di voi ha esperienza in questo settore (anche in altri
linguaggi) o anche x verificare che avete letto l' msg visto che non ho
trovato l'altro msg che ho scritto.
Ciao Grazie.
Gianni.

 wrote in message
8br7f8$40n$1...@nslave1.tin.it...


 trovato l'altro msg che ho scritto.
non ne sono certo, ma puoi *provare* su 
www.vbaccelerator.com
altri siti possibili schedati con "grfx" nei miei vblinks.
per favore, metti anche soggetti meno decorati e piu' descrittivi.
ciao, a.
--
andrea dot palazzi at tin dot it
free vb/sw: 
http://www.comune.modena.it/cittadini/apal/html/
Newsgroup: it.comp.lang.visual-basic
Titolo: immagine per il background di un form

ciao,
volevo sapere se c'e' un modo per mettere come sfondo di un form una
immagine che venga ripetuta in modo da riempire tutta la grandezza del
form.
(un po' come si fa con le pagine html).
Ciao e grazie.


puoi farlo a colpi di BitBlt manualmente
avevo un progettino sul desktop che stavo per inviarti ma miracolosamente
non c'è più.. mah roba da cyberfollia
per qualche informazione sulla BitBlt prova il sito di Cesare Rizzi
http://members.xoom.it/CesareRizzi
oppure il mitico 
www.AllApi.net
se non trovi nulla di utile cerco quell'esempietto a casa e te lo invio.
ciao
--
Fibia "Sakamoto" FBI
E-mail: 
fibi...@hotmail.com
ICQ UIN 63586057
Sito Personale: 
http://www.geocities.com/fibiafbi
VB Simple: 
http://vbsimple.virtualave.net
Membro #26 delle Mitiche Brigate Takahashi sezione Sud

Newsgroup: it.comp.lang.visual-basic
Titolo: Vedere dll

Ciao a tutti.
Mi sapete dire se esiste un programa che mi consente di vedere i prototipi e
i
numeri di esportazione delle funzioni di una DLL ( che non sia una dll
activeX )?
Ciao e grazie a tutti.
Stefano

 wrote in message
0EbIFulZ$GA....@news-02.uni.net...

Newsgroup: it.comp.lang.visual-basic
Titolo: Un buon libro

Salve a tutti, chi di voi sa indicarmi un buon libro su Visual Basic 6? Per
buon libro intendo una guida completa, dettagliata, approfondita ed
esauriente, non per principianti. Ciao e grazie.
Rudy

Visual Basic Programmer's guide to the Win32 API
Daniel Appleman's
ZDPress
C'è anche la versione in italiano che, se non sbaglio, dovrebbe essere
pubblicata da Mondadori.
Ciao.
--
________________________________
Raffaele Tripodo
E-Mail:              
raff...@conmet.it
MSN Messenger: 
px...@hotmail.com
¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯

 ha scritto nel messaggio
news:8lkfce$2mi$1...@fe2.cs.interbusiness.it...



wrote:

Recentemente ho acquistato "Programmare Visual Basic 6.O" di Francesco
Balena, edizioni Mondadori Informatica (1100 pagine, Lit. 150.000).
Il testo è recensito anche sul sito comune. Personalmente lo ritengo
validissimo anche per i non principianti. Comunque, dopo aver
rovistato librerie intere sull'argomento, sono arrivato alla
conclusione che per avere "una guida completa dettagliata ed
esauriente" come tu la definisci, ti dovrai dotare di una decina di
libri alla stregua di un'opera enciclopedica, tale è ormai la vastità
dell'argomento: dipende da cosa  ci vuoi normalmente fare con VB.
Se ti può interessare cerca "Visual Basic Controls in a Nutshell" di
Evan S.Dictor edito da "O'Reilly and Associates" in lingua inglese.
(748 pagine US$ 24.95). Consiste in una descrizione dettagliata di
tutti i metodi, proprietà ed eventi dei controlli inclusi in VB5 e VB6
Professional e Enterprise.
Ciao.   Loris.

Concordo pienamente: personalmente ho investito lo "stipendio" del mio
servizio di leva in libri e manuali di VB. Può sembrare una cifra notevole,
ma per chi (come me) lavora con questi strumenti, questo tipo di
aggiornamento è indispensabile.
Nessun libro, per buono che sia, può infatti coprire tutti i possibili campi
di applicazione del VB.
Se può interessare, in genere scelgo tra i volumi editi da MSPress (lo so,
Bill Gates è già ricco abbastanza, ma vi si trovano anche libri scritti
molto bene) che in Italia sono pubblicati da Mondadori. Al sito
education.mondadori.com
 si può trovare tutta la lista dei libri.


esauriente, non per principianti. Ciao e grazie.
Sul SIto Comune trovi diverse recensioni.
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: Come visualizzare informazioni in ciclo?

Salve a tutti , questo sarebbe un quesitino access ma siccome ho un qualche
problemino(perchè non ci pensa manco per idea a funzionare ) vorrei sapere
se c'è una possibilità di fare sta cosa in vb....
situazione:
Db "attrezzi"
tabella "descrattr"  campi idattrezzo ; descrizione
form con un idattrezzo (casella di testo )e la sua descrizione (casella di
testo)
                                    1                        chiave inglese
                                    2                        cacciavite
etc...
casella di riepilogo sulla form che pesca sulla tabella
e , se ci clicco sopra, mi visualizza i rispettivi valori nelle caselle di
testo (usando un bookmark).
Vorrei che , invece di cliccare sulla freccetta a piè di pagina
(movenext)automaticamentedopo un certo periodo
fosse selezionato il record successivo (es 5 secondi) e giunto alla fine
tornasse al primo valore (movefirst) e ripartisse exnovo;
ora, se concettualmente per me è tutto chiaro non riesco in pratica a capire
proprio come potermi muovere!
Chiedo gentilmente illuminazioni su questo problema perchè non ci levo le
gambe!!!!!!!
Grazie per la pazienza (e per le eventuali risposte!)
Paolo


Puoi usare il Timer per gestirti lo scarto di 5 second con una
funzione che ti controlli il loop dei records!
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Proprieta' font

Perche' se cambio le proprieta' del font di una label o di qualunque
altra cosa, poi il VB mi da' errore quando la deve caricare?
Grazie, Carlo Pro

...
:Perche' se cambio le proprieta' del font di una label o di qualunque
:altra cosa, poi il VB mi da' errore quando la deve caricare?
:
Che versione di VB usi? Che SP?
Che errore ti da?
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

 Che errore ti da?
Uso VB 4 Versione Enterprise. Praticamente l'errore me lo da' quando cerco
di visualizzare un form dopo averlo salvato:
Error during load. Vedere NomeForm.log per maggiori dettagli.
Poi sono andato ad aprire il file .frm con un editor di testo ed ho notato
che sulle proprieta' font di comandi, label, etc. erano inseriti dei
caratteri incomprensibili che chiaramente il VB non riesce a caricare.
Li ho cancellati tutti a mano e cosi' sono riuscito a caricarli, ma vorrei
evitare di fare cosi' ogni volta che devo visualizzare un form. In pratica
e' proprio il VB che salvando il form, inserisce questi caratteri e non
capisco perche'.
Ciao a tutti e grazie in anticipo

capisco perche'.
Il VB4 e' FAMOSO per i suoi immensi BUGS.
Non sono un esperto di VB, l'ho usato poco, ma penso ci siano dei Service
Pack per VB4 sul sito Microsoft, prova a cercarlo in quel dannato labirinto,
forse lo trovi.
Ciao,
(Senza firma lunga :-)
Newsgroup: it.comp.lang.visual-basic
Titolo: Specifiche Formato BMP, dove?

Salve ho un piccolo problema nel generere file BMP da VB, o meglio qualcuno
sa dirmi perchè alcuni bitmap hanno dei byte in più (1 o 2) per ogni riga?
Mi spiego meglio, le dimensioni di un Bitmap dovrebbero essere
(largezza*altezza*byte per pixel)+header, a volte questa formula è vera,
perchè però se creo un bitmap con il paint di windows largo 286 pixel e alto
394 pixel a 256 colori la regola non vale? il file dovrebbe occupare
(286*394*1)+1078= 113762 byte invece occupa 114550 byte che è uguale a
(288*394*1)+1078, perchè ha aggiunto 2 pixel per ogni riga che  poi neanche
visualizza? So che a livello fisico non può esistere un bitmap con larghezza
dispari perchè i dati vengono caricati in un array di integer (2 byte) , ma
nel mio caso sia la larghezza che l'altezza sono pari e la loro
moltiplicazione + la lunghezza dell'header sono sempre un numero pari quindi
contenibili in un array di byte.
A questo punto quello che chiedo sono solo le specifiche di un file Bitmap.
Dove posso trovarle?



mandami un messaggio di posta elettronica, cosi' mi ricordo di mandartele
(appena trovo un po' di tempo)
"Daniele I." <x...@xxx.xx> wrote in message
news:8s3n28$qai$2...@lacerta.tiscalinet.it...


 Dove posso trovarle?
Io ho trovato tutto quello che mi serviva per gestire le bitmap con le API
nel file WIN32.HLP fornito con i compilatori C (vedi MS o Borland). Fra
l'altro un po' di tempo fa e' uscito il C Builder 3.0 FREE sui vari cdrom in
edicola !!
Saluti.
Fab
(PS se non lo trovi, scrivimi che te lo mando direttamente....)

 Dove posso trovarle?
un sito che fornisce documentazione sul formato dei file č
http://www.wotsit.org
Ciao
Faber

www.wotsit.org
su
http://members.xoom.it/flanguasco/
ci dovrebbero essere routine per conversione bmp->gif, con spiegazioni (mi
sembra) sul bmp.
"Daniele I." <x...@xxx.xx> ha scritto


 edicola !!
che riviste???
mi dici qual'è che lo compro?

 perchč perň se creo un bitmap con il paint di windows largo 286 pixel...

Grazie a tutti per il vostro interessamento e soprattutto a Fabrizio che è
stato decisivo con il suo suggerimento.
Alla prossima
Daniele I.
E-Mail - 
d_im...@yahoo.com
Newsgroup: it.comp.lang.visual-basic
Titolo: UUID

Buongiorno sempre io.
Ho praticamente realizzato una dll che sistemata nel system tray del server
schedula alcune funzioni di invio posta.... roba di newsletter.
Ora avrei un paio di domande:
la prima č, installata l'active x su un'altro server rispetto a quello di
sviluppo e chiamata da una pagina asp con il metodo createobject mi ritorna
questo errore:
Server object error 'ASP 0177 : 800706ae'
Server.CreateObject Failed
/studio/studio.asp, line 12
The object universal unique identifier (UUID) was not found.
Qualcuno sa come risolvere?
Un'altra cosa č questa, come posso fare in modo che una subroutine che deve
interfacciarsi con un server di posta e magari restarci in comunicazione
anche per una mezzora possa girare in background e quindi rilasciare
immediatamente libero il processo che l'ha invocata?
Grazie ancora a tutti. Stefano


Creando un ActiveX EXE anziche' un'ActiveX DLL. Ad occhio e' l'unica
soluzione (o meglio, puoi lanciare un EXE e collegartici in qualche modo
stran, ma la soluzione ActiveX mi pare piu' pratica).
Ciaotutti,
A.

Newsgroup: it.comp.lang.visual-basic
Titolo: ? mi leggete ancora in HTML ?

Vediamo se ho risolto.
Mi leggete ancora in HTML??
mI DATE UNA CONFERMA PER FAVORE???
ciao
--
Posted from 
romeo.logikos.it
 [193.70.26.1]
via Mailgate.ORG Server - 
http://www.mailgate.org

Ok, cosě va bene !
Bye, G.

OK cosi!!!!

Bravo
Newsgroup: it.comp.lang.visual-basic
Titolo: ? proprietà ocx

Voglio realizzare un OCX che esegua alcune operazioni al cambiamento del
valore di un campo inserito in un form.
Esempio:
nel form principale vi sono tre campi: C1, C2 e C3
io voglio che inserendo il valore 10 in C1 e 20 in C2 l'ocx si accorga di
questo cambiamento e ne faccia la somma impostanto C3=30.
Voglio legare le proprietą definite nel mio ocx ai campi del form durante la
progettazione, senza dover usare gli eventi CHANGE dei campi C1 e C2
Ciao e Grazie

 Voglio legare le proprietà definite nel mio ocx ai campi del form durante


Vibino ti ringrazio, il tuo suggerimento e' stato molto utile e funzionale.
Ora voglio riuscire a non usare la funzione SetBoxes, o meglio, mi
piacerebbe che una volta inserito l'ocx nel progetto, nella sua finestra di
proprieta' si possano referenziare i campi del form, piu' o meno come si fa
in access per dire che il valore di un campo di tabella verrà esposto in una
ben precisa textbox.
Ci provo, se non ci riesco chiedero' ancora aiuto.
Andrea

 proprieta' si possano referenziare i campi del form, piu' o meno come si
fa
Non vorrei dire una stupidata, ma mi pare che un controllo ocx abbia accesso
al proprio container, nella fattispecie un form; avendo accesso ad esso, ha
accesso anche agli altri control del form che puo' analizzare in un ciclo
"for each obj in container.controls" e manipolare di conseguenza..
Se non riesci a farlo, riposta qui.
-vibino

al proprio container, nella fattispecie un form; avendo accesso ad esso, ha
e' vero che un ocx puo' accedere agli oggetti del suo contenitore, e che la
tua proposta dovrebbe funzionare, ma io voglio ottenere un risultato simile
a quello che si ha con il controllo DATA.
Quando si include il controllo data in un form si imposta la fonte dati e la
select che deve riportare le informazioni; a questo punto un qualsiasi
textbox puo', referenziando il controllo stesso, presentare le colonne
esposte dal controllo data.
Il mio ocx deve fare qualcosa di simile, esporre nei campi, indicati
esclusivamente in fase di progettazione, le informazioni recuperate o
calcolate al cambiamento del valore di altri campi.
Es. il mio form contiene i campi Input1 ed Output1
aggiungo OCX1 al mio form e nella sua pagina delle proprieta' dico che
OCXInput=Input1 e OCXOutput=Output1
in fase di esecuzione quando Input1 cambia, Output1 riporta un valore che e'
il risultato dell'operazione di OCX1 (potrebbe essere una query su un db
tramite odbc non standard o qualunque altra cosa)
La soluzione che mi hai fornito l'altra volta funziona benissimo e risco ad
ottenere quanto sopra, vorrei solo evitare di scrive del codice (anche se
minimo) ma risolvere tuttoin fase di progettazione.
Se hai qualche suggerimento sara' ben accetto.
Andrea
Newsgroup: it.comp.lang.visual-basic
Titolo: scusate

Sono nuovo e non ho dimestichezza con Visual basic vers 5 studio da
autodidatta
e mi riesce difficile proseguire con i miei mezzi ,c'e' qualcuno che sa
indicarmi qualche libro chiaro e semplice per chi come me si accinge su
questo terreno o anche dei corsi in Roma possibilmente non troppo costosi .
RingraziandoVi di cuore
                                         Daniele

 ha scritto nel messaggio
news:Bwxm7.141168$TS4.1...@news2.tin.it...

Per i corsi in Roma proprio non saprei, ma se vuoi, per i libri, ci sono
diverse
interessanti recensioni sul Sito Comune di questo NG (indirizzo dopo la
firma),
già che sei sul sito, ti consiglio di leggere il manifesto, in cui sono
scritte le regole
basilari di comportamento di questo newsgroup.
ciao
--
http://www.it-lang-vb.net

Parto con un consiglio sull'uso del NewsGroup...
Questo é un messaggio di risposta standard e quindi impreciso, viene inviato
in genere a chi si é da poco affacciato al NG e potrebbe non contenere le
risposte in maniera diretta...
1)  Controlla il subject! Subject tipo: "Aiutooooo", "!!!", "Non ci sto più
dentro", "Sto impazzendo" sono subject che vengono filtrati da quasi
tutti... (Escluso il sottoscritto ancora per un po') e quindi non vengono
nemmeno letti dal 90% dei partecipanti (forse meno, ma comunque tanti)
2) Prima di postare sul NG sarebbe bene seguire un certo iter:
    a) Cercare nell' Help (alias MSDN ove possibile)
    b) Cercare nei vecchi post... Se ne hai pochi... non c'é problema, qui
ci sono quelli degli ultimi 6 anni (circa):
 
http://groups.google.com/advanced_group_search
    c) Cercare sul sito comune 
http://www.it-lang-vb.net
...Comunque almeno i post vecchi, MSDN e il subject sono vitali...
                        Ciao
                                Allanon
Proseguo con un consiglio a informarti in regione per i corsi serali...
E consiglio le recensioni del sito comune per i manuali (e la mia personale
scelta é per Francesco Balena, programmare in Visual Basic - Mondadori anche
edizione economica (per iniziare))
                        Bye
                                        Allanon

Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto SQL

Sto facendo una query con visual basic presa da access. Su access funziona
perfettamente ma quando la porto in visual basic non funziona.
dim dataoggi as date
dim numcell as string
numcell = "347ecc.."
dataoggi = date
cquery.commandtext="SELECT clienti.datainizio, cliienti.datafine,
clienti.cellulare FROM clienti WHERE clienti.cellulare =' & numcell & "' and
clienti.datainizio <= #" & dataoggi & " and clienti.datafine >= #" &
datafine & "#;"
cquery.requery
Ho analizzato ed ho notato che su  dataoggi se inserisco una data manuale
tipo #04/02/2004# funziona mentre se aggiungo date non funziona.
Qualcuno sa darmi spiegazioni.ů
RINGRAZZIO

 RINGRAZZIO
prego, MAURIZZIO
non ti spiego come mai funziona in questo modo, perchè l'ho già scritto
troppe volte.
--
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] schermo nero sotto

Dunque, mi servirebbe di creare un'applicazione che avviata occupi tutto lo
schermo con uno sfondo nero, coprendo l'ambiente del desktop insomma. Questo
l'ho fatto creando una form a sfondo nero, massimizzata. Ora perň non posso
aprire altre forms su di essa perchč me le apre sotto. Dove sbaglio? C'č un
modo per portarle in primo piano? E soprattutto mantenercele, nascoste o
meno?
D'altronde, se uso una form mdi non mi permette di togliere i pulsanti
max-min-chiusura. ne di settare il bordo.
tx
Paolo

 aprire altre forms su di essa perchè me le apre sotto. Dove sbaglio? C'è


Prova l' isruzione : (il tuo form).ZOrder
 oppure l'api SetWindowPos se vuoi avere sotto controllo più
parametri della tua finestra
*******************************************************
Const HWND_TOPMOST = -1        'finestra sempre in primo piano
Const HWND_NOTOPMOST = -2
Const SWP_NOSIZE = &H1            'non si puo ridimensionare la finestra
Const SWP_NOMOVE = &H2         'non si può muovere la finestra
Const SWP_NOACTIVATE = &H10
Const SWP_SHOWWINDOW = &H40    'indispensabile se vuoi vedere la finestra
Const SWP_HIDEWINDOW = &H80        'se vuoi nascondere la finestra
' Le costanti SWP_ ... le devi concatenare con l'operatire Or ( se ce ne
sono più di una )
Private Declare Sub SetWindowPos Lib "User32" (ByVal hWnd As Long, ByVal
hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long,
ByVal cy As Long, ByVal wFlags As Long)
Private Sub Form_Activate()
    'la finestra sarà sempre in primo piano
    SetWindowPos Me.hWnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOACTIVATE Or
SWP_SHOWWINDOW Or SWP_NOMOVE Or SWP_NOSIZE
End Sub
*******************************************************
ciao ;-)) Davide


Grazie ad entrambi... :)
vedrň cosa riesco a fare.
Paolo
Newsgroup: it.comp.lang.visual-basic
Titolo: WinHttp - da client a server

Ciao a tutti,
devo trasferire un file (pdf) da client su server tramite WinHttp.
Premetto che:
- il file pdf è 12 kb
- Flunghezza mi viene segnalato come 11290, quindi ok
- il download funziona bene
Vi posto la parte di codice:
        Static Buf$
        Dim Flunghezza%
        FileNameClient = "C:\test.pdf"
        FileNameServer= "
http://127.0.0.1/FilePdf/test.pdf
"
        Open FileNameClient For Binary As #1 ' Apre il file.
        Flunghezza = LOF(1) ' Ottiene la lunghezza del file.
        Buf = String(Flunghezza, " ")
        Get 1, , Buf
        Close 1 'chiude il file
        WinHttpReq.SetTimeouts 30000, 30000, 0, 0
        WinHttpReq.Open "PUT", _
            FileNameServer, False
        WinHttpReq.Send (Buf)
Non mi restituisce errore, ma mi ritrovo solamente 1 kb......sapete
aiutarmi, per favore?
Grazie e buona giornata a tutti!
Kate
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Kate
Qualcuno sa aiutarmi, per favore?
Grazie 1000!


> aiutarmi, per favore?
Se il file è binario (e un pdf *è* binario), non so fino a che punto sia 
possibile fare il put senza codificarlo in Ascii.
Ciao
Alberto
-- 
E tutto mi sembrava andasse bene... 

 Kate
Allora,
ho trovato la soluzione e funziona bene, vi posto il codice che ho usato:
        Dim myStr() As Byte
        Dim nFile As Integer
        Dim nLen As Long
        Dim WinHttpReq As WinHttp.WinHttpRequest
        Set WinHttpReq = New WinHttpRequest
        nFile = FreeFile
        nLen = FileLen(FileNameClient)
        ReDim myStr(1 To nLen)
 
        Open FileNameClient For Binary As #nFile
        Get #nFile, 1, myStr
        Close nFile
 
        WinHttpReq.Open "PUT", FileNameServer, False
        WinHttpReq.Send myStr
Ciao ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: DLL di visual basic non corretamente registrate!

Ciao, ho questo problema, nel pacchetto di installazione  creato per il mio
programma ci sono due file di Visual basic 6.0 che il sistema dovrebbe
aggiornare:
olepro32.dll
stdole.tlb
...praticamente il programma di installazione cerca di sostituirli
riavviando il Sistema, ma questo non accade mai...andando in loop !
allora per cercare di risolvere...nel file SETUP.LST del programma ho
cancellato le stringhe riguardanti questi 2 file ma non ho risolto....cosa
posso fare ?
Grazie in anticipo!
Alessandro

è un problema che hanno già risolto altri......googla e dovresti trovare
qualcosa....
cmq, così a memoria, mi pare che tu debba spostare le righe che fanno
riferimento a quei due files sotto la sezione [Bootstrap] del file ini.....
vado a memoria, cmq, potrei essere stato impreciso....
good coding!!!
--
Damiani Liborio Igor
ig...@igordamiani.it
 - 
soft...@igordamiani.it
 - 
idam...@hotmail.com
http://www.igordamiani.it
ICQ : 11847262

 vado a memoria, cmq, potrei essere stato impreciso....
Le righe sono già nella sezione bootstrap.....e su google non ho trovato
nulla....
Ciao
Alessandro

uff, allora è molto strano.....immagino che tu abbia già installato l'sp5 di
vb.....
cmq, il discorso è che il setup non riesce a sostituire quei files perchè
risultano in uso: dato che sono file di sistema, è molto probabile che
risultino bloccati da qualche applicativo (guarda la tray-bar, oppure i
processi attivi, magari)......
prova a chiudere il maggior numero possibile di app che hai aperto e
riprova......
nota: se entri in modalità provvisoria, riesci ad installarlo? se sì, allora
il problema è proprio questo....


*Magobin* ha scritto:

http://makeashorterlink.com/?S3F2139F3

Newsgroup: it.comp.lang.visual-basic
Titolo: task bar

ciao a tutti
dovrei disabiltare la task bar di windows

dovrei disabiltare la task bar di windows
Sito Comune
Ciao,
Moreno
#sirri#@
morenosoft.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: proprietà non valida in ridimensionamento DataGrid ??

ho inserito in un form un controllo DataGrid e ho creat oil codice per il
gestore di evento Form_Resize(), in mod oche se ingrandisco il form anche il
controllo si ridimensiona. Semplicemente ho inserito le due righe di codice
seguenti nel gestore di evento Resize():
...
DataGrid1.Width = Me.Width - 140
DataGrid1.Height = Me.Height - 1560
...
Ora se ingrandisco il form tutto bene, mentre se riduco a icona la finestra
(funzionalità che non posso disabilitare) mi viene  solllevato un errore:
"Errore di run-time 380:
Valore di proprietà non valido"
riferendosi alla seconda riga di codice sopra descritta. Come faccio a
mantenere la funzionalità che svolge il codice del gestore di evento senza
imbattermi nell'errore.
grazie.



If Me.WindowState <> 1 Then
	DataGrid1.Width = Me.Width - 140
	DataGrid1.Height = Me.Height - 1560
End If
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] ... Database in sql... aiuto

Salve a tutto il news Group... è da un po' che seguo la montagna di
mail postate.. avrei bisogno di un aiuto..
sto portando avanti un progetto di database (funziona tutto quello che
ho fatto finora).. ma adesso ho un problema..
Mi sto chiedendo come stampare i risultati delle query che sono insite
nel database (l'ho scritto con access)
E' possibile richiamare dal programmino/interfaccia che ho scritto in
VB6 un report del database e farlo stampare?
Già una volta ho scritto a codice la stampa di un foglio.. e veramente
stavo impazzendo .. quindi spero veramente che si possa utilizzare un
report di access...
vi ringrazio finora... so che saprete essermi utile... 
potete postare le vostre risposte a 
me44...@studenti.unipd.it
ve ne sarei grato diverrei scemo a cercare le risposte fra i 200 nuovi
messaggi giornalieri...
e soprattutto mio padre mi ucciderebbe (bolletta troppo alta) :)
ciao ciao
Stefano
Newsgroup: it.comp.lang.visual-basic
Titolo: [VBA - Office 2002] Casella di riepilogo

Salve a tutti!
Stro creando un'applicazione che mi consente di tenere sotto controllo
i pagamenti delle uscite fuori sede del personale dell'azienda dove
lavoro..
..avrei necessità di creare una maschera dove in una casella di
riepilogo vengono elencati tutti i record per i quali non è stato
ancora disposto il pagamento e, una volta selezionati, ad ognuno di
questi deve essere associato un numero ed una data che identificano il
numero del registro della contabilità dove verranno registrati questi
pagamenti.
La tabella che contiene i campi sia da leggere che da scrivere si
chiama "Liquidazioni", mentre le textbox con l'ordinativo di pagamento
e la data (txtNumOP e txtDataOP) si trovano all'interno dello stesso
form dove si trova la casella di riepilogo (daAssociare).
Ho creato la casella di riepilogo ed ho scritto una piccolissima
routine con la quale riesco ad estrarre gli ID di tutti i record
selezionati, ma quello che non riesco a fare è riempire i campi della
tabella "Liquidazione" con  valori delle due textbox...
Questa è la routine che ho scritto:
Sub Associa()
   Dim x, indice as Integer
   For x = 0 to daAssociare.ListCount
      If daAssociare.Selected(x) = True Then
         indice = daAssociare.Column(0, x)   'la colonna 0 è quella
che identifica l'ID del record.
         ????
      End If
   Next
End Sub
...in pratica non riesco a capire quali istruzioni mettere al posto
dei punti interrogativi. Non riesco a capire come fare a far
riferimento alla tabella. Ho provato scrivendo Liquidazione!NomeCampo
ma in pratica è come se non riuscisse a capire di andare alla
tabella... mi sembra assurdo dover utilizzare i Recordset!!
Dove sbaglio? Che mi manca?
Grazie!


alla fine ho risolto.. usando i recordset e l'oggetto ActiveDb (che mi
mancava).
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Disabilitare tasto X di chiusura

C'era una API apposita; forse ricordo male, pensavo di trovarla sul sito
comune e invece non c'è.
Qualcuno sa dirmi come fare?
Grazie a tutti.

 ha scritto

se non sbaglio
www.mvps.org/vbnet
fai search -> title (o simili)

> Qualcuno sa dirmi come fare?
Copia quanto segue nel codice di un form:
'Dichiarazioni per disattivare l'icona X di chiusura della finestra
Const MF_REMOVE = &H1000&
Const SC_CLOSE = &HF060
Private Declare Function GetSystemMenu Lib "user32" (ByVal hWnd As Long,
ByVal bRevert As Long) As Long
Private Declare Function RemoveMenu Lib "user32" (ByVal hMenu As Long, ByVal
nPosition As Long, ByVal wFlags As Long) As Long
Private Sub Form_Load()
    'La chiamata che segue serve a disattivare l'icona X di chiusura del
form
    Call RemoveMenu(GetSystemMenu(Me.hWnd, 0), SC_CLOSE, MF_REMOVE)
End Sub
ALOHA!
--
Rogis
* ANTI-SPAM:
Rimuovi "ABC" dall'indirizzo per rispondermi
Remove "ABC" from my address to reply.

 ha scritto nel messaggio
news:z8l26.187604$hk4.6...@news.infostrada.it...


> Ok, ma se volessi riabilitarlo?
Col sistema che ho indicato non si puņ, ma puoi usare un altro metodo:
metti in un form una CheckBox con name "chkDisabilita" e copia il seguente
codice.
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
    If chkDisabilita.Value = 1 Then
        Cancel = 1
    End If
End Sub
ALOHA


 ha scritto nel messaggio
news:E2D26.193351$hk4.7...@news.infostrada.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: [Access] Come trasferisco i dati da un file .mdb...

...al file (sempre .mdb) sul quale ho aggiornato il codice?
Potrei esportarli su excel e poi riprenderli dal file con
il codice aggiornato... ma forse c'è una via più diretta...
grazie, e saluti

 il codice aggiornato... ma forse c'è una via più diretta...
Perchè complicarsi la vita con EXCEL?
Lo puoi fare in mille modi:
- aprendo un MDB e usando SQL
- aprendo entrambi gli MDB e trasferendo i dati
- ...
Cerca di essere un pò più chiaro!
--
Ciao Fede
By Chicco Production
http://bcp.freetools.it

Ti consiglio se ti è possibile di utilizzare SQL:
SELECT field1[, field2[, ...]] INTO newtable [IN externaldatabase]
FROM source


OK, grazie per le risposte. In effetti è più semlice di quanto pensassi...
saluti
Druso