due record

[giuseppe1986]

ciao a tutti

vorrei un aiuto

ho due record

1)foto

2)voti

nel primo record foto ci sono due valori -------- nickname - foto

nel secordo record voti ci sono due valori -------- nickname - voti

il valore (foto) del record (1) deve prendere il volore (voti) del record (2) con lo stesso nickname

come posso fare?

ciao a tutti

[Mems]

Vuoi dire che hai due tabelle e non due record con in comune il campo nickname?

<%
set conn = ... ' omissis
conn.open ... ' omissis
sql = "SELECT foto.nickname AS n, foto.foto AS f, voti.voti AS v FROM foto INNER JOIN voti ON voti.nickname = foto.nickname"
set rs = conn.execute(sql)
  if not rs.eof then
    do until rs.eof
      response.write rs("n") & " " & rs("f") & " " & rs("v") & "
"
      rs.moveNext
    loop
  end if
rs.close
set rs = nothing
conn.close
set conn = nothing
%>

[giuseppe1986]

ho questi due record

<%@LANGUAGE="VBSCRIPT"%>

<%
Dim foto
Dim foto_numRows

Set foto = Server.CreateObject("ADODB.Recordset")
foto.ActiveConnection = MM_Utenti_STRING
foto.Source = "SELECT nickname, foto FROM foto"
foto.CursorType = 0
foto.CursorLocation = 2
foto.LockType = 1
foto.Open()

foto_numRows = 0
%>
<%
Dim voti
Dim voti_numRows

Set voti = Server.CreateObject("ADODB.Recordset")
voti.ActiveConnection = MM_Utenti_STRING
voti.Source = "SELECT voti, nickname FROM voti"
voti.CursorType = 0
voti.CursorLocation = 2
voti.LockType = 1
voti.Open()

voti_numRows = 0
%>

<%=(voti.Fields.Item("voti").Value)%>deve prendere <%=(foto.Fields.Item("foto").Value)%>

come posso fare?

[giuseppe1986]

con lo stesso nickname

[Mems]

Ti ho scritto la soluzione. Non l'hai vista?

[giuseppe1986]

si lo vista,

non mi funziona funziona

[Mems]

Originariamente inviato da giuseppe1986
si lo vista,

non mi funziona funziona

E che errore ti da?

[giuseppe1986]

Tipo di errore:
Errore di compilazione di Microsoft VBScript (0x800A03F2)
Previsto identificatore
/pagine/prova.asp, line 32, column 12
set conn = ... ' omissis


Tipo di errore:
Errore di compilazione di Microsoft VBScript (0x800A03F2)
Previsto identificatore
/pagine/prova.asp, line 33, column 11
conn.open ... ' omissis

[Mems]

Originariamente inviato da giuseppe1986
Tipo di errore:
Errore di compilazione di Microsoft VBScript (0x800A03F2)
Previsto identificatore
/pagine/prova.asp, line 32, column 12
set conn = ... ' omissis


Tipo di errore:
Errore di compilazione di Microsoft VBScript (0x800A03F2)
Previsto identificatore
/pagine/prova.asp, line 33, column 11
conn.open ... ' omissis

E' ovvio che li devi mettere la creazione dell'oggetto Recordset e nell'altro la stringa di connessione...
Io ho messo omissis per dire che ometto di scrivere quelle righe inutili che suppongo tu sappia di dover aggiungere da te... :rollo:

[giuseppe1986]

Cosi?

<%
set conn = Server.CreateObject("ADODB.Recordset")
conn.open = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" + Server.MapPath ("/mdb-database/Utenti.mdb")
sql = "SELECT foto.nickname AS n, foto.foto AS f, voti.voti AS v FROM foto INNER JOIN voti ON voti.nickname = foto.nickname"
set rs = conn.execute(sql)
if not rs.eof then
do until rs.eof
response.write rs("n") & " " & rs("f") & " " & rs("v") & "
"
rs.moveNext
loop
end if
rs.close
set rs = nothing
conn.close
set conn = nothing
%>