djjunior

djjunior

nessun aiuto?

djjunior

Ciao
nella pagina1.asp ho un link, su un ciclo elencato da db, che apre tramite funzione toggle jquery 2 textarea contemporaneamente
nella stessa pagina1.asp ho un campo che filtra risultati recuperati dal db che tramite xmlhttprequest me li stampa sulla pagina search.asp
Nella pagina search.asp dei link che dovrebbe aprirmi i 2 textarea di ogni risultato, ne funziona solo per l'ultimo risultato, credo che sia un problema di ciclo anche nelle funzione jquery ma non saprei come fare ecco le pagine:

PAGINA1.ASP

<script src="https://code.jquery.com/jquery-1.10.2.js"></script>
<script>
function showHint(str) {
    if (str.length == -1) {
    } else {
        var xmlhttp = new XMLHttpRequest();
        xmlhttp.onreadystatechange = function() {
     if (this.readyState == 4 && this.status == 200) {
        document.getElementById("txtHint").innerHTML = unescape(xmlhttp.responseText);
load();

 }
        };
        xmlhttp.open("GET", "search.asp?q=" + str, true);
        xmlhttp.send();

    }


}

</script>

<input type="text" name="q" size="40" placeholder="Filtra per parola chiave" onkeyup="showHint(this.value)" >
    
<span id="txtHint">
<%
....QUERY SQL.....
if tot_record > 0 then

for i=1 to PageSize
if rs.eof<>true and rs.bof<>true then

%>

<font face="Arial" id="bot<%=rs.Fields("Id")%>"><u>Dettagli</u></font>
<textarea id="xda<%=rs.Fields("Id")%>" name="richiesta" rows="12" disabled cols="20" ><%=rs.Fields("Richiesta")%></textarea>
<textarea id="xdb<%=rs.Fields("Id")%>" " name="note" rows="12" disabled cols="20"><%=rs.Fields("Note")%></textarea>

<script>
function load(){

$(document).ready(function(){
    $("#bot<%=rs.Fields("Id")%>").click(function() {
      $("#xda<%=rs.Fields("Id")%>").toggle("slow");
      $("#xdb<%=rs.Fields("Id")%>").toggle("slow");
    });   
  });  
}

$(document).ready(function(){
    $("#bot<%=rs.Fields("Id")%>").click(function() {
      $("#xda<%=rs.Fields("Id")%>").toggle("slow");
      $("#xdb<%=rs.Fields("Id")%>").toggle("slow");
    });   
  });   
</script>

<%
RS.movenext
end if
next
%></span>

SEARCH.ASP

<!DOCTYPE html>
<head>
 <script src="https://code.jquery.com/jquery-1.10.2.js"></script>
</head>
<body>
<%
QUERY SQL

if tot_record > 0 then

for i=1 to PageSize
if rs.eof<>true and rs.bof<>true then
%>
<font face="Arial" id="bot<%=rs.Fields("Id")%>"><u>Dettagli</u></font>
<textarea id="xda<%=rs.Fields("Id")%>" name="richiesta" rows="12" disabled cols="20" ><%=rs.Fields("Richiesta")%></textarea>
<textarea id="xdb<%=rs.Fields("Id")%>" " name="note" rows="12" disabled cols="20"><%=rs.Fields("Note")%></textarea>
<%
RS.movenext
end if
next
%>
</body>
</html>

In pratica la funzione jquery della pagina1.asp dovrebbe essere trasportata sulla pagina tramite xmlhttprequest e loopata per ogni risultato.
Spero in un vostro aiuto grazie

djjunior

Salve ho una funzione jquery che dovrebbe essere lanciata solo dal button tramite id. Mentre ho notato che da qualsiasi punto della pagina web clicco lancia la funzione. Dove posso controllare? Cosa sbaglio? Grazie

djjunior

