Newsgroup: it.comp.appl.access
Titolo: [1\2 OT] Convertitore SQL to VBA esiste qualche prodotto sul web\mercato?

Come da oggetto, magari anche in italiano!
Saluti,
--
sm

 wrote in message
news:4268f...@x-privat.org

Spiega bene la domanda, SQL con VBA non ha nulla
a che fare detta cosě.
Ciao
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Ciao
intendi qualcosa che in VBA controlli la corretta sintassi dell'sql?
Magari!!! Lo coopto.

 Magari!!! Lo coopto.
Per fare...?
Quante volte capita con un RUNTIME di costruirsi una stringa SQL
da ZERO...?
Come minimo è precostruita e viene aggiunta solo la WHERE condition
e l'ORDER BY....!
Boh io non ne vedo l'utilità.


 da ZERO...?
Cosa intendi "...con un RUNTIME?"

 wrote in message
news:yY7ae.812606$
b5.36...@news3.tin.it

Costruire RUNTIME una Stringa SQL intendo mentre il programma
sta girando.
Questo presupporrebbe una programmazione di Flessibilità dettata
da 2 condizioni:
1)Scarsa programmazione iniziale delle esigenze
2)Un programma che fa tutto(diffidare da queste cose)
La soluzione intermedia prevede la costruzione di stringhe
parziali per l'ottimizzazione dei risultati, quindi la sola
aggiunta di condizionanti(WHERE) oppure di criteri di Ordinamento(ORDER
BY)
Tutto il resto deve essere previsto da progetto.
Questa almeno è la mia opinione.


 ha scritto nel messaggio
news:b4642d9650700dbdf9...@mygate.mailgate.org...

Forse non mi sono spiegato.
Tu intendi che è inutile avere un check di sql in vba perchè in un modo o
nell'altro sarebbe meglio riferirsi a query memorizzate nel db oppure a
sempre costrutti di sql che sono già creati a livello di progettazione della
base dei dati e delle relazioni tra le tabelle. Su questo concordo.
Però trovo un po' di differenze tra query o stringhe sql in vba (apici
virgole formattazioni date stringhe ecc..) quando dinamicamente cambio il
recordset o il rowset di maschere e controlli.  Ma adesso sto cercando di
usare dao per l'aggiunta e la modifica dei records e forse queste esigenze
potrebbero risultare superflue.

 potrebbero risultare superflue.
Si io sostengo questo.
Quanto invece stai evidenziando è esattamente quello che
intendevo come composizione della condizionante WHERE.
Se usi JET come BE hai a disposizione una funzione Nativa
che compone correttamente la stringa:
Ti passo un articolo esposto nel mio sito alla sezione [FORMS]
1.30 Comporre la stringa WHERE correttamente 
'//	Metodo BuildCriteria
'//	Spesso ci si trova in difficoltà nella costruzione dei
'//	CRITERI da inserire nelle clausole WHERE dell Queries 
'//	oppure nelle funzioni di aggregazione sui domini DLOOKUP/DCOUNT o
'//	addirittura nella proprietà FILTER di Form.
'//	Questo è dovuto alla diversità della tipologia di Dati da usare.
'//	Access ci mette a disposizione una Funzione che in modo
'//	NATIVO restituisce la stringa FORMATTATA nel modo corretto.
'//	#######################	METODO	BUILDCRITERIA	#######################
'//	Sintassi
applicazione.BuildCriteria(campo, tipocampo, espressione)
'//	Il metodo BuildCriteria dispone degli argomenti riportati di
seguito.
'//	[Argomento]	[Descrizione]
'//	applicazione	Opzionale. Oggetto Application.
'//	campo		Espressione stringa che identifica il
'//			campo per cui si desidera definire i criteri.
'//	tipocampo	Costante intrinseca che denota il tipo di dati
'//			del campo.
'//			Per un elenco di tipi di dati di campo,
'//			vedere la proprietà DAO Type.
'//	espressione	Espressione stringa che identifica i criteri da
analizzare.
'//	Il metodo BuildCriteria restituisce una stringa.
La tipologia supportata dal Metodo è quella restituita dai campi DAO.
'//	#######################	ELENCO TYPE SUPPORTATI
#######################
	[COSTANTE]	[Tipo Campo]
 
	dbBigInt	Big integer
	dbBinary	Binary
	dbBoolean	Boolean
	dbByte		Byte
	dbChar		Char
	dbCurrency	Currency
	dbDate		Date/Time
	dbDecimal	Decimal
	dbDouble	Double
	dbFloat		Float
	dbGUID		GUID
	dbInteger	Integer
	dbLong		Long
	dbLongBinary	Long Binary (OLE Object)
	dbMemo		Memo
	dbNumeric	Numeric
	dbSingle	Single
	dbText		Text
	dbTime		Time
	dbTimeStamp	Time Stamp
	dbVarBinary	VarBinary
'//	#######################	ESEMPIO DI UTILIZZO	#######################
Dim strCriteri As String
strCriteri = BuildCriteria("DataOrdine", dbDate, ">1-1-95")
Dove [DataOrdine] è il Nome del Campo Tabella o Query, dbDate è
il tipo di Campo, e ">1-1-95" è il criterio reale.
Ciao


 ha scritto nel messaggio
news:3be81d3a2e41b085f7...@mygate.mailgate.org...

Grazie Alex! Efficacissimo, come al solito.