author: Mark

text:
"Paki" <
paepa...@libero.it
> wrote in message
news:192Z107Z81Z246Y...@usenet.libero.it...

Perchè non collegare le tabelle di testo al DB di access ed usarle poi come
se fossero delle normali tabelle in sola lettura,  magari creando prima il
file schema.ini usanto l'allegata funzione?
saluti
Dell'Oca Marco
D.M.Software
 ACC: How to Create a Schema.ini File Programmatically
ID: Q155512
----------------------------------------------------------------------------
----
The information in this article applies to:
  a.. Microsoft Access versions 7.0, 97
----------------------------------------------------------------------------
----
SUMMARY
Moderate: Requires basic macro, coding, and interoperability skills.
This article shows you how to write a procedure that creates a Schema.ini
file based on an existing table in your database.
This article assumes that you are familiar with Visual Basic for
Applications and with creating Microsoft Access applications using the
programming tools provided with Microsoft Access. For more information about
Visual Basic for Applications, please refer to your version of the "Building
Applications with Microsoft Access" manual.
MORE INFORMATION
In Microsoft Access 7.0 and Microsoft Access 97, you can link or open
delimited and fixed-length text files. Microsoft Access can read a text file
directly, or it can use an information file called Schema.ini to determine
the characteristics of the text file, such as column names, field lengths,
and data types. A Schema.ini file is required when you link or open
fixed-length text files; it is optional for delimited text files. The
Schema.ini file must reside in the same folder as the text file(s) it
describes.
The procedure in the following example accepts four parameters:
     Parameter        Value
   ------------------------------------------------------------------------
   bIncFldNames     True/False, stating if the first row of the text file
                    has column names
   sPath            Full path to the folder where Schema.ini will reside
   sSectionName     Schema.ini section name; must be the same as the name
                    of the text file it describes
   sTblQryName      Name of the table or query for which you want to
                    create a Schema.ini file WARNING: The procedure in this
example will overwrite an existing Schema.ini file in the same destination
folder without warning.
  1.. Open the sample database Northwind.mdb.
  2.. Create a module and type the following line in the Declarations
section if it is not already there: Option Explicit
  3.. Type the following procedure:
      Public Function CreateSchemaFile(bIncFldNames As Boolean, _
                                       sPath As String, _
                                       sSectionName As String, _
                                       sTblQryName As String) As Boolean
         Dim Msg As String ' For error handling.
         On Local Error GoTo CreateSchemaFile_Err
         Dim ws As Workspace, db As DATABASE
         Dim tblDef As TableDef, fldDef As Field
         Dim i As Integer, Handle As Integer
         Dim fldName As String, fldDataInfo As String
         ' -----------------------------------------------
         ' Set DAO objects.
         ' -----------------------------------------------
         Set db = CurrentDB()
         ' -----------------------------------------------
         ' Open schema file for append.
         ' -----------------------------------------------
         Handle = FreeFile
         Open sPath & "schema.ini" For Output Access Write As #Handle
         ' -----------------------------------------------
         ' Write schema header.
         ' -----------------------------------------------
         Print #Handle, "[" & sSectionName & "]"
         Print #Handle, "ColNameHeader = " & _
                         IIf(bIncFldNames, "True", "False")
         Print #Handle, "CharacterSet = ANSI"
         Print #Handle, "Format = TabDelimited"
         ' -----------------------------------------------
         ' Get data concerning schema file.
         ' -----------------------------------------------
         Set tblDef = db.TableDefs(sTblQryName)
         With tblDef
            For i = 0 To .Fields.Count - 1
               Set fldDef = .Fields(i)
               With fldDef
                  fldName = .Name
                  Select Case .Type
                     Case dbBoolean
                        fldDataInfo = "Bit"
                     Case dbByte
                        fldDataInfo = "Byte"
                     Case dbInteger
                        fldDataInfo = "Short"
                     Case dbLong
                        fldDataInfo = "Integer"
                     Case dbCurrency
                        fldDataInfo = "Currency"
                     Case dbSingle
                        fldDataInfo = "Single"
                     Case dbDouble
                        fldDataInfo = "Double"
                     Case dbDate
                        fldDataInfo = "Date"
                     Case dbText
                        fldDataInfo = "Char Width " & Format$(.Size)
                     Case dbLongBinary
                        fldDataInfo = "OLE"
                     Case dbMemo
                        fldDataInfo = "LongChar"
                     Case dbGUID
                        fldDataInfo = "Char Width 16"
                  End Select
                  Print #Handle, "Col" & Format$(i + 1) _
                                  & "=" & fldName & Space$(1) _
                                  & fldDataInfo
               End With
            Next i
         End With
         MsgBox sPath & "SCHEMA.INI has been created."
         CreateSchemaFile = True
      CreateSchemaFile_End:
         Close Handle
         Exit Function
      CreateSchemaFile_Err:
         Msg = "Error #: " & Format$(Err.Number) & vbCrLf
         Msg = Msg & Err.Description
         MsgBox Msg
         Resume CreateSchemaFile_End
      End Function
  4.. To test this function, type the following line in the Debug window,