Salve
in una pagina ho un una serie di campi che faccio il submit (non un form semplice, ma l'invio avviene tramite click sull' immagine LENTE INGRANDIMENTO con l'id della funzione ajax) ad una funzione ajax, nella stessa pagina durante la compilazione se ad un campo c'è una specifica parola sempre tramite una fuziona ajax mi si attivano altri 2 campi (un campo input o una select) uno esclude l'altro cosa che ho fatto cioè se scrivo nel campo input la select viene disabilitata e viceversa, ho impostato il required ma non viene assolutamente rispettato, come posso far si che al click della LENTE DI INGRANDIMENTO mi verifichi se vuoto (campo input) o selezionato (la select) non deve andare avanti alla funzione ajax definitiva?
Credo di essermi spiegato bene grazie per l'aiuto.

djjunior

salve
utilizzo questo script per lanciare il play cliccando su un immagine, come posso attivare il play al caricamento della pagina

<form  id="fluxa" name="fluxa" method="get">
<audio style="display:none;" controls id="yourAudio" autoplay>
<source id="flusso" src="https://stream" type="audio/mp3">
</audio>
</form>
<a id="audioControlRR" href="#" >
<img id="play" src="img/play.png" >
<img id="pause" src="img/pause.png" >
</a>
<script>
var yourAudio = document.getElementById('yourAudio'),
    ctrl = document.getElementById('audioControlRR'),
    playButton = document.getElementById('play'),
    pauseButton = document.getElementById('pause');

function toggleButton() {
    if (playButton.style.display === 'none') {
        playButton.style.display = 'block';
        pauseButton.style.display = 'none';
    } else {
        playButton.style.display = 'none';
        pauseButton.style.display = 'block';
    }
}

ctrl.onclick = function () {

    if (yourAudio.paused) {
        yourAudio.play();
    } else {
        yourAudio.pause();
    }
    
    toggleButton();

    // Prevent Default Action
    return false;
};
</script>

grazie

djjunior

Ciao, forse mi sono spiegato sicuramente male, ma per i valorex è già splittato cioè elimina il trattino.
cosa succede che nel file txt ad un certo punto può essere scritto per esempio: ARTISTA -
quindi il valorex non lo splitta e lo pubblica, quindi vorrei eliminarlo ma solo in questo caso, grazie

djjunior

Ciao a tutti
ho questo script dove recupero del testo e poi lo splitto in 3 parti mediante trattino.
Il testo standard è: ARTISTA - BRANO - ANNO
Ma molte delle volte per mie esigenze il testo è: ARISTA -
Cioè nome artista, trattino e poi nulla, come posso fare un replace che mi tolga lo spazio e trattino lasciando solo ARTISTA ?
Grazie
Ecco lo script

<?php
$percorso_file = ('file.txt');
$file = fopen($percorso_file,rb);
$riga = fread($file,1024);
$valore1 = explode(" - ",$riga);
fclose($file);

$valorex = str_replace("Ñ","&#209;",$valore1);


?>
<span class="artista" ><?php echo $valorex[0]?></span><br>
<span class="titolo" ><?php echo $valorex[1]?></span><br>
<span class="anno" ><?php echo $valorex[2]?></span>

djjunior

salve a tutti,
uso questo script in un campo input che mi controlli che ci siano solo numeri e solo un punto, e fin qui tutto ok.
come posso modificarlo per aggiungere un ulteriore controllo che mi verifichi che il primo carattere inserito sia un numero e non un punto?
Grazie

<input type="text" oninput="this.value = this.value.replace(/[^0-9.]/g, '').replace(/(\..*)\./g, '$1');" />

djjunior

Grazie ARTCAVA,
lo script lo vorrei sottoporre primo a te che me lo hai suggerito, perchè in pratica come vedi il parametro che dovrà passare qta_da_scaricare è con decimali tipo: 151.500, il campo nel db è decimal(10,3), sicuramente dovrei utilizzare qualche funzione di conversione o formatnumber (che non so quale, visto sottrazioni e somme), essendo che dal db come saprai i campi decimali hanno valore con i decimali es: 120.000, ma è solo una visualizzazione perchè quando li stampo a video questo valore lo vedo: 120 cioè senza zeri o punto(virgola)decimale.
ecco lo script se puoi darmi una mano:


articolo = request.form("descrizione") 
qta_da_scaricare = "151.500"

sql="SELECT * FROM db WHERE Articolo = '" & articolo & "' and (QtaDoc-QtaSpuntata)>0 "
Set rsa = Server.CreateObject("ADODB.Recordset")
rsa.Open sql, Conn, 3, 3
do while not rsa.eof

   qtadoc = rsa.fields("QtaDoc")
   qtaspu = rsa.fields("QtaSpuntata")
   qtarest = qtadoc-qtaspu

    if qta_da_scaricare < qtarest Then   
    qtarest = qta_da_scaricare
    End If   
    
    rsa.fields("QtaSpuntata") = "" & qtarest +  qtaspu & ""   
    qta_da_scaricare = qta_da_scaricare - qtarest


rsa.update
rsa.MoveNext
loop

if qta_da_scaricare > 0 Then
    sql="SELECT top(1) * FROM db WHERE Articolo = & "'" & articolo & "'
    Set rsa = Server.CreateObject("ADODB.Recordset")
    rsa.Open sql, Conn, 3, 3
    qtaspu = rsa.fields("QtaSpuntata")
    rsa.fields("QtaSpuntata") = qtaspu + qta_da_scaricare
    rsa.update
End If

rsa.close

Grazie 1000 per l'aiuto.

djjunior

Ciao ARTCAVA, scusa se riapro questo post, ho necessità di un aiuto al suddetto script che in mysql ha funzionato alla grande, ma lo stiamo "trasformando" in sql server, i campi in mysql erano tutti testo (longtext) e non creavano problemi ora in sql sono varchar(max) e mi sembra che le operazioni di confronto non agiscono su questi tipi di campi, potresti darmi una mano a "convertirlo" per utilizzo in sql?
Infatti ho questo errore: i tipi di dati varchar(max) e varchar(max) nell'operatore subtract sono incompatibili
Grazie e scusa ancora...

djjunior

Salve,
utilizzo questo script per l'autocomplete con file source esterno:


<!doctype html>
<html lang="it">
<head>
<meta charset="utf-8" />
<title></title>
<script type="text/javascript" src="//ajax.googleapis.com/ajax/libs/jquery/1.6.2/jquery.js" ></script>
<script type="text/javascript" src="//ajax.googleapis.com/ajax/libs/jqueryui/1.8.16/jquery-ui.js" ></script>
<link rel="stylesheet" type="text/css" href="//ajax.googleapis.com/ajax/libs/jqueryui/1.8.16/themes/base/jquery-ui.css"/>
<script>

$(function() {
$( "#tags" ).autocomplete({
source: "autocomplete.asp",
      minLength: 1
    });
    });

</script>
</head>
<body>
<div class="ui-widget">
<input id="tags" name="tags" />
</div>
</body>
</html>

autocomplete.asp


<%
Set conn = Server.CreateObject("ADODB.Connection")
Conn.Open = "DRIVER={MySQL ODBC 3.51 Driver}; SERVER=xxxxxxx;DATABASE=xxxxxxxx;UID=xxxxxxxx;PASSWORD=xxxxxxxx"

sql = "SELECT Barcode, Descrizione FROM Prodtti where Barcode like '%"  & Request.QueryString("term") & "%' or Descrizione like '%"  & Request.QueryString("term") & "%'"
Set rsc = Server.CreateObject("ADODB.Recordset")
rsc.Open sql, conn, 3, 3

output = "["

While (NOT rsc.EOF)
    output = output & "{""id"":""" & rsc.Fields.item("Barcode") & """,""value"":"" " & rsc.Fields.Item("Barcode") & "  - " & rsc.Fields.Item("Descrizione") & " ""},"
     rsc.MoveNext()
Wend


conn.Close()
Set conn = Nothing

output=Left(output,Len(output)-1)
output = output & "]"
response.write output

%>

Ora se i dati sono pochi visualizzo tutto correttamente durante l'autocomplete, mentre purtroppo dovrò avere a che fare con oltre 700mila articoli, potete aiutarmi a risolvere questo problema?
Da premettere che dovro utiizzarlo tutto in locale (sia sito che db mysql)
Grazie

djjunior

Salve ho questo script,
ora l'autocomplete lo fa sul CODE, vorrei , lasciando la visualizzazione come ora (CODE ° DESCRIZIONE)
che faccia anche la ricerca su DESCRIZIONE, come posso fare?
Grazie



<script> function autocomplete(inp, arr) {   var currentFocus;    inp.addEventListener("input", function(e) {      var a, b, i, val = this.value;       closeAllLists();      if (!val) { return false;}      currentFocus = -1;      a = document.createElement("DIV");      a.setAttribute("id", this.id + "autocomplete-list");      a.setAttribute("class", "autocomplete-items");      this.parentNode.appendChild(a);      for (i = 0; i < arr.length; i++) {        if (arr*.substr(0, val.length).toUpperCase() == val.toUpperCase()) {          b = document.createElement("DIV");           b.innerHTML = "<strong>" + arr*.substr(0, val.length) + "</strong>";          b.innerHTML += arr*.substr(val.length);          b.innerHTML += "<input type='hidden' value='" + arr* + "'>";          b.addEventListener("click", function(e) {              inp.value = this.getElementsByTagName("input")[0].value;              closeAllLists();          });          a.appendChild(b);        }      }   });    inp.addEventListener("keydown", function(e) {      var x = document.getElementById(this.id + "autocomplete-list");      if (x) x = x.getElementsByTagName("div");      if (e.keyCode == 40) {         currentFocus++;         addActive(x);      } else if (e.keyCode == 38) {         currentFocus--;         addActive(x);      } else if (e.keyCode == 13) {         e.preventDefault();        if (currentFocus > -1) {           if (x) x[currentFocus].click();        }      }   });   function addActive(x) {    if (!x) return false;     removeActive(x);    if (currentFocus >= x.length) currentFocus = 0;    if (currentFocus < 0) currentFocus = (x.length - 1);    x[currentFocus].classList.add("autocomplete-active");   }   function removeActive(x) {    for (var i = 0; i < x.length; i++) {      x*.classList.remove("autocomplete-active");    }   }   function closeAllLists(elmnt) {    var x = document.getElementsByClassName("autocomplete-items");    for (var i = 0; i < x.length; i++) {      if (elmnt != x* && elmnt != inp) {        x*.parentNode.removeChild(x*);      }    }   }   document.addEventListener("click", function (e) {      closeAllLists(e.target);   }); }  var clifora = [ <%  Set objConn=Server.CreateObject("ADODB.Connection") objConn.Open "DRIVER={MySQL ODBC 3.51 Driver}; SERVER=XXXXXXX;DATABASE=XXXXX;UID=XXXXXX;PASSWORD=XXXXX" Set objRs1 = Server.CreateObject("ADODB.Recordset") strSQL1="SELECT Code, Descrizione FROM Prodotti " objRs1.Open strSQL1, objConn While objRs1.EOF = False   vBar = Replace(objrs1("Code"), """", "&quot;") if vBar <> "" then Code = Code&""""&vBar&" °  "&objrs1("Descrizione")&""","  objRs1.Movenext Wend objRs1.close set objRs1 = Nothing  response.Write(left(Code,len(Code)-1))  %>  ];  autocomplete(document.getElementById("Art"), clifora); </script>

Grazie

djjunior

Salve,
uso mysql, ma ho difficoltà a leggere un campo DECIMAL(18,2),
ho provato sia:

qta_new: Cdbl(rs("Qta"))
ma anche:
qta_new : rs.fields("Qta")

ma invece di leggermi 1.00 nel campo Qta, mi legge solo 1 senza decimali, ma nel db sono presenti.

Dove sbaglio?
Grazie

djjunior

Grazie ARTCAVA
anche del suggerimento, ma è stata una richiesta specifica del cliente avere questa possibilità di aumentare perchè in magazzino potrebbe esserci stesso articolo non quantizzato.
Grazie ancora e ti auguro con l'occasione Buona Pasqua

djjunior

Scusami ARTCAVA
approfitto del tuo aiuto sempre in merito allo script di cui sopra.
Se si presentasse il caso per di aver esaurito tutta la quantità scaricata da tutti i prodotti es di 3 prodotti uguali:

PASTA qta 538 qtascaricata 538
PASTA qta 538 qtascaricata 538
PASTA qta 538 qtascaricata 538

e provo ad inserire altra quantità tipo 20
è possibile inserirla al primo disponibile?
es:

PASTA qta 538 qtascaricata 558
PASTA qta 538 qtascaricata 538
PASTA qta 538 qtascaricata 538

Grazie ancora

djjunior

ho trovato l'inghippo, ho utilizzato la funzione CInt:
qta_da_scaricare = CInt(request.form("qta_da_scaricare"))
e va tutto benissimo....
grazie 1000 ARTCAVA

djjunior

effettivamente no, però come ti dicevo tu se la quantità da scaricare è meno di 538, cioè esempio 25
ho il primo articolo scaricato 538 e il secondo -513

djjunior

@artcava said:

Questo valore minore sta in QtaDoc? Oppure?

sta in

qta_da_scaricare = request.form("qta_da_scaricare")

se

qta_da_scaricare = 25
invece di 600 come provato finora

djjunior

@artcava said:

Scusa, ma queste righe?

>
rsa.Open sql, Conn, 3, 3 
do while not rsa.eof

>```

Sono sparite...

Durante il copia incolla le ho omesse,  ma come ti dicevo il problema era al di fuori dello script che ho corretto, scusami, resta il fatto se metto valore minore...

djjunior

ho trovato scusami c'era prima di questo codice un'altro che creava il loop del primo articolo e lo ripeteva.... ora va benissimo, scusami....
ma resta il fatto se si mette un valore minore come spiegato su

djjunior

@djjunior

Post creati da djjunior