Pagina 1 di 2 1 2 ultimoultimo
Visualizzazione dei risultati da 1 a 10 su 12
  1. #1

    selezionare solo i connessi nella sql

    ho una select che mi procura tutti gli id del database in questo modo


    codice:
    sql="Select distinct ID from Iscritti" 
    rs.Open sql,Conn,3,3
    
    do until rs.eof
    
    ID_Destinatario=rs("ID")
    
    sql = "Insert into MiniBlog (ID_Mittente, ID_Destinatario, Titolo_Messaggio, Messaggio, Data_Messaggio ) values ("&ID_Mittente& ", "&ID_Destinatario&", '"&Titolo_Messaggio&"', '"&Messaggio&"', #"&now()&"#)"
    conn.execute sql
    
    rs.movenext
    loop
    						
    rs.close
    set rs=nothing
    
    conn.close
    set conn=nothing
    
    end if
    %>

    se volessi selezionare solo quelli che hanno il campo Status_connect=true ?

    grazie mille!
    L'intuizione creativa più di ogni altra cosa è l'unico elemento per cui la vita vale la pena di essere vissuta (D.W)

  2. #2
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    Se l'ID è contatore la DISTINCT non serve:

    sql="Select ID from Iscritti WHERE Status_connect=true"

    Roby

  3. #3
    lo invia sempre a tutti....non mi seleziona solo gli id con status_connect true


    codice:
    <%
    Session.LCID = 1040
    verifyAlreadyExist=false
    ID_Mittente=Session("ID")
    Titolo_Messaggio=Replace(Trim(Request.form("Titolo_Messaggio")),"'","''")
    Messaggio=Replace(Trim(Request.form("Messaggio")),"'","''")
    
    if ID_Mittente><"" and Titolo_Messaggio><"" and Messaggio ><""  then
    
    Set Conn = Server.CreateObject("ADODB.Connection")
    Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& Server.MapPath("data.mdb")
    Set rs=Server.CreateObject("ADODB.RecordSet")
    
    sql="Select ID from Iscritti WHERE Status_Connect=true"
    rs.Open sql,Conn,3,3
    
    do until rs.eof
    
    ID_Destinatario=rs("ID")
    
    sql = "Insert into MiniBlog (ID_Mittente, ID_Destinatario, Titolo_Messaggio, Messaggio, Data_Messaggio ) values ("&ID_Mittente& ", "&ID_Destinatario&", '"&Titolo_Messaggio&"', '"&Messaggio&"', #"&now()&"#)"
    conn.execute sql
    
    rs.movenext
    loop
    						
    rs.close
    set rs=nothing
    
    conn.close
    set conn=nothing
    
    end if
    
    %>
    :master:
    L'intuizione creativa più di ogni altra cosa è l'unico elemento per cui la vita vale la pena di essere vissuta (D.W)

  4. #4
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    Ma cosa dovrebbe inviare?
    Tu fai una insert...
    Il campo "status_connect" che tipo di campo è?

    Roby

  5. #5
    questa è una parte di codice che serve per selezionare gli id e poi invia un messaggio privato a tutti
    allora seleziono gli id poi li rendo mittenti
    e invio a tutti
    lo status connect invece è un campo ceck dove se è true uno risulta connesso se false non sei connesso al sito

    io volevo che lo inviasse solo a quelli connessi ovvero quegli ID con status_connect true
    L'intuizione creativa più di ogni altra cosa è l'unico elemento per cui la vita vale la pena di essere vissuta (D.W)

  6. #6
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    Al posto di true, nella query prova a mettere 1.

    roby

  7. #7
    anche se il db è access? 1 non si mette in mysql?
    L'intuizione creativa più di ogni altra cosa è l'unico elemento per cui la vita vale la pena di essere vissuta (D.W)

  8. #8

  9. #9
    provato....lo invia sempre a tutti!
    L'intuizione creativa più di ogni altra cosa è l'unico elemento per cui la vita vale la pena di essere vissuta (D.W)

  10. #10
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    Prova con:

    codice:
    ... WHERE Status_Connect <> ''"
    Roby

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.