and then press ENTER:
    ?CreateSchemaFile(True,"c:\MSOffice\Access\","EMP.TXT","Employees")
  5.. Open the Schema.ini file that you created with a text editor, such as
Notepad or Wordpad. Note that the file contains the following information:
    [EMP.TXT]
    ColNameHeader = True
    CharacterSet = ANSI
    Format = TabDelimited
    Col1=EmployeeID Integer
    Col2=LastName Char Width 20
    Col3=FirstName Char Width 10
    Col4=Title Char Width 30
    Col5=TitleOfCourtesy Char Width 25
    Col6=BirthDate Date
    Col7=HireDate Date
    Col8=Address Char Width 60
    Col9=City Char Width 15
    Col10=Region Char Width 15
    Col11=PostalCode Char Width 10
    Col12=Country Char Width 15
    Col13=HomePhone Char Width 24
    Col14=Extension Char Width 4
    Col15=Photo OLE
    Col16=Notes LongChar
    Col17=ReportsTo Integer
REFERENCES
For more information about the Schema.ini file and the information it
contains, search for initializing drivers, and then Initializing the Text
Data Source Driver using the Microsoft Access 97 Help Index.
For more information about the Schema.ini file and its relationship to
Microsoft Access and the Microsoft Jet database engine, refer to the
"Microsoft Jet Database Engine Programmer's Guide", pages 306 - 312.
Additional query words: Text Import Export INI
Keywords : kbprg IntpOff IsmSetup kbofficeprog
Version : WINDOWS:7.0,97
Platform : WINDOWS
Issue type : kbhowto
Technology :
      Last Reviewed: June 8, 2000
      © 2000 Microsoft Corporation. All rights reserved. Terms of Use.
----------------------------------------------------------------------------
----
Send feedback to MSDN.Look here for MSDN Online resources.


title: maschere e risoluzione schermo

author: Gianni Vba

text:
Qualcuno puņ farmi un esempio su come ridimensionare tutti i controlli di
una form
in base alla risoluzione impostata?
Grazie
  Gianni


title: maschere e risoluzione schermo

author: Sergio MAZZA

text:
"Gianni Vba" <
gianni.s...@libero.it
> ha scritto nel messaggio
news:iol58.2482$EB4....@twister1.libero.it...

www.sitocomune.com
Ciao.
--
Sergio MAZZA


title: maschere e risoluzione schermo

author: Emyr

text:
On Tue, 29 Jan 2002 08:38:26 +0100, "Sergio MAZZA"
<
sergi...@tiscalinet.it
> wrote:
>"Gianni Vba" <
gianni.s...@libero.it
> ha scritto nel messaggio
>news:iol58.2482$EB4....@twister1.libero.it...
>> Qualcuno può farmi un esempio su come ridimensionare tutti i controlli di
>> una form
>> in base alla risoluzione impostata?
>> Grazie
>>   Gianni
>>
>
>
www.sitocomune.com
>
>Ciao.
Option Compare Database
Global width As Single
Global height As Single
Type Dati
   top As Single
   left As Single
   width As Single
   height As Single
   fontsize As Single
   columnsize As String
   listwidth As Single
End Type
Type Scheda
   name As String
   width As Single
   height As Single
   section_height(4) As Single ' altezza delle sezioni
   count As Integer ' numero di oggetti
   Info() As Dati ' contiene le informazioni sugli oggetti
End Type
Dim elenco() As Scheda
Global QuanteForm As Integer
Function SetScale(f As Form)
   Dim i As Integer
   Dim cont As Integer
   cont = 0
   While cont < QuanteForm
      If elenco(cont).name =
f.name
 Then GoTo Modifica
      cont = cont + 1
   Wend
   cont = QuanteForm
   QuanteForm = QuanteForm + 1
   ReDim Preserve elenco(QuanteForm) As Scheda
Modifica:
   elenco(cont).name =
f.name
   elenco(cont).width = f.InsideWidth
   elenco(cont).height = f.InsideHeight
   On Error Resume Next
   For i = 0 To 4
      elenco(cont).section_height(i) = f.Section(i).height
   Next
   On Error GoTo 0
   elenco(cont).count = f.count
   ReDim elenco(cont).Info(f.count) As Dati
   For i = 0 To f.count - 1
      On Error Resume Next
      elenco(cont).Info(i).top = f.Controls(i).top
      elenco(cont).Info(i).left = f.Controls(i).left
      elenco(cont).Info(i).width = f.Controls(i).width
      elenco(cont).Info(i).height = f.Controls(i).height
      elenco(cont).Info(i).fontsize = f.Controls(i).fontsize
      If f.Controls(i).ControlType = acListBox Or
f.Controls(i).ControlType = acComboBox Then
         elenco(cont).Info(i).columnsize = f.Controls(i).ColumnWidths
      End If
      If f.Controls(i).ControlType = acComboBox Then
         elenco(cont).Info(i).listwidth = f.Controls(i).listwidth
      End If
      On Error GoTo 0
      If f.Controls(i).ControlType = acSubform Then
         SetScale f.Controls(i).Form
      End If
   Next i
End Function
Function Min(a As Single, b As Single) As Single
   If a < b Then Min = a Else Min = b
End Function
Function Rescale(f As Form)
   Dim c, i As Integer
   Dim ratiox, ratioy, ratio As Single
   i = 0
   While i < QuanteForm
      If elenco(i).name =
f.name
 Then
         ratiox = f.InsideWidth / elenco(i).width
         ratioy = f.InsideHeight / elenco(i).height
         If ratiox < ratioy Then
            ratio = ratiox
            'f.InsideHeight = elenco(i).height * ratio
         Else
            'If (f.RowHeight <> -1) Then
            ratio = ratioy
            'Else
            ' ratio = ratiox
            'End If
            'f.InsideWidth = elenco(i).width * ratio
         End If
         If ratio < 0 Then ratio = 0
         If f.RowHeight <> -1 Then f.RowHeight = f.RowHeight * ratio
         On Error Resume Next
         For c = 0 To 4
            f.Section(c).height = elenco(i).section_height(c) * ratio
         Next c
         On Error GoTo 0
         For c = 0 To f.count - 1
            f.Controls(c).width = elenco(i).Info(c).width * ratio
            f.Controls(c).height = elenco(i).Info(c).height * ratio
            On Error Resume Next
            f.Controls(c).top = elenco(i).Info(c).top * ratio
            f.Controls(c).left = elenco(i).Info(c).left * ratio
            f.Controls(c).fontsize = elenco(i).Info(c).fontsize *
ratio
            On Error GoTo 0
            If f.Controls(c).ControlType = acListBox Or
f.Controls(c).ControlType = acComboBox Then
               If elenco(i).Info(c).columnsize <> "" Then
                  Dim tmp As String
                  Dim nuovo As String
                  Dim col As String
                  Dim pos As Integer
                  tmp = elenco(i).Info(c).columnsize & ";"
                  pos = InStr(1, tmp, ";")
                  nuovo = ""
                  While pos > 0
                     nuovo = nuovo & Format(Val(left(tmp, pos)) *
ratio) & ";"
                     tmp = Right(tmp, Len(tmp) - pos)
                     pos = InStr(1, tmp, ";")
                  Wend
                  f.Controls(c).ColumnWidths = nuovo
               End If
            End If
            If f.Controls(c).ControlType = acComboBox Then
               f.Controls(c).listwidth = elenco(i).Info(c).listwidth *
ratio
            End If
            If f.Controls(c).ControlType = acSubform Then
               Rescale f.Controls(c).Form
            End If
         Next c
         Exit Function
      End If
      i = i + 1
   Wend
   Beep
   MsgBox ("Errore: inserire una chiamata a Setscale ME nella routine
evento Su Apertura")
End Function
Saluti.
Emanuele.


title: maschere e risoluzione schermo

text:
grazie sei stato gentilissimo
Ciao
  Gianni
"Emyr" <
fan...@lavoro.com
> ha scritto nel messaggio
news:6jtd5uo8129gmheij...@4ax.com...



title: maschere e risoluzione schermo

text:
Ho controllato ma non č ciň che volevo.
Questa procedura riguarda il ridimensionamento dei controlli sul cambiamento
di dimensioni della
finestra. Mi serve il ridimensionamento dei campi in base alla risoluzione
800x600 o 1024 x 768
Ciao
  Gianni
>"Gianni Vba" <
gianni.s...@libero.it
> ha scritto nel messaggio
>news:iol58.2482$EB4....@twister1.libero.it...
>> Qualcuno puň farmi un esempio su come ridimensionare tutti i controlli di



title: maschere e risoluzione schermo

author: Alessandro

text:
"Gianni Vba" <
gianni.s...@libero.it
> wrote in message
news:B0F58.4709$ue2.1...@twister1.libero.it...
> Ho controllato ma non č ciň che volevo.
> Questa procedura riguarda il ridimensionamento dei controlli sul cambiamento
> di dimensioni della
> finestra. Mi serve il ridimensionamento dei campi in base alla risoluzione
> 800x600 o 1024 x 768
> Ciao
>   Gianni
>
Allora ti devi spiegare meglio, perchč i CAMPI nelle FORM non ci sono.
I CAMPI sono quelle "COSE" che trovi solo nelle Tabelle e Query, quindi
cosa ridimensioni in relazione alla Risoluzione attuale...????????
Proprio non capisco quello che ti serve...!
Alessandro
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: maschere e risoluzione schermo

text:
Ho sbagliato, parlavo dei controlli nelle maschere.
Se creo una maschera su un monitor con risoluzione 1024x768 la stessa
su di un monitor settato a 800x600 non viene visualizzata in toto.
Vorrei avere la risoluzione di questo problema
Ringrazio tutti anche a chi pensa di spiegarmi cosa sono i campi....
Forse il "genio" non sbaglia mai.....
Bye
   Gianni
"Alessandro" <
ik2...@libero.it
> ha scritto nel messaggio
news:67bb7c40fc7c30ebfc...@mygate.mailgate.org...



title: maschere e risoluzione schermo

text:
"Gianni Vba" <
bitware...@libero.it
> wrote in message
news:_8V58.7743$ia6.2...@twister2.libero.it...
> Ho sbagliato, parlavo dei controlli nelle maschere.
> Se creo una maschera su un monitor con risoluzione 1024x768 la stessa
> su di un monitor settato a 800x600 non viene visualizzata in toto.
> Vorrei avere la risoluzione di questo problema
> Ringrazio tutti anche a chi pensa di spiegarmi cosa sono i campi....
> Forse il "genio" non sbaglia mai.....
> Bye
>    Gianni
>
Mah....!!!
Vedi post successivo.(Auguri)
Alessandro.



title: maschere e risoluzione schermo

author: Antonio Biso

text:
Gianni Vba <
bitware...@libero.it
> wrote in message
_8V58.7743$ia6.2...@twister2.libero.it...
> Ho sbagliato, parlavo dei controlli nelle maschere.
Ma soprattutto, non scrivo DOPO il quoting!!!
Antonio


title: Numerare progressivamente le righe di una Query

author: Ram II

text:
Ogni volta che lancio una query questa mi dovrebbe numerare un campo, con un
numero progressivo per ogni riga generata.
(In poche parole dovrebbe crearmi un campo contatore per ogni ricerca
effettuata)
E' possibile? Ovviamente, se sě, come fare?


author: All Eyez On me

text:
"Ram II" <
nos...@nospam.it
> ha scritto nel messaggio
news:6pjU9.10564$%p6.8...@news.edisontel.com...

> E' possibile? Ovviamente, se sì, come fare?
>
>
>
se usi un report per visualizzare il risultato crei un controllo non
associato nel corpo e lo imposti =1 e sulla proprietà somma parziale imposta
su tutto
ciao, AEOM


author: Roberto da casa

text:
"Ram II" <
nos...@nospam.it
> ha scritto nel messaggio
news:6pjU9.10564$%p6.8...@news.edisontel.com...

> E' possibile? Ovviamente, se sì, come fare?
Vai sul Sito Comune (link qui sotto) e nella Sezione Queries leggi la FAQ di
Stefano Bettini intitolata "Come posso inserire nella mia query un campo
progressivo?".
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


author: Karl Donaubauer

text:
Ram II ha scritto:

> E' possibile? Ovviamente, se sì, come fare?
http://groups.google.com/groups?&selm=a2401o$uipd0$1...@ID-46617.news.dfncis.de
o tutto il thread per più spiegazione.
--
HTH
Karl
*********
Access-FAQ (tedesco):
http://www.donkarl.com


title: chiave primaria

text:
Ho un db che gestisce dati anagrafici.
No voglio che nel mio db venga inserito una persona due volte.
Per far questo vorrei impedire che nome+cognome+data_di_nascita siano uguali
ad record già inseriti.
In un post precedente sanzio55 diceva:
<Nella tabella anagrafica ho messo come chiave l'insieme
<dei tre campi: nome+cognome+data_nascita per evitare di inserire lo stesso
<paziente più volte.
Qualcuno potrebbe spiegarmi come si fa?
Grazie
Marco


title: chiave primaria

text:
"maga58" <
map...@tiscalinet.it
> ha scritto nel messaggio
news:8eng0l$vo9$1...@lacerta.tiscalinet.it...

Nella struttura della tabella selezioni i campi che ti interessano e premi
il bottone di "chiave primaria"...
Ciao.


title: chiave primaria

text:
> Per far questo vorrei impedire che nome+cognome+data_di_nascita siano
uguali
> ad record già inseriti.
> In un post precedente sanzio55 diceva:
>
> <Nella tabella anagrafica ho messo come chiave l'insieme
> <dei tre campi: nome+cognome+data_nascita per evitare di inserire lo
stesso
> <paziente più volte.
>
Visto che mi chiami in causa posso dirti come è andata a finire.
Mi hanno suggerito che non è sufficiente mettere la chiave su
nome+cognome+data_nascita in quanto si possono fare errori di battitura e
per il computer quel tizio lì è un'altra persona. Esempio: Marco Ferri
15/3/65 è un record, successivamente se tenti di inserire lo stesso
nominativo giustamente ti dice che già esiste, ma se per errore digiti Marco
Feri 15/3/65 Access lo registra come nuovo record senza segnalarti l'errore.
Allora la soluzione è quella che ho adottato grazie ai suggerimenti degli
amici del NG...
Crea una nuova maschera composta da una casella di riepilogo che sarà
alimentata da  SELECT DISTINCTROW anagrafica.IDpaz, anagrafica.cogn,
anagrafica.nome, anagrafica.ntil FROM anagrafica ORDER BY anagrafica.cogn,
anagrafica.nome, anagrafica.ntil;  imposta su 4 colonne dove la prima che
contiene l'ID è nascosta.
Poi inserisci nella maschera due pulsanti: uno da premere se il nominativo è
in elenco, l'altro da premere se invece non lo è. Ora nell'evento SuClic del
pulsante "ESISTE" inserisci il codice:
Private Sub esiste_Click()
  DoCmd.OpenForm "anagrafica", , , "IDpaz=" & Me.Elenco0
End Sub
che andrà ad aprire il record del soggetto cercato. Nell'evento SuClic del
pulsante "NOESISTE" invece crea una macro che prima ti apre la maschera
anagrafica e poi imposti il VaiARecord su Nuovo.
Spero sia stato chiaro, sono a tua disposizione.
--
Cordiali saluti
Nunzio Santini


title: chiave primaria

text:
> Visto che mi chiami in causa posso dirti come è andata a finire....
grazie
Marco


title: Stampare lettera prendendo i dati dalla maschera

author: -Fabio-

text:
Avrei bisogno di un vostro aiuto: ho una maschera in cui vengono inseriti i
dati dei clienti, vorrei direttamente dalla maschera aprire un report in cui
ci sarà una lettera con alcuni parametri presi dal record attivo.
Fino ad ora ho usato una query che mi chiede il numero ID del cliente da
stampare, però sarebbe decisamente più comodo evitare questo passaggio.
Grazie
Fabio


author: Roberto dalla campagna

text:
"-Fabio-" <
pippo...@email.it
> ha scritto nel messaggio
news:vq98o2-...@x-privat.org...

Modifica i criteri della query in modo che essi facciano direttamente
riferimento al controllo della maschera che contiene l'ID del cliente; se
ora nei criteri hai scritto qualcosa del tipo:
[Digita l'ID del cliente da stampare:]
scrivici ora:
[Forms]![NomeMaschera]![IDCliente]
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


text:
Roberto dalla campagna in data 16/06/2005 scrisse:
> Modifica i criteri della query in modo che essi facciano direttamente
> riferimento al controllo della maschera che contiene l'ID del cliente; se
> ora nei criteri hai scritto qualcosa del tipo:
Ottimo, ti ringrazio.
Ciao
Fabio


title: Aggiornare la tabella associata ad una combo...

author: rob

text:
buongiorno a tutti
come da oggetto sto cercando di ottenere questo risultato: avete presente
una combo associata ad una tabella... mi capita che i valori di detta
tabella possono essere aggiornati aggiungendone di nuovi in fase di
dataentry; mi si chiede se sia possibile digitando nella combo il nuovo
valore l'aggiornamento della tabella associata. Mi saro' spigato?...
un esempio:
valori nella tabella T associta alla combo: a,b,c
nuovo valore: d
digitando d nella combo aggiornare la tabella T associata cosi' che i valori
presenti diventino: a, b, c, d.
suggerimenti?
grazie
Rob
--------------------------------
Inviato via
http://usenet.libero.it


text:
credo d'aver trovato! bastava spulciare meglio sitocomune... ;D
ciao



title: RT A2000 : Probl. con Reports e Combo

author: Pablitomf (Maurizio Facciuti)

text:
Ciao Ragazzi...
come in oggetto, mi trovo per la prima volta ad aver a che fare con la
RunTime del 2000 (questo mi passa il governo... anzi, MA), e subito
malfunzionamenti che non mi spiego... (SE PER VOI SONO STUPIDATE CHIEDO
VENIA, MA NON SONO MAI STATO UN RUNTIMEISTA ;-) )
Stranezza n°1 : REPORTS
parlo di Reports base (giusto per prova), con Access funzionano
regolarmente sia in anteprima che in stampa, con la RT per niente ne
nell'uno che nell'altro modo... mi danno segnalazione di errore da
inviare...
Stranezza n°2 : COMBO
su dopo aggiornamento di un campo ho bisogno che una combo rispetto a dei
valori del campo stesso, cambi sia il "Tipo origine riga" che l'"origine
riga"... pensando che la RT è in inglese questo il codice che con Access
regolarmente funziona... con la RT 2000 no (con la RT 2002 invece
funziona):
On Error GoTo err:
Dim aaa As Integer
    If Me.MioCampo = 0 Then
        aaa = 1
        Me.MiaCombo.RowSourceType = "Table/Query"
        Me.MiaCombo.RowSource = "SELECT '1' AS ID,'2' AS IDCollCli, '3' AS
Codice, '4' AS Indirizzo, '5' AS Comune, '6' AS Prov, '7' AS Cap"

    End If
    If Me.MioCampo = 1 Then
        aaa = 2
        Me.MiaCombo.RowSourceType = "Value List"
        Me.MiaCombo.RowSource = "SELECT '1' AS ID,'2' AS IDCollCli, '3' AS
Codice, '4' AS Indirizzo, '5' AS Comune, '6' AS Prov, '7' AS Cap;"
    End If
    DoEvents
    Me.MiaCombo.Requery
    GoTo fine:

err:
If aaa = 1 Then MsgBox "Impossibile RowSourceType Tabella/Query"
If aaa = 2 Then MsgBox "Impossibile RowSourceType Elenco valori"
fine:
--
Ciao
Pablitomf (Maurizio Facciuti)
Access : Ver.97 - 2K
----------------------------------
http://www.accessgroup.it/
http://www.sitocomune.com/
----------------------------------
Non mi fido molto delle statistiche, perchè un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media.
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: RT A2000 : Probl. con Reports e Combo

text:
Pablitomf (Maurizio Facciuti ha scritto:
> Ciao Ragazzi...
> come in oggetto, mi trovo per la prima volta ad aver a che fare con la
> RunTime del 2000 (questo mi passa il governo... anzi, MA), e subito
> malfunzionamenti che non mi spiego... (SE PER VOI SONO STUPIDATE CHIEDO
> VENIA, MA NON SONO MAI STATO UN RUNTIMEISTA ;-) )
> Stranezza n°1 : REPORTS
> parlo di Reports base (giusto per prova), con Access funzionano
> regolarmente sia in anteprima che in stampa, con la RT per niente ne
> nell'uno che nell'altro modo... mi danno segnalazione di errore da
> inviare...
CASO COMBO Risolto!... (era l'azione dell'apertura reports che la
bloccava)... ma i reports persistono a non funzionare.



title: Rotellina del mouse

author: Emanuele

text:
 voglio evitare che un utente usando la rotellina del mouse possa in una
maschera vedere le registrazioni precedentemente fatte.
Come posso disattivare questa funzionalità?
L'evento  mousewheel se ridefinito non cambia il comportamento originale ma
aggiunge nuove funzionalità
ciao e grazie


title: Rotellina del mouse

author: Alessandro Baraldi

text:
"Emanuele" <
lel...@libero.it
> wrote in message
news:AW4Gd.4920$
GU.1...@twister1.libero.it

Potresti usare la visualizzazione Immissione dati per
evitare che l'utente scorrazzi per i Record, ma abbia
solo la possibilità di Inserire un Nuovo Record.
La soluzione più efficace però è quella di disabilitare
l'effetto della Rotella.
Se non hai SubForm o ListBox da interbloccare allora
nel mio sito trovi alla sezione API un demo che realizza
questa cosa.
http://www.mantuanet.it/alessandro.baraldi/
Se la tua situazione è un pò più articolata, devi scaricare
una DLL dal sito di Lebans che funziona su tutti gli oggetti.
Non và registrata in quanto è una Win Dll, ma deve risiedere
nella stessa posizione del tuo MDB.
http://www.lebans.com/mousewheelonoff.htm
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Rotellina del mouse

text:
Grazie e a buon rendere !!!
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:727e0dc17ebdf8472c...@mygate.mailgate.org...



title: Rotellina del mouse

text:
Alessandro Baraldi wrote:
> "Emanuele wrote:
>...
>>  voglio evitare che un utente usando la rotellina del mouse possa in una
>> maschera vedere le registrazioni precedentemente fatte.
> ...
> Potresti usare la visualizzazione Immissione dati per
> evitare che l'utente scorrazzi per i Record, ma abbia
> solo la possibilità di Inserire un Nuovo Record.
>
> La soluzione più efficace però è quella di disabilitare
> l'effetto della Rotella.
>
> Se non hai SubForm o ListBox da interbloccare allora
> nel mio sito trovi alla sezione API un demo che realizza
> questa cosa.
>
http://www.mantuanet.it/alessandro.baraldi/
>
> Se la tua situazione è un pò più articolata, devi scaricare
> una DLL dal sito di Lebans che funziona su tutti gli oggetti.
>
> Non và registrata in quanto è una Win Dll, ma deve risiedere
> nella stessa posizione del tuo MDB.
>
http://www.lebans.com/mousewheelonoff.htm
Vedi anche la FAQ 4.29 "La rotellina del mouse scorre i record"
sul sito indicato sotto... dove si trova anche il link al tuo sito,
@Alex, come abbiamo deciso che sei d'accordo. ;-)
--
cu
Karl
*********
Access FAQ:
www.donkarl.com/it
+info sulla prima Conferenza Italiana per Sviluppatori di Access (CISA1)


title: Rotellina del mouse

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> wrote in message
news:34s61vF...@individual.net
[CUT]

> Vedi anche la FAQ 4.29 "La rotellina del mouse scorre i record"
> sul sito indicato sotto... dove si trova anche il link al tuo sito,
> @Alex, come abbiamo deciso che sei d'accordo. ;-)
Grazie Karl per la citazione.
Ottimo.



title: limite per DMax

author: Laura Pezzolli

text:
Ringrazio prima di tutto chi mi ha aiutato nel mio msg precedente, ma devo
ancora ricorrere al vostro aiuto (comunque sto studiando intensamente
access).
Sto utilizzando (come mi avete suggerito) la funzione DMax per ottenere
l'ultimo numero di ordine, ma la funzione mi ritorna sempre solo 99 come
numero max, mentre se controllo con DCount mi ritorna il numero corretto
dell'ultimo record.
Ho provato ad utilizzare una tabella di prova e tutto funziona
regolarmente, per cui sembrerebbe esserci una limitazione nella tabella
Ordini.
Dove puo' essere sistemata questa limitazione (ricordo a chi non avesse
letto il msg precedene che sto mettendo le mani in un lavoro fatto da un
collega che si licenziato, per cui non ho motlo a disposizione se non
guardare il codice).
Grazie
              Laura Pezzolli
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: limite per DMax

text:
"Laura Pezzolli" <
cpe...@tiscali.it
> ha scritto nel messaggio news:dhtlfj$mot$1...@news.newsland.it...
> Ringrazio prima di tutto chi mi ha aiutato nel mio msg precedente, ma devo
> ancora ricorrere al vostro aiuto (comunque sto studiando intensamente
> access).
>
> Sto utilizzando (come mi avete suggerito) la funzione DMax per ottenere
> l'ultimo numero di ordine, ma la funzione mi ritorna sempre solo 99 come
> numero max, mentre se controllo con DCount mi ritorna il numero corretto
> dell'ultimo record.
>
> Ho provato ad utilizzare una tabella di prova e tutto funziona
> regolarmente, per cui sembrerebbe esserci una limitazione nella tabella
> Ordini.
>
> Dove puo' essere sistemata questa limitazione (ricordo a chi non avesse
> letto il msg precedene che sto mettendo le mani in un lavoro fatto da un
> collega che si licenziato, per cui non ho motlo a disposizione se non
> guardare il codice).
>
>
> Grazie
>              Laura Pezzolli
DCount e DMax fanno cose differenti come puoi notare leggendo l'help in linea; quindi devi decidere se vuoi ottenere (contare) il
numero dei record inseriti (DCount) oppure vuoi ottenere il numero massimo inserito in un campo (DMax)... A te la scelta...
Ciao.
--
Sergio MAZZA


