Chiarimento su questa sintassi...

**xtreme** · 08-03-2005, 14:56

Ciao ragazzi.... vi trascrivo questo pezzo di codice... è un esempio

------------------------------------------
[...]

'Genero la query random
If sql = "SELECT FROM tabella" then
sql = "SELECT FROM tabella WHERE (((InStr(1,'" & str & "',(',' & [ID'> & ',')))<>0))"
Else
sql = sql & " AND (((InStr(1,'" & str & "',(',' & [ID'> & ',')))<>0))"
End if

[...]
----------------------------------------------------------

Ultimamente in alcuni script sto trovando questa sintassi, ossia una parentesi quadra in mezzo alle tonde e così via....
Ricordi?
.....sql = sql & " AND (((InStr(1,'" & str & "',(',' & [ID'> & ',')))<>0))"......
Ma cche vor dì???? Perchè si usa?????

**Roby_72** · 08-03-2005, 15:02

Fatti stampare tutta la query.
La [ è all'interno di una funzione...

Roby

**xtreme** · 08-03-2005, 15:12

Lo farò, ma la cosa strana è che trovo sempre l'apertura della parentesi ([), ma mai la chiusura (])....
com'è? Dovrebbe esserci una chiusura no? Altrimenti vuol dire che quella parentesi lì ha un significato diverso.
Che ne pensi?

Cmq in coda ho messo tutta lo script che tralaltro (ma va?!?!?!) si trova sul sito più utile al mondo.... HTML.IT

Ahhh questa stessa sintassi l'ho ritrovata anche in un altro articolo...
Anzi eccoli qui i link....

http://freeasp.html.it/script/view_script.asp?id=15

...è questo che ho copiato qui sotto, mentre l'altro è....

http://freeasp.html.it/script/view_script.asp?id=137

Aiutoooooooooooooooo
-----------------------------------------------------------

<html>
<head>
<title>Ordinare i record casualmente</title>
</head>

<body bgcolor="#ffffff">
<%
'Connessione al database
Dim rs, cn, sql
sql = "SELECT FROM tabella"
Set cn = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
cn.Open "DSN=nomeDSN;"
Set rs.ActiveConnection = cn
rs.CursorType = 3
rs.LockType = 3
rs.Open sql, cn
%>
<center>
<%
rs.moveLast
conta = rs.recordCount
conta1 = conta
max = conta

'Necessario inserire un valore massimo
If 50 < conta Then
conta1 = 50
Else
If conta > 10 AND conta < 50 then conta1 = conta1 - 2
End If
str = ","
str1 = ","

Do Until conta1 = 0
'Genero i valori random per la ricerca all'interno del recordSet
'per estrapolare record casualmente
Randomize
RndNumber = Int(Rnd max)

If (InStr(1, str1, "," & RndNumber & "," ) = 0) Then
str1 = str1 & RndNumber & ","
conta1 = conta1 - 1
rs.moveFirst
rs.move RndNumber
str = str & rs("ID") & ","
End If
Loop

rs.Close
Set rs=Nothing
Set rs = Server.CreateObject("ADODB.Recordset")

'Genero la query random
If sql = "SELECT FROM tabella" then
sql = "SELECT FROM tabella WHERE (((InStr(1,'" & str & "',(',' & [ID'> & ',')))<>0))"
Else
sql = sql & " AND (((InStr(1,'" & str & "',(',' & [ID'> & ',')))<>0))"
End if

Set rs.ActiveConnection = cn
rs.CursorType = 3
rs.LockType = 3
rs.Open sql, cn
%>

<% Do until (rs.eof) %>

<%= rs("nomeCampo") %>

<% rs.MoveNext
Loop
rs.Close
Set rs=Nothing %>

</body>
</html>

**Roby_72** · 08-03-2005, 15:16

Ripeto!
Fatti stampare la query!

Roby

**Roby_72** · 08-03-2005, 15:16

Ripeto!
Fatti stampare la query!

Roby

**xtreme** · 08-03-2005, 15:20

Ok, mi hai convinto!!!
Provo....

**xtreme** · 08-03-2005, 16:19

Allora ho adattato il codice al mio database.... mi provoca un errore quando esegue la stringa SQL verso la fine, qualcosa che riguarda il FROM... ma questo sarà un problema mio, qualche errorino di sintassi.

Interrompendo prima il codice e stampando la stringa SQL ottengo questo...

SELECT * FROM clienti AND (((InStr(1,',75,74,34,22,40,26,31,35,28,23,37,27,7 7,33,25,32,24,30,',(',' & [id_cliente' target=_blank> & ',')))<>0))

A parte che è un bordello.... cmq i numeretti sono gli id della tabella ordinati casualmente, ma la parentesi quadra cos'è? A che serve?

In quell'atro script, che ho già verificato, mi sembravo più formattazione per la paginazione ( [pag> ) , ma in questo caso non credo centri niente....

Roby io l'ho stampata la stringa, ma non ho risolto niente....
Potresti essere meno ermetico e conciso e magari spiegarmi a cosa serve???

Apprezzerei anche un'interpretazione del codice di quella stringa...

In genere quando uso degli script mi piace capire cosa c'è scritto... un po' per curiosità, un po' per studio, un po' per non rompere troppo sul forum

...e cmq, se non lo comprendo, ho una certo fastidio ad usarlo

Che ci posso far... son fatto così.

**Roby_72** · 08-03-2005, 16:27

Quell'AND dpo clienti c'entra poco...

Roby

**xtreme** · 08-03-2005, 16:29

Si lo so... sto cercando di risolverlo.... è quello l'errore che ti dicevo. Il fatto è che sta entrando in IF sbagliato, ma ripeto questo non è il problema....

Non vorrei essere monotono, ma sinceramente vorrei capire che centra la parentesi quadra [

**michele.santoro** · 08-03-2005, 16:34

Secondo me è una query fatta in access e poi adattata access richiede []

Discussione: Chiarimento su questa sintassi...

Strumenti discussione

Ricerca discussione

Visualizza

Chiarimento su questa sintassi...

Permessi di invio