title: limite per DMax

text:
Sergio MAZZA ha scritto:
> "Laura Pezzolli" <
cpe...@tiscali.it
> ha scritto nel messaggio
news:dhtlfj$mot$1...@news.newsland.it...
> > Ringrazio prima di tutto chi mi ha aiutato nel mio msg precedente, ma devo
> > ancora ricorrere al vostro aiuto (comunque sto studiando intensamente
> > access).
> >
> > Sto utilizzando (come mi avete suggerito) la funzione DMax per ottenere
> > l'ultimo numero di ordine, ma la funzione mi ritorna sempre solo 99 come
> > numero max, mentre se controllo con DCount mi ritorna il numero corretto
> > dell'ultimo record.
> >
> > Ho provato ad utilizzare una tabella di prova e tutto funziona
> > regolarmente, per cui sembrerebbe esserci una limitazione nella tabella
> > Ordini.
> >
> >
> > Grazie
> >              Laura Pezzolli
> DCount e DMax fanno cose differenti come puoi notare leggendo l'help in
linea; quindi devi decidere se vuoi ottenere (contare) il
> numero dei record inseriti (DCount) oppure vuoi ottenere il numero massimo
inserito in un campo (DMax)... A te la scelta...
> Ciao.
Non mi sono spiegata bene,
io vorrei ottenere il Massimo valore inserito in un campo, ma utilizzando
quella determinata tabella (Ordini) il valore che ottengo è sempre 99 se i
record sono piu' di 100, il valore esatto se i record sono meno di 100.
Funziona regolarmente con altre tabelle compresa una di prova che ho fatto
io
Quello che non riesco a trovare è dove intervenire per correggere visto
che non sembra che ci siano limitazioni di sorta.
Ho utilizzato DCount per controllare se questa funzione ritorna il numero
di record esatto della tabella e questo funziona.



title: limite per DMax

text:
"Laura Pezzolli" <
cpe...@tiscali.it
> wrote in message
news:dhtq91$c2n$
1...@news.newsland.it
[CUT]
> Non mi sono spiegata bene,
> io vorrei ottenere il Massimo valore inserito in un campo, ma utilizzando
> quella determinata tabella (Ordini) il valore che ottengo è sempre 99 se i
> record sono piu' di 100, il valore esatto se i record sono meno di 100.
> Funziona regolarmente con altre tabelle compresa una di prova che ho fatto
> io
Ti sei spiegata bene, forse sbagli ad usare la funzione
DMAX, prova a postare il codice completo, e specifica
anche il tipo di campi sul quale agisci e che dati contengono
realmente come Massimo.
> Quello che non riesco a trovare è dove intervenire per correggere visto
> che non sembra che ci siano limitazioni di sorta.
>
> Ho utilizzato DCount per controllare se questa funzione ritorna il numero
> di record esatto della tabella e questo funziona.
Dcount non ti serve per questo.
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: limite per DMax

text:
> Non mi sono spiegata bene,
> io vorrei ottenere il Massimo valore inserito in un campo, ma utilizzando
> quella determinata tabella (Ordini) il valore che ottengo è sempre 99 se i
> record sono piu' di 100, il valore esatto se i record sono meno di 100.
> Funziona regolarmente con altre tabelle compresa una di prova che ho fatto
> io
>
>
> Quello che non riesco a trovare è dove intervenire per correggere visto
> che non sembra che ci siano limitazioni di sorta.
>
> Ho utilizzato DCount per controllare se questa funzione ritorna il numero
> di record esatto della tabella e questo funziona.
>
DMax("NomeCampoNumerico","Ordini") ti da il massimo valore del campo
numerico della tabella Ordini.
Dmax funziona benissimo da sempre, ma forse vuoi fare un'altra cosa o al
limite è rovinata
la tabella Ordini. Prova a fare compatta e ripristina.
Ciao.


title: limite per DMax

text:
alex1 ha scritto:


> Ciao.
Ho provato a fare compatta e ripristina ma il valore ritornato è sempre
99, sono invece presenti 253 record che rispondono ai criteri e ovviamente
il valore max è 253.
A me serve mettere in automatico il valore dell'ultimo ordine+1 nella
maschera per un nuovo ordine.
Ciao e grazie



title: limite per DMax

text:
> Ho provato a fare compatta e ripristina ma il valore ritornato è sempre
> 99, sono invece presenti 253 record che rispondono ai criteri e ovviamente
> il valore max è 253.
> A me serve mettere in automatico il valore dell'ultimo ordine+1 nella
> maschera per un nuovo ordine.
>
E' un campo contatore?
E' un campo numerico normale?
Mi puoi postare il codice che scrivi?
Questa riga deve funzionare
DMax("NomeCampoNumerico","Ordini")
altrimenti postami solo la tabella ordini del database e vediamo dove è
l'errore
Ciao ;-)


title: limite per DMax

text:
Alessandro Baraldi ha scritto:





> @Alex
Forse ho trovato l'inghippo nella tabella Ordini il campo
NumeroOrdineAcquisto è un campo di tipo testo e non numerico, solo che è
collegato con molte altre tabelle.
Comunque la funzione Dmax che ho scritto è:
DMax("[NumeroOrdineAcquisto]", "Ordini", "year(DataOrdine) = 2005" & " AND
[IDCasa] = 42 ")
dove i parametri year e IDCasa li ho messi per fare una selezione di
prova.



title: limite per DMax

text:
"Laura Pezzolli" <
cpe...@tiscali.it
> wrote in message
news:dhtsll$o5o$
1...@news.newsland.it
[CUT]
> Forse ho trovato l'inghippo nella tabella Ordini il campo
> NumeroOrdineAcquisto è un campo di tipo testo e non numerico, solo che è
> collegato con molte altre tabelle.
>
> Comunque la funzione Dmax che ho scritto è:
> DMax("[NumeroOrdineAcquisto]", "Ordini", "year(DataOrdine) = 2005" & " AND
> [IDCasa] = 42 ")
> dove i parametri year e IDCasa li ho messi per fare una selezione di
> prova.
BINGO.
Che dire, se è testo non c'azzecca nulla con i numeri, quindi
il criterio applicato non soddisferà mai quello numerico.



title: limite per DMax

text:
alex1 ha scritto:




> Ciao ;-)
Ho provato ad esportare la tabella in un db nuovo per provarla e l'errore
si ripete per cui è qualcosa legato alla tabella.
Il campo NumeroOrdineAcquisto è un campo testo e non me lo fa cambiare con
numerico in quanto "Impossibile modificare questa proprietà in tabelle
collegate", anche se il campo non è direttamente collegato a nessuna
tabella e la tabella è la sola presente nel db di prova.
Struttura della tabella Ordini:
IDOrdine: contatore (chiave primaria)
IDCliente: numerico
IDCasa: numerico
Data:: data/ora
NumeroOrdineAcquisto: testo
poi tutti i campi di descrizione dell'ordine tipo dati e indirizzo di
fattturazione e di consegna



title: limite per DMax

text:
"Laura Pezzolli" <
cpe...@tiscali.it
> ha scritto nel messaggio news:dhtsll$o5o$1...@news.newsland.it...
> Forse ho trovato l'inghippo nella tabella Ordini il campo
> NumeroOrdineAcquisto è un campo di tipo testo e non numerico, solo che è
> collegato con molte altre tabelle.
>
> Comunque la funzione Dmax che ho scritto è:
> DMax("[NumeroOrdineAcquisto]", "Ordini", "year(DataOrdine) = 2005" & " AND
> [IDCasa] = 42 ")
> dove i parametri year e IDCasa li ho messi per fare una selezione di
> prova.
Se il campo IDCasa è quello testuale puoi provare con la funzione CInt (vedi help):
DMax("[NumeroOrdineAcquisto]", "Ordini", "year(DataOrdine) = 2005" & " AND CInt([IDCasa]) = 42 ")
Se però hai dei campi vuoti dovrai gestire anche quelli con la funzione Nz (vedi help):
DMax("[NumeroOrdineAcquisto]", "Ordini", "year(DataOrdine) = 2005" & " AND CInt(Nz([IDCasa];0)) = 42 ")
Ciao.
--
Sergio MAZZA


title: limite per DMax

text:
> Ho provato ad esportare la tabella in un db nuovo per provarla e l'errore
> si ripete per cui è qualcosa legato alla tabella.
> Il campo NumeroOrdineAcquisto è un campo testo e non me lo fa cambiare con
> numerico in quanto "Impossibile modificare questa proprietà in tabelle
> collegate", anche se il campo non è direttamente collegato a nessuna
> tabella e la tabella è la sola presente nel db di prova.
>
> Struttura della tabella Ordini:
>
> IDOrdine: contatore (chiave primaria)
> IDCliente: numerico
> IDCasa: numerico
> Data:: data/ora
> NumeroOrdineAcquisto: testo
> poi tutti i campi di descrizione dell'ordine tipo dati e indirizzo di
> fattturazione e di consegna
>
non te lo fa cambiare perche apri il db sbagliato, tu apri quello con i
collegamenti al vero db.
Ciao ;-)


title: limite per DMax

text:
Scusa mi spiego meglio sulla tabella ordini, vicino a sinistra dovresti
avere una piccola freccia.
Tasto destro su Tabella Ordini poi Gestione Tabelle Collegate e vedi il
percorso del vero
Database.
Ciao.


title: limite per DMax

text:
alex1 ha scritto:

> Ciao.
Non c'e' la voce Gestione tabelle collegate nel menu' contestuale del dx
sulla tabella ordini ma ho comunque trovato il vero db.
è per questo motivo che mi visualizza sempre 99 come valore di Dmax nella
mia interrogazione?
come faccio a bypassare il tutto?
Grazie per il disturbo che vi arreco, ma mi state insegnando molte cose
che se imparate sui libri non sono la stessa cosa



title: limite per DMax

text:
> Non c'e' la voce Gestione tabelle collegate nel menu' contestuale del dx
> sulla tabella ordini ma ho comunque trovato il vero db.
>
> è per questo motivo che mi visualizza sempre 99 come valore di Dmax nella
> mia interrogazione?
No, non centra nulla se le tabelle sono collegate il risultato è giusto
comunque
>
> come faccio a bypassare il tutto?
hai provato su vero database a modificare il campo in numero?
>
> Grazie per il disturbo che vi arreco, ma mi state insegnando molte cose
> che se imparate sui libri non sono la stessa cosa
>
decisamente nessun disturbo, se siamo qui è perchè tutti abbiamo da imparare
;-)


title: Uso di DLookUp

author: Riccardo Baldinotti

text:
Ho elaborato un accrocchio del genere:
stri = DLookup("[comandoMenu]", "tMenu", "[lettera]='" & Chr(KeyCode) & "'
AND idMenu=" & Forms!menu!sottoMenu.Column(0))
che serve a trovare una riga di comando corrispondente a una voce, scelta
premendo il tasto corrispondente, di un menu aperto in quel momento.
Se però si preme un tasto non previsto ottengo errore "utilizzo non valido
di null" (ovviamente).

Potrei fare:
If not isnull(DLookup... then
stri = DLookup...
ma mi ripugna far eseguire due volte lo stesso calcolo.
Certo, tutti i tempi macchina persi in questo modo non arriveranno al
tempo speso per scrivere questo messaggio, ma l'istinto mi dice che debba
esserci un metodo migliore.
Qualcuno può suggerirmelo?
Grazie
Riccardo Baldinotti

--

questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Uso di DLookUp

author: Pablitomf

text:
Riccardo Baldinotti <
riccardo....@qualcosa.it
> ha scritto:

> Ho elaborato un accrocchio del genere:
> stri = DLookup("[comandoMenu]", "tMenu", "[lettera]='" & Chr(KeyCode) & "'
> AND idMenu=" & Forms!menu!sottoMenu.Column(0))
> che serve a trovare una riga di comando corrispondente a una voce, scelta
> premendo il tasto corrispondente, di un menu aperto in quel momento.
> Se però si preme un tasto non previsto ottengo errore "utilizzo non valido
> di null" (ovviamente).
>
> Potrei fare:
> If not isnull(DLookup... then
> stri = DLookup...
> ma mi ripugna far eseguire due volte lo stesso calcolo.
> Certo, tutti i tempi macchina persi in questo modo non arriveranno al
> tempo speso per scrivere questo messaggio, ma l'istinto mi dice che debba
> esserci un metodo migliore.
> Qualcuno può suggerirmelo?
> Grazie
> Riccardo Baldinotti

On error Resume Next

--
------------
Pablitomf
Napoli sempre nel "Q"uore!
"mammasantissima" si nasce, non si diventa.


title: Uso di DLookUp

text:
Pablitomf ha scritto:

> Riccardo Baldinotti <
riccardo....@qualcosa.it
> ha scritto:

> > Ho elaborato un accrocchio del genere:
> > stri = DLookup("[comandoMenu]", "tMenu", "[lettera]='" & Chr(KeyCode) & "'
> > AND idMenu=" & Forms!menu!sottoMenu.Column(0))
> > che serve a trovare una riga di comando corrispondente a una voce, scelta
> > premendo il tasto corrispondente, di un menu aperto in quel momento.
> > Se però si preme un tasto non previsto ottengo errore "utilizzo non valido
> > di null" (ovviamente).
> >
> > Potrei fare:
> > If not isnull(DLookup... then
> > stri = DLookup...
> > ma mi ripugna far eseguire due volte lo stesso calcolo.
> > Certo, tutti i tempi macchina persi in questo modo non arriveranno al
> > tempo speso per scrivere questo messaggio, ma l'istinto mi dice che debba
> > esserci un metodo migliore.
> > Qualcuno può suggerirmelo?
> > Grazie
> > Riccardo Baldinotti

> On error Resume Next

Eh già. E io che mi immaginavo chissà che.
Sempiterna gratitudine.



title: Uso di DLookUp

text:
Riccardo Baldinotti wrote:
> Ho elaborato un accrocchio del genere:
> stri = DLookup("[comandoMenu]", "tMenu", "[lettera]='" & Chr(KeyCode)
> & "' AND idMenu=" & Forms!menu!sottoMenu.Column(0))
> che serve a trovare una riga di comando corrispondente a una voce,
> scelta premendo il tasto corrispondente, di un menu aperto in quel
> momento.
> Se però si preme un tasto non previsto ottengo errore "utilizzo non
> valido di null" (ovviamente).
> ...

stri = nz( DLookup(...) )

--
Ciao
Karl
*********
Access FAQ:
http://www.donkarl.com/it


title: Uso di DLookUp

author: Bruno Campanini

text:
It happens that Riccardo Baldinotti formulated :

> Ho elaborato un accrocchio del genere:
> stri = DLookup("[comandoMenu]", "tMenu", "[lettera]='" & Chr(KeyCode) & "'
> AND idMenu=" & Forms!menu!sottoMenu.Column(0))
> che serve a trovare una riga di comando corrispondente a una voce, scelta
> premendo il tasto corrispondente, di un menu aperto in quel momento.
> Se però si preme un tasto non previsto ottengo errore "utilizzo non valido
> di null" (ovviamente).
>
> Potrei fare:
> If not isnull(DLookup... then
> stri = DLookup...
> ma mi ripugna far eseguire due volte lo stesso calcolo.
> Certo, tutti i tempi macchina persi in questo modo non arriveranno al
> tempo speso per scrivere questo messaggio, ma l'istinto mi dice che debba
> esserci un metodo migliore.
> Qualcuno può suggerirmelo?

Non usare le Domain Function, salvo tu abbia una pistola puntata alla
tempia.

Bruno


title: Uso di DLookUp

text:
Bruno Campanini ha scritto:

Fortunatamente lavoro in un luogo pacifico. :-)
Mi suggerisci di trovare la stringa in un altro modo, dunque. Purtroppo
non mi viene in mente nulla. Il dato sarebbe anche in una colonna della
ListBox che uso come menu, ma come l'acchiappo?
Grazie.



title: Link web approfondimento su files MDE prima della consegna al cliente.

author: Michele (Giò)

text:
Buonasera a tutti.
Tempo indietro ho letto un approfondimento che parlava dei files MDE e su
tutte le metodologie da applicare a proposito di:
-inibire l'accesso con Shift alla finestra del database
-proteggere il software da copie illegali
-gestire licenze
-ecc ecc...
Mi sembra che a questa pagina ci si arrivi da uno dei siti di access
(Sitocomune, Alessandrobaraldi.it,
accessgroup.it
,
donkarl.com
 ecc) ma non
ricordo quale. Siccome è da due giorni che cerco invano, qualcuno ha capito
a cosa mi riferisco e potrebbe gentilmente comunicarmi il link?
Grazie
Michele
joyl...@alice.it


text:
Trovato!
      6.155 Rendere davvero non copiabile una applicazione Access   di
Daniele Bertocci
      Si, forse le parole chiavi da me citate proprio non permettavano di
arrivare a sto articolo....


title: Danny

text:
Salve  a tutti volevo sapere se e possibile formattare una tabelle con un
record di colore bianco e uno di colore giallo, e formattare 2 campi con il
formato iniziale maiuscolo Grazie.


title: Danny

author: Sergio MAZZA

text:
"D.M" <
dmac...@libero.it
> ha scritto nel messaggio
news:cxzbd.41170$H11.1...@twister1.libero.it...

Leggi il messaggio con oggetto: [MANIFESTO] it.comp.appl.access, inviato il
venerdì 15 ottobre 2004 6:07 da: Gruppo Coordinamento NEWS-IT
<
g...@news.nic.it
>
Ciao.
--
Sergio MAZZA


title: accedere ad una proprietà in un ciclo for

author: wild

text:
ho in una maschera una ventina di pulsanti di comando. sono nominati L402
L403 ...L422
voglio modificare la stessa proprietà es. L-iesimo .visible=true in tutti i
pulsanti.
grazie mille


author: Antonio Biso

text:
wild <
wildsu...@libero.it
> wrote in message
atJZ7.32037$s04.1...@news.infostrada.it...

Cicli sull'insieme controls della form. Se devi fare questo per TUTTI i
pulsanti, ti basta testare la proprietà controltype del controllo per vedere
se è un pulsante, altrimenti devi testare il nome. Nel primo caso
for each Ctl in me.controls
  if ctl.controltype = acCommandButton then
    ctl.visible = true
  end if
next
Antonio


text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:%5LZ7.15860$%B.55...@twister2.libero.it...

Quello che ti scrive ANTONIO è giusto, ma se hai altri CommndButton nella
tua FORM
in questo modo viene applicato a tutti.
Solitamente per rendere il Codice più flessibile, si utilizzano
trucchetti....!
Nel senso che se nella tua form hai dei pulsanti che al momento sono
Visibili=no, in questo
sistema dovrai ricordarti di modificare la Routine ed escludere quelli non
interessati....!!!
Io ti consiglio di inserire nella proprietà TAG=1, quidi utilizzando la
Routine di ANTONIO:
Dim ctl as control
for each Ctl in me.controls
   if ctl.controltype = acCommandButton  and ctl.tag=1 then
     ctl.visible = true
   end if
 next
Ciao.
@Alex
--
@Alex
*--------------------------------------------------------------------------*
Alessandro B.
Sito Comune      :
http://www.sitocomune.com
Sito Personale   :
http://digilander.iol.it/ik2zok/
*--------------------------------------------------------------------------*


text:
@Alex <
ik2...@libero.it
> wrote in message
mu_Z7.17571$SE3.6...@twister1.libero.it...

Al tag non avevo mai pensato. Normalmente, quando devo settare alcuni
controlli di un certo tipo, ma non altri dello stesso tipo, uso il nome.
Chiamo i controlli per esempio anteponendo alcuni caratteri che uso solo per
quei controlli (es. CL_nome, CL_Città ecc.) e poi, ciclando, testo i primi 3
caratteri del nome: se sono uguali a CL_ allora ci lavoro sopra, altrimenti
no...
ma ce ne sono di trucchetti sempre validi...
Antonio


author: Alex

text:
"Antonio Biso" <
ch...@etruria.net
> wrote in message
news:nDc_7.19420$%B.67...@twister2.libero.it...
> Al tag non avevo mai pensato. Normalmente, quando devo settare alcuni
> controlli di un certo tipo, ma non altri dello stesso tipo, uso il nome.
> Chiamo i controlli per esempio anteponendo alcuni caratteri che uso solo per
> quei controlli (es. CL_nome, CL_Città ecc.) e poi, ciclando, testo i primi 3
> caratteri del nome: se sono uguali a CL_ allora ci lavoro sopra, altrimenti
> no...
> ma ce ne sono di trucchetti sempre validi...
>
> Antonio
Si come dici è giustissimo, ma con la proprietà TAG eviti operazioni
su stringhe che rallentano, poi, molto comoda per inserire altri riferimenti.
Pochi la usano, come la priprietà OPENARGS.....!
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


text:
Alex <
ik2...@libero.it
> wrote in message
a715534bf458c02a79...@mygate.mailgate.org...

Openargs la uso abbastanza, la tag in effetti la trascuro molto...
Antonio


text:
vi ringrazio per il vostro aiuto ma ho un porblema aggiuntivo:ho bisogno di
sapere il numero che è associato al controllo in quanto devo decidere se
rendere visibile il controllo L402 a seconda se il campo chiamato 402 è
nullo o meno
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:nDc_7.19420$%B.67...@twister2.libero.it...



text:
wild <
wildsu...@libero.it
> wrote in message
QIm_7.41314$s04.1...@news.infostrada.it...
> vi ringrazio per il vostro aiuto ma ho un porblema aggiuntivo:ho bisogno
di
> sapere il numero che è associato al controllo in quanto devo decidere se
> rendere visibile il controllo L402 a seconda se il campo chiamato 402 è
> nullo o meno
Scrivi dopo il quoting!!!
Sei complicato eh?
Stai parlando di un campo di una tabella o di un controllo della maschera?
in ogni caso si inverte la situazione:
cicli sui campi della tabella o i controlli testo della maschera
Per ognuno di essi testi se è nullo o no, se non è nullo, sapendo che il suo
nome è nella variabile app farai
me.controls("L" & app).visible = true
Antonio


title: aiuto con casellecombinate

author: nembo

text:
Ho creato una maschera di inserimento ed all'interno della stessa ho creato
delle caselle combinate da dove io selezionando la prima e mi scrive
automaticamente le altre 4. tutto questo grazie al seguente codice
Private Sub CasellaCombinata82_AfterUpdate()
Me.CasellaCombinata82 = Me.CasellaCombinata82.Column(1)
Me.CasellaCombinata94 = Me.CasellaCombinata82.Column(2)
Me.CasellaCombinata96 = Me.CasellaCombinata82.Column(3)
Me.CasellaCombinata98 = Me.CasellaCombinata82.Column(4)
Me.CasellaCombinata100 = Me.CasellaCombinata82.Column(5)
Me.CasellaCombinata102 = Me.CasellaCombinata82.Column(6)
Me.Data.SetFocus
End Sub
Queste caselle prendono i loro dati da una tabella creata appositamente.
ora il mio problema è che anche se aggiorno questa tabella con altri
inserimenti la casella combinata vede si l'aggiornamento, ma non le
seleziona per aggiornamento della tabella di inserimento.
grazie a tutti quelli che mi risponderanno e spero di essere stato chiaro.
Lelexx


title: aiuto con casellecombinate

author: cidi

text:
"nembo" <
bfer...@libero.it
> ha scritto nel messaggio
news:37GCb.187531$e6.70...@twister2.libero.it...
> Ho creato una maschera di inserimento ed all'interno della stessa ho
creato
> delle caselle combinate da dove io selezionando la prima e mi scrive
> automaticamente le altre 4. tutto questo grazie al seguente codice
> Private Sub CasellaCombinata82_AfterUpdate()
> Me.CasellaCombinata82 = Me.CasellaCombinata82.Column(1)
> Me.CasellaCombinata94 = Me.CasellaCombinata82.Column(2)
> Me.CasellaCombinata96 = Me.CasellaCombinata82.Column(3)
> Me.CasellaCombinata98 = Me.CasellaCombinata82.Column(4)
> Me.CasellaCombinata100 = Me.CasellaCombinata82.Column(5)
> Me.CasellaCombinata102 = Me.CasellaCombinata82.Column(6)
> Me.Data.SetFocus
Me.Refresh
> End Sub
> Queste caselle prendono i loro dati da una tabella creata appositamente.
> ora il mio problema è che anche se aggiorno questa tabella con altri
> inserimenti la casella combinata vede si l'aggiornamento, ma non le
> seleziona per aggiornamento della tabella di inserimento.
>
> grazie a tutti quelli che mi risponderanno e spero di essere stato chiaro.
> Lelexx
>
Prova a inserire  Me.Refresh
Ciao Daniele


title: aiuto con casellecombinate

text:
Ho provato ad inserire me.refresh
ma nulla non va.
forse però non mi sono spiegato bene.
tramite un'altra maschera inserisco i dati che mi servono poi da inserire
automaticamente nelle casellecombinate.
il problema è che le "vede" nel senso che me le fa selezionare, ma non le
scrive all'interno delle altre caselle combinate collegate.
"cidi" <
dadonzin...@tin.it
> ha scritto nel messaggio
news:EfGCb.204856$hV.78...@news2.tin.it...



title: aiuto con casellecombinate

text:
"nembo" <
bfer...@libero.it
> ha scritto nel messaggio
news:YtGCb.187601$e6.70...@twister2.libero.it...
> Ho provato ad inserire me.refresh
> ma nulla non va.
> forse però non mi sono spiegato bene.
> tramite un'altra maschera inserisco i dati che mi servono poi da inserire
> automaticamente nelle casellecombinate.
> il problema è che le "vede" nel senso che me le fa selezionare, ma non le
> scrive all'interno delle altre caselle combinate collegate.
>
Scrivi il tuo messaggio dopo il testo di quello precedente, come faccio io;
grazie.
Dopo che hai inserito i dati devi effettuare un requery della casella
combinata, magari la inserisci nell'evento "su chiusura" della form...
Ciao.
--
Sergio MAZZA


title: Tre domande relative ad Access 2007

author: Oscar Manfredini

text:
... rivolte a chi lo utilizzi da tempo "sul campo":
1) Le prestazioni del nuovo Engine (ACE) sono analoghe a JET 4.0 o risultano
evidenti decadimenti (soprattutto su Set di Records molto ampi)?
2) Le prestazioni in connessione ODBC a SQL Server sono analoghe alle
release precedenti o vi pare pi� lento?
3) La versione Runtime di Access 2007 funziona adeguatamente?
Ciao a tutti


title: Cosa serve per migrare mdb a sql?

author: Popi - TheBadHabits

text:
Buongiorno a tutti.

Il problema non è studiare, bensì sapere cosa studiare, ed in questo momento non ho la più pallida idea di cosa mi serva per migrare il mio mdb che:
- contiene solo tabelle e relazioni,
- è visibile a FE AccessXP/03/07,
- si trova in LAN,
- è condiviso da 30 utenti (di solito almeno 15-20 contemporanei).

N.b.: chiedo qui e a voi a causa di filtri, proxy e cippalippe varie applicati alla rete aziendale.

TIA
Popi


title: Cosa serve per migrare mdb a sql?

author: BFS

text:

prima di tutto imparare i tipi di dati usati da sqlserver e le
differenze rispetto ai dati del mdb

se usi i file adp per collegarti poi devi imparare a convertire tutte le
query in view e stored procedure

per quanto riguarda il codice, devi usare ado invece di dao

sulle forms infine ci sono alcune differenze e accorgimenti da rispettare

il passaggio non è insomma indolore...anzi richiede pazienza
ma i vantaggi in termini di stabilità e prestazioni sono valgono
ampiamente la fatica

ciao
BFS


title: Cosa serve per migrare mdb a sql?

text:
Il giorno martedì 3 aprile 2012 11:24:39 UTC+2, BFS ha scritto:
> Il 03/04/2012 10:12, Popi - TheBadHabits ha scritto:
> > Il problema non è studiare, bensì sapere cosa studiare, ed in questo momento non ho la più pallida idea di cosa mi serva per migrare il mio mdb che:
> > - contiene solo tabelle e relazioni,
> > - è visibile a FE AccessXP/03/07,
> > - si trova in LAN,
> > - è condiviso da 30 utenti (di solito almeno 15-20 contemporanei).
>
> prima di tutto imparare i tipi di dati usati da sqlserver e le
> differenze rispetto ai dati del mdb
>
> se usi i file adp per collegarti poi devi imparare a convertire tutte le
> query in view e stored procedure
>
> per quanto riguarda il codice, devi usare ado invece di dao
>
> sulle forms infine ci sono alcune differenze e accorgimenti da rispettare
>
> il passaggio non è insomma indolore...anzi richiede pazienza
> ma i vantaggi in termini di stabilità e prestazioni sono valgono
> ampiamente la fatica

Ciao!
No problem sui tipi di dato: mi documenterò (dove?) su testo, memo, intero lungo, booleano, precisione doppia, data/ora.

Comunque il FE è un MDE generato con AXP e fatto girare sotto AXP/A03/A07 (in base a quale sia installato sulla macchina utente).

Perché ADO?
Pensavo che collegando le tabelle da db SQL anziché da MDB a livello di codice l'impatto ad esempio (!) sulle openrecordset fosse relativo a "parametri specifici" (opzioni come dbopentable, per intenderci), non è così?

Un esempio di differenze ed accorgimenti sulle form?
La cosa vale anche per i report?

Non potrebbe essere comunque un passaggio indolore, dato che i numeri da smazzare sono >170 form, 30 moduli, >300 report, >900 query ...

TIA
Popi


title: Cosa serve per migrare mdb a sql?

text:
Il giorno martedì 3 aprile 2012 11:24:39 UTC+2, BFS ha scritto:
> Il 03/04/2012 10:12, Popi - TheBadHabits ha scritto:
> > Buongiorno a tutti.
> >
> > Il problema non è studiare, bensì sapere cosa studiare, ed in questo momento non ho la più pallida idea di cosa mi serva per migrare il mio mdb che:
> > - contiene solo tabelle e relazioni,
> > - è visibile a FE AccessXP/03/07,
> > - si trova in LAN,
> > - è condiviso da 30 utenti (di solito almeno 15-20 contemporanei).

Piccola precisazione ulteriore: oltre che cosa studiare mi servirebbe anche sapere cosa installare ...

TIA
Popi


title: Cosa serve per migrare mdb a sql?

author: sv

text:
Popi - TheBadHabits ha scritto:


Da anni ormai utilizzo FE+SQLExpress collegati ODBC.
Mai avuto problemi.
Il passaggio è stato indolore. Qualche piccolo accorgimento: le tabelle
debbono essere dotate di un contatore PK e inserimento di un campo
timestamp.

--
sv

--

questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Cosa serve per migrare mdb a sql?

text:
Il giorno martedì 3 aprile 2012 12:38:38 UTC+2, sv ha scritto:
> Popi - TheBadHabits ha scritto:
>
> > Buongiorno a tutti.
>
> > Il problema non è studiare, bensì sapere cosa studiare, ed in questo momento
> non ho la più pallida idea di cosa mi serva per migrare il mio mdb che:
> > - contiene solo tabelle e relazioni,
> > - è visibile a FE AccessXP/03/07,
> > - si trova in LAN,
> > - è condiviso da 30 utenti (di solito almeno 15-20 contemporanei).
>
> > N.b.: chiedo qui e a voi a causa di filtri, proxy e cippalippe varie
> applicati alla rete aziendale.
>
> > TIA
> > Popi
>
> Da anni ormai utilizzo FE+SQLExpress collegati ODBC.
> Mai avuto problemi.
> Il passaggio è stato indolore. Qualche piccolo accorgimento: le tabelle
> debbono essere dotate di un contatore PK e inserimento di un campo
> timestamp.

Ciao Salvino.

Con SqlExpress intendi questo?
http://www.microsoft.com/sqlserver/en/us/editions/express.aspx

Se il db sql si deve trovare su una cartella di rete ... il software andrà installato sul server che la ospita?

Le tabelle hanno già tutte una PK, va bene così o devo aggiungerne un'altra basata su campi contatore???
Studierò il campo timestamp.

TIA
Popi


title: Cosa serve per migrare mdb a sql?

text:

per prima cosa decidi se vuoi usare i file adp che si appoggiano
nativamente a sql server o usare la connessione ODBC come ti diceva SV
personalmente mi trovo molto meglio con la prima, ora che ho
famigliarizzato con stored procedure e view
Con ODBC sicuramente il passaggio è meno traumatico ma da un test che
avevo fatto a suo tempo ho notato prestazioni in rete nettamente inferiori

ciao
BFS


title: Cosa serve per migrare mdb a sql?

text:

Non apro dispute ado vs dao, ma porto la mia esperienza. Sql express
in rete lan con client in A2003/2007. Connessione ODBC. Applicativo
con quasi 200 form e nn so manco quante query. A parte qualche
accorgimento il passaggio è stato praticamente indolore, più la paura
dell'upgrade che il vero e proprio upgrade. Poi, con calma, stò
trasformando cicli e query 'pesanti' in stored e view. Ma il lavoro va
avanti senza rallentamenti e le prestazioni aumentano pian piano.
Facendo in questo modo ho potuto sveltire la migrazione (qualche
settimana per familiarizzare con le differenza mdb/sql, dati boolean,
formati data e cambiare le relative procedure) e poi dedicarmi ai
meandri di SQL server


title: Cosa serve per migrare mdb a sql?

text:
Il giorno martedì 3 aprile 2012 13:11:23 UTC+2, BFS ha scritto:
> per prima cosa decidi se vuoi usare i file adp che si appoggiano
> nativamente a sql server o usare la connessione ODBC come ti diceva SV
> personalmente mi trovo molto meglio con la prima, ora che ho
> famigliarizzato con stored procedure e view
> Con ODBC sicuramente il passaggio è meno traumatico ma da un test che
> avevo fatto a suo tempo ho notato prestazioni in rete nettamente inferiori

Ciao!
Al momento il nocciolo della questione è tutto sulla facilità di implementazione, a maggior ragione se le prestazioni via ODBC sono come minimo le stesse via JET/MDB (BTW per varie ragioni non credo che passerò il FE a ADP).

Comunque grazie di tutto :)

Popi


title: Cosa serve per migrare mdb a sql?

text:
Il giorno martedì 3 aprile 2012 14:21:29 UTC+2, Fair87 ha scritto:
> Non apro dispute ado vs dao, ma porto la mia esperienza. Sql express
> in rete lan con client in A2003/2007. Connessione ODBC. Applicativo
> con quasi 200 form e nn so manco quante query. A parte qualche
> accorgimento il passaggio è stato praticamente indolore, più la paura
> dell'upgrade che il vero e proprio upgrade. Poi, con calma, stò
> trasformando cicli e query 'pesanti' in stored e view. Ma il lavoro va
> avanti senza rallentamenti e le prestazioni aumentano pian piano.
> Facendo in questo modo ho potuto sveltire la migrazione (qualche
> settimana per familiarizzare con le differenza mdb/sql, dati boolean,
> formati data e cambiare le relative procedure) e poi dedicarmi ai
> meandri di SQL server

Yes, l'idea è proprio quella: cambiare il meno possibile (teoricamente solo il DBMS in cui sono memorizzati i dati) per avere il sistema up&running in tempo zero, e poi passare a migliorare dove necessario.

BTW perché trasformare le query?
Al momento le ho tutte nel FE ....

Popi


title: Cosa serve per migrare mdb a sql?

text:
on 03-04-12, Popi - TheBadHabits supposed :

Rispondo anche a Fair87 che dichiara fra l'altro:
"quasi 200 form e nn so manco quante query"

Ma cosa ve ne fate di tante query?

Io ho un'applicazione (contabilità) con 110 Tab, 203 Form, 164 Report,
44314 linee di programma, 0 Macro, 0 Query!
Debbo considerarmi un marziano?

Bruno

PS
Per query intendo quelle che appaiono sulla finestra database, non
quelle create al volo con codice VBA; queste non sono in grado di
contarle.


title: Cosa serve per migrare mdb a sql?

text:

in mdb concordo che sono inutili.
in una applicazione che poggia su sql server è fondamentale averne il
più possibile. (intese come stored procedure)

BFS


title: Cosa serve per migrare mdb a sql?

text:
Il giorno martedì 3 aprile 2012 14:55:05 UTC+2, Bruno Campanini ha scritto:
> Rispondo anche a Fair87 che dichiara fra l'altro:
> "quasi 200 form e nn so manco quante query"
>
> Ma cosa ve ne fate di tante query?
>
> Io ho un'applicazione (contabilità) con 110 Tab, 203 Form, 164 Report,
> 44314 linee di programma, 0 Macro, 0 Query!
> Debbo considerarmi un marziano?
>
> Bruno
>
> PS
> Per query intendo quelle che appaiono sulla finestra database, non
> quelle create al volo con codice VBA; queste non sono in grado di
> contarle.

Ciao Bruno.

Forse per deformazione professionale (leggi "facilità di documentazione") ogni form/report hanno la loro bella query (con stesso nome!).

Ovviamente ne ho diverse che costruisco a codice, ma la maggior parte sono salvate.
Anche perché in diversi casi ho query che richiamano altre query basate a loro volta su query di query ...

Nel mio caso si tratta di sw per studi di affidabilità e manutenibilità di grandi impianti, ed in diversi casi c'è da raggruppare i dati, estrarne alcuni, sommarne altri, e poi magari dividere i sommati per quelli estratti ed infine unirli ai dati di partenza ... PAURA!!!

Popi


title: Cosa serve per migrare mdb a sql?

text:
Popi - TheBadHabits ha scritto:

> Il giorno martedì 3 aprile 2012 12:38:38 UTC+2, sv ha scritto:
> > Popi - TheBadHabits ha scritto:
> >
> > > Buongiorno a tutti.
> >
> > > Il problema non è studiare, bensì sapere cosa studiare, ed in questo
momento
> > non ho la più pallida idea di cosa mi serva per migrare il mio mdb che:
> > > - contiene solo tabelle e relazioni,
> > > - è visibile a FE AccessXP/03/07,
> > > - si trova in LAN,
> > > - è condiviso da 30 utenti (di solito almeno 15-20 contemporanei).
> >
> > > N.b.: chiedo qui e a voi a causa di filtri, proxy e cippalippe varie
> > applicati alla rete aziendale.
> >
> > > TIA
> > > Popi
> >
> > Da anni ormai utilizzo FE+SQLExpress collegati ODBC.
> > Mai avuto problemi.
> > Il passaggio è stato indolore. Qualche piccolo accorgimento: le tabelle
> > debbono essere dotate di un contatore PK e inserimento di un campo
> > timestamp.

> Ciao Salvino.

> Con SqlExpress intendi questo?
>
http://www.microsoft.com/sqlserver/en/us/editions/express.aspx

Come passano gli anni :-) Io sono alla versione 2005 e gira che è un
orologio.

> Se il db sql si deve trovare su una cartella di rete ... il software andrà
installato sul server che la ospita?

SQL Express deve essere installato sul server assieme a SSMSE (SQL Server
Management Studio Express) che è la splendida interfaccia grafica.
SSMSE la puoi installare anche sul tuo PC e gestire SQLExpress senza
andare fisicamente sul server.
Una volta installato SQLexpress il tuo vecchio BE diventa un file .mdf +
ldf e fisicamente li metti dove vuoi. Io utilizzo in azienda una cartella
condivisa sul server.
Ai database puoi dare i permessi che vuoi riguardo l'accesso degli utenti.
Puoi pertanto stabilire chi può accedere.

Ripeto una cosa molto semplice.

> Le tabelle hanno già tutte una PK, va bene così o devo aggiungerne un'altra
basata su campi contatore???

Fai la prova. Se ti permette di editare, inserire, cancellare un record è
a posto.
In CISA.net 2008 avevamo l'ottima relazione di Giorgio Rancati
sull'argomento.

> Studierò il campo timestamp.

E' un campo binario che serve a SQLexpress. Lo aggiungi alle tabelle.

> TIA
> Popi



title: Cosa serve per migrare mdb a sql?

text:
[cut]

Scaricati questo white paper per il 2005, ma penso che i concetti siano
sempre gli stessi.

http://www.google.it/url?sa=t&rct=j&q=&esrc=s&frm=1&source=web&cd=1&ved=0CCcQFjAA&url=http%3A%2F%2Fdownload.microsoft.com%2Fdownload%2F8%2Fe%2F7%2F8e726318-0357-4cbc-a68d-ed6b5380efbf%2FMgSQLExpwSSMSE.rtf&ei=owl7T8fuC_OM4gSg4PSHBA&usg=AFQjCNF_UyT5RO2dDfnnirk7ak7Pb1EJnw&sig2=iTndGTuQDe50TZnqzKR21A




title: Cosa serve per migrare mdb a sql?

text:

Ciao Bruno, macchè marziano!!!! Anzi, mi chiedo come tu faccia a nn
avere query memorizzate......
Per quanto mi riguarda, 1 form = 1 query, 1 rpt = 1 query, quando non
sono costretto dagli eventi a costruirle on the fly. Quindi non dico
200 Form = 200 qry ma quasi.....più tutte le insert, update.....nelle
query di selezione Access ho notato essere + performante se si usa il
QBE piuttosto che il VBA. Quando posso, anche per comodità di
parametrizzazione, uso le qry memorizzate (ah...che meraviglia non
doversi preoccupare di formati di data, campi nulli ecc ecc eccc...),
se no vba a palla de foco....


title: Cosa serve per migrare mdb a sql?

text:
sv ha scritto:

> [cut]

> Scaricati questo white paper per il 2005, ma penso che i concetti siano
> sempre gli stessi.

>
http://www.google.it/url?sa=t&rct=j&q=&esrc=s&frm=1&source=web&cd=1&ved=0CCcQFjAA&url=http%3A%2F%2Fdownload.microsoft.com%2Fdownload%2F8%2Fe%2F7%2F8e726318-0357-4cbc-a68d-ed6b5380efbf%2FMgSQLExpwSSMSE.rtf&ei=owl7T8fuC_OM4gSg4PSHBA&usg=AFQjCNF_UyT5RO2dDfnnirk7ak7Pb1EJnw&sig2=iTndGTuQDe50TZnqzKR21A

> --
> sv

Su AccessGroup ho inserito la relazione di Giorgio:

http://lnx.accessgroup.it/community/tabelle/mdb-accdb-e-microsoft-sql-server-via-odbc.html




title: Cosa serve per migrare mdb a sql?

text:
Fair87 wrote :

> Ciao Bruno, macchè marziano!!!! Anzi, mi chiedo come tu faccia a nn
> avere query memorizzate......
> Per quanto mi riguarda, 1 form = 1 query, 1 rpt = 1 query, quando non
> sono costretto dagli eventi a costruirle on the fly. Quindi non dico
> 200 Form = 200 qry ma quasi.....più tutte le insert, update.....nelle
> query di selezione Access ho notato essere + performante se si usa il
> QBE piuttosto che il VBA. Quando posso, anche per comodità di
> parametrizzazione, uso le qry memorizzate (ah...che meraviglia non
> doversi preoccupare di formati di data, campi nulli ecc ecc eccc...),
> se no vba a palla de foco....

Anch'io uso un'infinità di Query/subQuery sempre in ambito VBA, per
filtrare, per aggregare, per creare controlli calcolati di
scheda/report  (per esempio in luogo delle domain function DSum, DCount
etc che proprio non uso mai).
E come record source di Form/Report.

Quanto alle performance non me ne son mai preoccupato: uso processori
piuttosto allegri e RAM in abbondanza.

Bruno


title: spezzare percorso file

author: Alberto Luzi

text:
Salve!
Vorrei spezzare questo percorso da vba:
"c:\windows\notepad.exe" "c:\cartella note\nota1"
cioè:
1-"c:\windows\notepad.exe"
2-"c:\cartella note\nota1"
grazie


title: spezzare percorso file

text:

Usa le funzioni stringa come Mid$(...) individuando la posizione del carattere [Spazio] che userai nella funzione Mid$ per specificare nel primo caso dove troncare, nel secondo da dove iniziare...

@Alex


title: spezzare percorso file

text:

non ho capito se quella stringa ti arriva in vba con gli apici oppure no
ad ogni modo se vuoi separare il nome del exe da quel che viene dopo,
dove l'exe potrebbe non essere sempre notepad potresti splitare la
stringa cosi

Dim p() As String
p= Split("c:\windows\notepad.exe c:\cartella note\nota1", ".exe ")
Debug.Print "1-" & p(0) & ".exe"
Debug.Print "2-" & p(1)

BFS


title: spezzare percorso file

text:

però se il nome dell'eseguibile è variabile con mid potresti non beccare
il primo spazio
esempio

"C:\Program Files (x86)\Adobe\Acrobat Reader DC\Reader\acrord32.exe
c:\cartella note\nota1 "

BFS


title: spezzare percorso file

text:

grazie


title: spezzare percorso file

author: Ammammata

text:
Il giorno Thu 20 Jan 2022 03:53:03p, *@Alex* ha inviato su
it.comp.appl.access il messaggio
news:327250fd-f664-4638...@googlegroups.com
. Vediamo
cosa ha scritto:

> Il giorno giovedě 20 gennaio 2022 alle 15:19:20 UTC+1 Alberto Luzi ha
> scritto:
>> Salve!
>> Vorrei spezzare questo percorso da vba:
>> "c:\windows\notepad.exe" "c:\cartella note\nota1"
>> cioč:
>> 1-"c:\windows\notepad.exe"
>> 2-"c:\cartella note\nota1"
>> grazie
>
> Usa le funzioni stringa come Mid$(...) individuando la posizione del
> carattere [Spazio] che userai nella funzione Mid$ per specificare nel
> primo caso dove troncare, nel secondo da dove iniziare...
>

piů precisamente deve cercare virgolette spazio virgolette... tra
virgolette :) in modo da escludere eventuali spazi all'interno delle due
parti

temo che debba ricorrere a qualcosa tipo chr(34)+chr(32)+chr(34) come
parametro di ricerca

--
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\
-=- -=- -=- -=- -=- -=- -=- -=- - -=-
........... [ al lavoro ] ...........


title: spezzare percorso file

text:

si in effetti ho questo riusultato
" "C:\ecc. ecc.
se poi faccio con replace ho:
""C:\ecc. ecc.


title: spezzare percorso file

text:

ho poi messo
Mid(p(1), 3)


title: spezzare percorso file

text:
Il giorno giovedì 20 gennaio 2022 alle 15:53:05 UTC+1 @Alex ha scritto:

ciao Alex
ho provando con  Mid, però rimane un carattere a destra da togliere
a = "c:\windows\notepad.exe" "c:\cartella note\nota1"
Debug.Print Mid$(a, InStr(a, "EXE") + 6)


title: spezzare percorso file

text:

Temo che sia impossibile che la variabile [a] possa essere valorizzata da quella stringa, gli apici interni sono in conflitto.
Quel percorso, è costruito non come lo leggi o lo mostri ma sicuramente usando i CHR(34) o il raddoppio degli apici... quindi sarebbe necessario prima capire come è realmente.

Per capirci:
a = Chr(34) & "c:\windows\notepad.exe" & Chr(34) & " " & Chr(34) & "c:\cartella note\nota1" & Chr(34)

Quindi potrebbe essere replicabile in questo modo con i CHR(34):
Function Test()
 Dim a as String
 a = Chr(34) & "c:\windows\notepad.exe" & Chr(34) & " " & Chr(34) & "c:\cartella note\nota1" & Chr(34)
 Debug.Print a, Mid(a, 1, InStr(a, " ") - 1), Mid(a, InStr(a, " ") + 1, 255)
End Function

oppure con la duplicazione dei doppi Apici:
Function Test()
 Dim a as String
 a = Chr(34) & "c:\windows\notepad.exe""" & " " & """c:\cartella note\nota1" & Chr(34)
 Debug.Print a, Mid(a, 1, InStr(a, " ") - 1), Mid(a, InStr(a, " ") + 1, 255)
End Function

@Alex


title: spezzare percorso file

text:

Grazie Alex


title: Password per Valoriz_Scorte.mdb

author: Marco

text:
Salve,
scusate se la domanda è poco ortodossa (se lo fosse chiedo
anticipatamente scusa a tutto il ng): ho scaricato dal sito MS il file
di esempio che ho scritto nell'oggetto del messaggio.
Volevo studiare il codice VB che è contenuto in questo file, ma è
protetto da password.
Qualcuno sa quale è la password?
Ripeto, se la domanda fosse offensiva o andasse contro il regolamento
del ng, chiedo anticipatamente scusa a tutti.
Saluti.
Marco


title: Password per Valoriz_Scorte.mdb

author: Carlo Costarella

text:
"Marco" <
emmebiTOGL...@tiscali.it
> ha scritto nel messaggio
news:Ksfyd.554811$35.23...@news4.tin.it...
> Salve,
> scusate se la domanda č poco ortodossa (se lo fosse chiedo anticipatamente
> scusa a tutto il ng): ho scaricato dal sito MS il file di esempio che ho
> scritto nell'oggetto del messaggio.
>
> Volevo studiare il codice VB che č contenuto in questo file, ma č protetto
> da password.
>
> Qualcuno sa quale č la password?
>
> Ripeto, se la domanda fosse offensiva o andasse contro il regolamento del
> ng, chiedo anticipatamente scusa a tutti.
>
> Saluti.
>
> Marco
>
Ciao Marco
prima di rispondere vorrei scaricare il db in questione.
Puoi postare il link?
Ciao, Carlo


title: Password per Valoriz_Scorte.mdb

text:
Carlo Costarella ha scritto:
> Ciao Marco
> prima di rispondere vorrei scaricare il db in questione.
> Puoi postare il link?
> Ciao, Carlo
>
Ciao, il link è questo:
http://www.microsoft.com/italy/pmi/comefare/finanza/valorizzazionescorte/article/article1.mspx
Devi avere un profilo passport per poterlo scaricare.
Ciao


title: Password per Valoriz_Scorte.mdb

text:
"Marco" <
emmebiTOGL...@tiscali.it
> ha scritto nel messaggio
news:eIfyd.554904$35.23...@news4.tin.it...

Ciao
ho provato a scaricare il file indicato e risulta composto da due file.
Il codice VBA è protetto da password e, per le mie conoscenze, non conosco
il sistema per conoscere tale password.
Forse con una richiesta a Microsoft o agli autori del programma potresti
riuscire ad averla.
Il modulo contiene tre funzioni: Calcolo_CMP, LIFO e Verifica_Movimenti.
Ciao, Carlo


text:
Salve!
vorrei togliere le prime tre lettere da una stringa
p.e. CboCliente -> Cliente

Grazie


title: togliere le prime tre lettere da una stringa

text:

Mid$(MyCbo.Name, 4)


author: Giacobino da Tradate

text:
Il giorno Sat, 16 Oct 2021 01:22:50 -0700 (PDT)
Alberto Luzi <
luzial...@gmail.com
> ha scritto:

per togliere le prime tre a sinistra, devi sapere quanto e' lunga la
stringa, togli tre e prendi quello che avanza a destra

pseudocodice:  right$(MyCbo.name, Length$(MyCbo.name)-3)

--
"Le Mondine" Fan Club


text:
> per togliere le prime tre a sinistra, devi sapere quanto e' lunga la
> stringa, togli tre e prendi quello che avanza a destra
>
> pseudocodice: right$(MyCbo.name, Length$(MyCbo.name)-3)
>

Sicuro di non esserti inventato qualche cosa... ?
Non esiste Lenght$ esiste LEN(...)

@Alex


text:
Il giorno Sun 17 Oct 2021 03:40:21p, *@Alex* ha inviato su
it.comp.appl.access il messaggio news:2d88ae9f-c14e-451b-b2fc-
11388a...@googlegroups.com
. Vediamo cosa ha scritto:

> Sicuro di non esserti inventato qualche cosa... ?
> Non esiste Lenght$ esiste LEN(...)
>

č abbastanza frequente quando si programma in piů linguaggi scambiare un
comando con un altro, p.e. VBA & SQL & SAP & etc

ci si accorge subito quando c'č il controllo della sintassi, cosa che p.e.
nel mio xnews manco me la posso sognare, ma notepad++ lo fa

--
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\
-=- -=- -=- -=- -=- -=- -=- -=- - -=-
........... [ al lavoro ] ...........


text:
Il giorno Sun, 17 Oct 2021 06:40:21 -0700 (PDT)
"@Alex" <
ik2...@libero.it
> ha scritto:

> > pseudocodice: right$(MyCbo.name, Length$(MyCbo.name)-3)

> Sicuro di non esserti inventato qualche cosa... ?

Ma l'avevo anche scritto che e' "pseudocodice", ossia indicavo il
procedimento generico. Poi la sintassi cambia da linguggio a linguaggio.

https://it.wikipedia.org/wiki/Pseudocodice

ciao



text:
Questo è un NG di VBA... in cui chi scrive non è sicuramente esperto... quindi lo pseudocodice serve a fare pseudoconfusione...

Saluti
@Alex


title: Tendenza

author: Marco ESMACH

text:
Data una tabella con i campi articolo, data e quantità,
vorrei estrarre una tabella con i campi:
articolo, tendenza_mensile
Tendenza_mensile è calcolato sommando le quantità per articolo e per
mese e, usando quella serie di valori facendo quello che excel fa con
la funzione previsione o tendenza.
Grazie


title: Tendenza

author: miciomao

text:
In questo periodo le ciabatte da mare credo :)
Ho visto la formula ma non ho capito molto.
tendenza cosa tira fuori alla fine? i 10 prodotti più gettonati al
mese ?
Qualche esempio con pochi dati ?
Ciao
Alex


title: Tendenza

text:
On 4 Ago, 13:47, miciomao <
audiot...@tiscali.it
> wrote:
> Qualche esempio con pochi dati ?
Semplificando, supponiamo di avere un solo articolo e due soli mesi.
Supponiamo questi record data, quantità
01/01   2
05/01   8
12/02   20
Quindi in gennaio 10 pezzi e in febbraio 20.
La tendenza per il mese successivo è 30.
L'output che cerco è la tabella con i campi articolo, tendenza:
A   30
...
...


title: Tendenza

text:
Io ti consiglio di attivare i riferimenti microsoft excel così potrai
richiamare le sue formule native
direttamente in access:
http://support.microsoft.com/default.aspx?scid=kb;en-us;198571
Altimenti ci sono nel web alcuni esempi cercando la parola chiave
"trend function" o roba simile
tipo questo
http://bytes.com/topic/access/answers/701643-calculating-weighted-average-access
Ciao
Alex


title: controllo sequenza numeri

author: KKKXXX

text:
ho creato un db per il protocollo dei documenti, inserisco manualmente il
numero attribuito ad ogni documento ( ho evitato di considerare un campo
contatore), ho previsto un controllo per evitare la duplicazione dei numeri
( non è possibile inserire documenti con lo stesso numero) attraverso
l'applicazione di un indice, mi chiedevo se fosse possibile anche un
controllo per evitare che non ci siano numeri mancanti  ossia buchi nella
sequenza perchè ho saltato un numero.
ciao e grazie


title: controllo sequenza numeri

author: PBsoft

text:
[omissis]
La risposta in questo post di Alex:
http://groups.google.com/group/it.comp.lang.visual-basic/msg/ced9f8730cf56717?hl=en&
p.s.: ma fa proprio cosě schifo Google?
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype:pbsoftsolution


title: controllo sequenza numeri

text:
> p.s.: ma fa proprio cosě schifo Google?
hai ragione potevo "googlare" con piu' impegno, chiedo venia...
intanto provo con il consiglio del post.
ciao e grazie


title: Rendere non accessibile una cartella da Windows tramite A97

author: Massimo Lista

text:
Tramite maschere accedo a file.doc con diversi livelli  (sola lettura o
modifica) a seconda della password di accesso.
Il problema é quello di evitare l'accesso ai files.doc tramite esplora
risorse.
Su
www.astalavista.com
 ho letto che ci sono dei trucchi per evitare
l'accesso ad una  cartella da windows , tra cui quello di rinominare la
cartella - sotto dos  - facendo precedere il nome della cartella da ALT+194
o altro carattere non riconosciuto da window).
A questo punto una soluzione potrebbe essere:
- su evento apertura maschera rinominare la cartella nel formato
riconoscibile da Windows
- su evento chiusura rinominare la cartella nel formato non riconoscibile da
Windows
Ma come si fa a cambiare nome alla cartella da codice ? (l'istruzione dos é
> ren nomecartella  ALT+194 nomecartella).
Esiste forse una soluzione diversa al mio problema ?
Grazie.
Massimo


author: Mrok

text:
"Massimo Lista" <
lis...@tiscalinet.it
> ha scritto nel messaggio
news:P_e38.31118$tl3.9...@twister2.libero.it...

Prova a Vedere l'istruzione Name nell'Help


author: Emyr

text:


per inviare comando dos usa shell
Saluti.
Emanuele.


text:
"Emyr" <
fan...@lavoro.com
> ha scritto nel messaggio
news:gbet4u0npagqj73rm...@4ax.com...

Potresti aiutarmi a formulare l'istruzione DOS Ren Nomedocumento
ALT+194NomeDocumento,  con il comando shell ?
Come faccio ad impostare il carattere che si ottiene sotto DOS con ALT+194 ?
Se questo metodo non é fattibile esiste un altro modo per rendere invisibile
una cartella tramite un comando A97 ?
Grazie.
Massimo


text:
On Wed, 23 Jan 2002 17:30:39 GMT, "Massimo Lista"
<
lis...@tiscalinet.it
> wrote:
>
>"Emyr" <
fan...@lavoro.com
> ha scritto nel messaggio
>news:gbet4u0npagqj73rm...@4ax.com...
>> On Tue, 22 Jan 2002 14:50:23 GMT, "Massimo Lista"
>> <
lis...@tiscalinet.it
> wrote:
>>
>> > >
>> >
>> per inviare comando dos usa shell
>> Saluti.
>> Emanuele.
>Potresti aiutarmi a formulare l'istruzione DOS Ren Nomedocumento
>ALT+194NomeDocumento,  con il comando shell ?
>Come faccio ad impostare il carattere che si ottiene sotto DOS con ALT+194 ?
>
>Se questo metodo non é fattibile esiste un altro modo per rendere invisibile
>una cartella tramite un comando A97 ?
>
>Grazie.
>Massimo
>
l'istruzione è la seguente.... sei sicuro del numero 194....
Name "C:\prova1" As "C:\prova1" & Chr(tuonumero) & "ciao"
Saluti.
Emanuele.


title: maschera di input

author: Luciano

text:
Ciao
che maschera di input devo usare per fare in modo che in un campo di
testo ogni parola inizi con lettera maiuscola? Non riesco a trovarla,
usando >L<??????? ho solo la prima lettera, ma in caso di doppio
cognome come devo fare per non usare il maiusc?


title: maschera di input

author: Roberto da casa

text:
"Luciano" <
l...@luckymain.org
> ha scritto nel messaggio
news:fjto70t3b5k0m56se...@4ax.com...

Non ci riesci a causa di un boto bug che Avccess ha dalla versione Access
2000 in avanti e che sembrerebbe che Microsoft non abbia proprio intenzione
di eliminare.
Per le versioni suddette in Access il carattere > in una maschera di input
non ha effetto: devi arrangiarti normalizando i dati digitati usando le
funzioni StrConv o UCase (vedi help).
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: maschera di input

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:Pu6fc.124707$Kc3.4...@twister2.libero.it...

Grazie, ma mi spieghi dove devo digitare queste funzioni?
grazie


title: maschera di input

text:
"Luciano" <
l...@luckymain.org
> ha scritto nel messaggio
news:Smyfc.6375$l27....@news.edisontel.com...
>
> "Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
> news:Pu6fc.124707$Kc3.4...@twister2.libero.it...
> >
> > "Luciano" <
l...@luckymain.org
> ha scritto nel messaggio
> > news:fjto70t3b5k0m56se...@4ax.com...
> > > Ciao
> > > che maschera di input devo usare per fare in modo che in un campo di
> > > testo ogni parola inizi con lettera maiuscola? Non riesco a trovarla,
> > > usando >L<??????? ho solo la prima lettera, ma in caso di doppio
> > > cognome come devo fare per non usare il maiusc?
> >
> > Non ci riesci a causa di un boto bug che Avccess ha dalla versione
Access
> > 2000 in avanti e che sembrerebbe che Microsoft non abbia proprio
> intenzione
> > di eliminare.
> > Per le versioni suddette in Access il carattere > in una maschera di
input
> > non ha effetto: devi arrangiarti normalizando i dati digitati usando le
> > funzioni StrConv o UCase (vedi help).
> >
> > --
> > Roberto
> >
> Grazie, ma mi spieghi dove devo digitare queste funzioni?
> grazie
Devi richiamare le suddette funzioni a fronte dell'evento "Dopo
aggiornamento" o a fronte dell'evento "Su disattivato" della casella di
testo in cui digiti il dato.



title: Account MSDE/SQL Server

author: Sib

text:
Salve a tutti,
ho letto diverse cose in proposito, ma vorrei aprire una discussione sul
corretto modo di impostare gli account.
A parte il dare i permessi specifici sulle varie tabelle e sp nonche' sui
vari tipi di operazioni consentite (SELECT, INSERT, ecc.) utente per utente,
qual e' la giusta politica di gestione?
come si impostano i gruppi?
come si gestiscono (e capiscono) i profili?
cosa sostituisce "WITH OWNERACCESS OPTION" e le varie clausole simili?
ecc. ecc.
Sib
--
http://www.sitocomune.com
http://digilander.iol.it/syb
 (a vostro rischio e pericolo)


title: Esecuzione di script SQL da VBA

author: Matteo Palmieri

text:
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
Salve a tutti,
Ho la necessità di eseguire alcuni script SQL relativi alla rimozione
e creazione di elementi di database tramite VBA. Premesso che gli
script funzionano egregiamente se eseguiti da Query Analyzer (anche
perchè sono stati creati direttamente da Enterprise Manager e
opportunamente tagliati delle parti non necessarie) ho riscontrato
l'impossibilità di eseguirli tramite codice VBA. Questo il frammento:
strSQL = "if exists (select * from dbo.sysobjects " & _
"where id = object_id(N'[dbo].[tbl_tmpmarche]') " & _
"and OBJECTPROPERTY(id, N'IsUserTable') = 1)" & vbNewLine & _
"drop table [dbo].[tbl_tmpmarche]" & vbNewLine & _
"GO" & vbNewLine & _
"CREATE TABLE [dbo].[tbl_tmpmarche] (" & vbNewLine & _
"   [SiglaFornitore] [char] (3) COLLATE Latin1_General_CI_AS NOT NULL
," & vbNewLine & _
"   [NomeFornitore] [varchar] (30) COLLATE Latin1_General_CI_AS NOT
NULL " & vbNewLine & _
") ON [PRIMARY]" & vbNewLine & _
"GO" & vbNewLine & _
"ALTER TABLE [dbo].[tbl_tmpmarche] WITH NOCHECK ADD " & vbNewLine & _
"   CONSTRAINT [PK_tbl_tmpmarche] PRIMARY KEY  CLUSTERED " &
vbNewLine & _
"   (" & vbNewLine & _
"       [SiglaFornitore]" & vbNewLine & _
"   )  ON [PRIMARY] " & vbNewLine & _
"GO"
Set cmd = New ADODB.Command
cmd.ActiveConnection = CurrentProject.Connection
cmd.CommandType = adCmdText
cmd.CommandText = strSQL
cmd.Execute
Set cmd = Nothing
L'errore che ottengo è alla terza linea di codice SQL,
ovvero in corrispondenza del primo GO.
Grazie a chi avrà la pazienza di dare un aiuto...
- --
Matteo Palmieri - Cybercreations
www.cybercreations.it
-----BEGIN PGP SIGNATURE-----
Version: 6.5.8ckt
iQA/AwUBPXogTcg6j/rIOLofEQI7egCg5Ge34dmsuA1zJsTpFxfY1fnD2doAn1pl
mDPAMpl+W1iF7CRSnjKXnlHX
=r7P7
-----END PGP SIGNATURE-----


title: Esecuzione di script SQL da VBA

author: Antonio Biso

text:
"Matteo Palmieri" <
matteo....@cybercreations.it
> ha scritto nel
messaggio news:aldam1$m0j$1...@serv1.albacom.net...
> -----BEGIN PGP SIGNED MESSAGE-----
> Hash: SHA1
>
> Salve a tutti,
> L'errore che ottengo č alla terza linea di codice SQL,
> ovvero in corrispondenza del primo GO.
Senti... ma invece di postare tutto quel pappier (si scrive cosě? Boh!) di
codice astruso, perchč non esponi quello che devi fare e vediamo come
risolverlo?!?
Antonio


title: Esecuzione di script SQL da VBA

text:
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:tE%e9.375$6O4....@twister1.libero.it...
> Senti... ma invece di postare tutto quel pappier (si scrive cosě?
> Boh!) di codice astruso, perchč non esponi quello che devi fare e
> vediamo come risolverlo?!?
Eseguire degli script SQL. Con Query Analyzer funzionano, da codice
VBA no.
- --
Matteo Palmieri - Cybercreations
www.cybercreations.it
-----BEGIN PGP SIGNATURE-----
Version: 6.5.8ckt
iQA/AwUBPXyCnsg6j/rIOLofEQL9WgCgqlY9MqmXTPZJXGbdQ9D7qo6/sfgAoPcU
GcP73F6j6szGLNqQ0Q0kuKa2
=jlBK
-----END PGP SIGNATURE-----


title: Esecuzione di script SQL da VBA

text:
"Matteo Palmieri" <
matteo....@cybercreations.it
> ha scritto nel
messaggio news:ali38i$394$1...@serv1.albacom.net...
> -----BEGIN PGP SIGNED MESSAGE-----
> Hash: SHA1
>
> "Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
> news:tE%e9.375$6O4....@twister1.libero.it...
>
> > Senti... ma invece di postare tutto quel pappier (si scrive cosě?
> > Boh!) di codice astruso, perchč non esponi quello che devi fare e
> > vediamo come risolverlo?!?
>
> Eseguire degli script SQL. Con Query Analyzer funzionano, da codice
> VBA no.
Che adč uno script SQL?
Io vorrei che tu mi dicessi: devo fare una query che fa questo e questo,
oppure, devo cancellare una tabella, aggiunger eun campo, modificare un
altro campo ecc...
Antonio


title: Esecuzione di script SQL da VBA

text:
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:gm0f9.485$Oz2....@twister2.libero.it...
> Che adè uno script SQL?
Una serie di comandi in SQL che creano o distruggono oggetti del
database.
> Io vorrei che tu mi dicessi: devo fare una query che fa questo e
> questo, oppure, devo cancellare una tabella, aggiunger eun campo,
> modificare un altro campo ecc...
Devo:
- - cancellare delle relazioni
- - cancellare delle tabelle
- - rinominare delle tabelle
- - creare delle tabelle (impostando anche proprietà estese, quali
formato, numero di decimali...)
- - creare delle relazioni
Tutto questo su un database residente su SQL Server.
- --
Matteo Palmieri - Cybercreations
www.cybercreations.it
-----BEGIN PGP SIGNATURE-----
Version: 6.5.8ckt
iQA/AwUBPXyKqsg6j/rIOLofEQLf6wCg12lKAtRNEbERNA7O98ZQGnylfp4An1TP
UzyReZmPe+rfhBGwfQ5zi2Eq
=8xqZ
-----END PGP SIGNATURE-----


title: Esecuzione di script SQL da VBA

text:
"Matteo Palmieri" <
matteo....@cybercreations.it
> ha scritto nel
messaggio news:ali5qg$dt1$1...@serv1.albacom.net...
> "Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
> news:gm0f9.485$Oz2....@twister2.libero.it...
>
> > Che adè uno script SQL?
>
> Una serie di comandi in SQL che creano o distruggono oggetti del
> database.
Uhmmm
>
> > Io vorrei che tu mi dicessi: devo fare una query che fa questo e
> > questo, oppure, devo cancellare una tabella, aggiunger eun campo,
> > modificare un altro campo ecc...
>
> Devo:
>
> - - cancellare delle relazioni
Non so capace
> - - cancellare delle tabelle
Lo faccio via codice col metodo delete della tabledef
> - - rinominare delle tabelle
via codice
> - - creare delle tabelle (impostando anche proprietà estese, quali
> formato, numero di decimali...)
con query di creazione tabella e poi impostando le proprietà fields della
tabledef
> - - creare delle relazioni
Non so capace
> Tutto questo su un database residente su SQL Server.
Uh?
Non è un database access?
Antonio


title: Esecuzione di script SQL da VBA

text:
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:6A1f9.951$6O4....@twister1.libero.it...
> > Tutto questo su un database residente su SQL Server.
>
> Uh?
> Non è un database access?
Access lo uso come FE. Poi mi appoggio a SQL Server (o MSDE per i
clienti con meno esigenze) per il BE.
- --
Matteo Palmieri - Cybercreations
www.cybercreations.it
-----BEGIN PGP SIGNATURE-----
Version: 6.5.8ckt
iQA/AwUBPXybLsg6j/rIOLofEQLHoQCfUEnBZgPISvTbTkrt8qkPP9v+h7sAn03b
geB4nHIgGxzWgJdijjmBsU7E
=1GVB
-----END PGP SIGNATURE-----


title: Esecuzione di script SQL da VBA

text:
"Matteo Palmieri" <
matteo....@cybercreations.it
> ha scritto nel
messaggio news:ali9da$eja$1...@serv1.albacom.net...
> -----BEGIN PGP SIGNED MESSAGE-----
> Hash: SHA1
>
> "Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
> news:6A1f9.951$6O4....@twister1.libero.it...
>
> > > Tutto questo su un database residente su SQL Server.
> >
> > Uh?
> > Non č un database access?
>
> Access lo uso come FE. Poi mi appoggio a SQL Server (o MSDE per i
> clienti con meno esigenze) per il BE.
Mattč...
Se č una cosa fattibile con comandi access, alcuni suggerimenti te li ho
dati, altrimenti direi che siamo un po' OT no?
Antonio


title: Esecuzione di script SQL da VBA

author: Fabio

text:
"Matteo Palmieri" <
matteo....@cybercreations.it
> ha scritto nel
messaggio news:aldam1$m0j$1...@serv1.albacom.net...

Io sono fissato con le Stored Procedure (a quanto pare sono l'unico in
questo NG). Perchè non ne crei una dove utilizzi all'interno anche le SP di
sistema come ad esempio sp_dropdevice, sp_rename, ecc..?
Le sto "affrontando" da poco senza grossi risultati per il momento (vedi
post "(Lungo) Anomalia nel passaggio parametri") però mi sembra siano
l'unica soluzione per la manipolazione degli archivi in generale.
Tornando al tuo problema, hai provato a togliere l'IF per vedere se il
problema sta nel drop table o nella verifica della condizione?
Fabio


title: Esecuzione di script SQL da VBA

text:
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
"Fabio" <
nospam_fa...@tin.it
> ha scritto nel messaggio
news:_82f9.1080$Oz2....@twister2.libero.it...
> Io sono fissato con le Stored Procedure (a quanto pare sono l'unico
> in questo NG). Perchè non ne crei una dove utilizzi all'interno
> anche le SP di sistema come ad esempio sp_dropdevice, sp_rename,
> ecc..?
Problema risolto in maniera egregia... Talmente banale che quasi mi
vergogno...
Grazie 1000
- --
Matteo Palmieri - Cybercreations
www.cybercreations.it
-----BEGIN PGP SIGNATURE-----
Version: 6.5.8ckt
iQA/AwUBPXymL8g6j/rIOLofEQLGiACgiRYLgEco3+nHlSc0twLD/zAEgU0Ani9l
nhLXSiAsumgi+xblWIX6bTAz
=lUCA
-----END PGP SIGNATURE-----


title: msde in access 97 - Consigli-pareri-critiche

author: Fabrizio Quercia

text:
Ciao a tutti:)
Sto realizzando una procedura di fatturazione servizi, mezzi, orari e
quant'altro...
siccome il prog ha una enorme quantita di dati (circa 20-30mila record a
tabella...stima approsimativa), deve gestire la multiutenza e il
multimagazzino, ed č stato iniziato con access 97 (lo sto
rilevando)...volevo sapere se qualcuno di voi aveva usato MSDE sul 97,
ammesso che sia supportato, e qualora lo fosse...č complicato da gestire?
Sono indeciso se continuare a fare il FE in access 97 e semmai appoggiarmi a
msde, NO SQL SERVER, oppure riscrivere l'interfaccia grafica FE con accexx
XP e la base dati con MSDE.
Voi cosa fareste?
Quali scelte adottereste e perche'? (parlaimo a livello tecnico)...ammesso
ke non č un prob farsi il giro di clienti a reinstallare il software
aggiornato sulle macchine...solo ke hanno tutti il 97...cmq... :))
Grazie per i consigli-pareri-critiche a tutti :)
Ciao


text:
"Fabrizio Quercia" <
fabrizi...@tin.it
> ha scritto nel messaggio
> Sto realizzando una procedura di fatturazione servizi, mezzi, orari e
> quant'altro...
>
> siccome il prog ha una enorme quantita di dati (circa 20-30mila record a
> tabella...stima approsimativa), deve gestire la multiutenza e il
> multimagazzino, ed č stato iniziato con access 97 (lo sto
> rilevando)...volevo sapere se qualcuno di voi aveva usato MSDE sul 97,
> ammesso che sia supportato, e qualora lo fosse...č complicato da gestire?
Non mi risulta che msde sia gestibile dal 97, non come axp.
> Sono indeciso se continuare a fare il FE in access 97 e semmai appoggiarmi
a
> msde, NO SQL SERVER, oppure riscrivere l'interfaccia grafica FE con accexx
> XP e la base dati con MSDE.
> Voi cosa fareste?
certamente userei AXP.
Perche' non SQL Server?
tieni presente che msde e' fatto per 5 utenti concorrenti, non piu'.
Sib


author: Massimiliano Corini

text:
"Fabrizio Quercia" <...
> Ciao a tutti:)
>
> Sto realizzando una procedura di fatturazione servizi, mezzi, orari e
> quant'altro...
>
> siccome il prog ha una enorme quantita di dati (circa 20-30mila record a
> tabella...stima approsimativa), deve gestire la multiutenza e il
> multimagazzino, ed č stato iniziato con access 97 (lo sto
> rilevando)...volevo sapere se qualcuno di voi aveva usato MSDE sul 97,
> ammesso che sia supportato, e qualora lo fosse...č complicato da gestire?
A parte il fatto che 20-30.000 records sono pochissimi per avere problemi
anche con Jet (a meno che la multiutenza sia vasta): quindi non farti
influenzare troppo dalle "voci" che senti.
MSDE puoi utilizzarlo con Access '97 con interfacciamento ODBC.
> Sono indeciso se continuare a fare il FE in access 97 e semmai appoggiarmi
a
> msde, NO SQL SERVER, oppure riscrivere l'interfaccia grafica FE con accexx
> XP e la base dati con MSDE.
E' una scelta: perň occhio perchč con gli .ADP devi cambiare molte
abitudini.
Ciao.


text:
"Massimiliano Corini" <maxnosp...@XXX.it> ha scritto nel messaggio
news:YEmC9.15033$Ka3.4...@twister1.libero.it...
>
> A parte il fatto che 20-30.000 records sono pochissimi per avere problemi
> anche con Jet (a meno che la multiutenza sia vasta):
3/4 utenti, e poi posso creare un mdn per ogni utente (multiazienda ad
esempio, ad ogni avvio scelgono in db da usare, quindi 1mdb-1utente)
>quindi non farti
> influenzare troppo dalle "voci" che senti.
le sto chiedendo a voi apposta le "voci" :)))
> MSDE puoi utilizzarlo con Access '97 con interfacciamento ODBC.
>
 questa non la sapevo :)
> E' una scelta: però occhio perchè con gli .ADP devi > cambiare molte
> abitudini.
Cosa cambia a livello sostanziale?
Ciao :)


text:
"Sib" <si...@SPAMiol.it> ha scritto nel messaggio
news:0imC9.26691$744.9...@news1.tin.it...
>
> Non mi risulta che msde sia gestibile dal 97, non come axp.
> certamente userei AXP.
xke'? :)
> Perche' non SQL Server?
Non hanno 2 milioni per comprarlo :))
> tieni presente che msde e' fatto per 5 utenti concorrenti, non piu'.
>
qundi se il prog viene utilizzato entro i 5 utenti mi stai dicendo che
faresti: AccessXP+MSDE ?
Ciao :))


text:
"Fabrizio Quercia" <
fabrizi...@tin.it
> ha scritto nel messaggio
> "Sib" <si...@SPAMiol.it> ha scritto nel messaggio
> >
> > Non mi risulta che msde sia gestibile dal 97, non come axp.
>
> > certamente userei AXP.
>
> xke'? :)
Perche' AXP e' stabile (al contrario di A2000) e gestisce MSDE in modalita'
nativa
> > Perche' non SQL Server?
>
> Non hanno 2 milioni per comprarlo :))
Male, non sono seri, spero che abbiano i soldi per te.
> > tieni presente che msde e' fatto per 5 utenti concorrenti, non piu'.
>
> qundi se il prog viene utilizzato entro i 5 utenti mi stai dicendo che
> faresti: AccessXP+MSDE ?
Si', comunque, come ti diceva massimiliano, 20.000 record non sono molti,
quindi puoi anche usare semplicemente Access.
Sib


text:
"Fabrizio Quercia" <
fabrizi...@tin.it
> ha scritto nel messaggio
> "Massimiliano Corini" <maxnosp...@XXX.it> ha scritto nel messaggio
cut
> > E' una scelta: però occhio perchè con gli .ADP devi > cambiare molte
> > abitudini.
>
> Cosa cambia a livello sostanziale?
le query, soprattutto, sono quelle di SQL server, quindi cambia sintassi
modo di funzionare e complessita', pero' sono molto piu' potenti e lavorano
in modalita' client/server
Sib