Ciao a chi, come me, non è ancora in ferie.
Avrei bisogno di un aiutino.
Ho uno script in vscript che interroga un db in access.
Nel risultato della query non riesco a far apparire il link attivo; il risultato è "prova ma, non appare nessun link attivo.
Potete aiutarmi?
Grazie anticipatamente.
Posta un po' più di codice e indica la riga dove riscontri il problema.
Provare paura per un qualcosa che ti possa capitare nel futuro non ti evita quell'evento,ti fa soltanto vivere un presente sbagliato!
Grazie per la risposta e per l'aiuto:
il codice
Response.Write "<a href=""http://....."">prova</a> " & rs("iva") & "" & rs("cognome") & "" & rs("nome") & "" & rs("nome") & "" & rs("provincia")
viene letto come prova.
Insomma non appare solo "prova" con il link attivo
Ancora grazie
Ma scriverlo direttamente così?
codice:Response.Write("prova" & rs("iva") & " " & rs("cognome") & " " & rs("nome") & " " & rs("nome") & " " & rs("provincia"))
Provare paura per un qualcosa che ti possa capitare nel futuro non ti evita quell'evento,ti fa soltanto vivere un presente sbagliato!
Non vuole collaborare.
Questo è l'errore:
Microsoft VBScript compilation error '800a0409'
Unterminated string constant
controlla comunque le aperture e le chiusure delle virgolette e delle parentesicodice:Response.Write("prova" & rs("iva") & " " & rs("cognome") & " " & rs("nome") & " " & rs("nome") & " " & rs("provincia"))
Ho provato questo esempio, non avendo i valori del recordset e mi ha funzionato:
Prova a capire il perchè.codice:<% Option Explicit Dim iva, cognome, nome, provincia iva = 25 cognome = "pippo" nome = "pluto" provincia = "pa" Response.Write("prova" & iva & " " & cognome & " " & nome & " " & nome & " " & provincia) %>
Provare paura per un qualcosa che ti possa capitare nel futuro non ti evita quell'evento,ti fa soltanto vivere un presente sbagliato!
Questo è l'intero script.
Ma il link non è attivo ????
<%
Option Explicit
Response.Buffer = True
%>
<html>
<head>
<style>
p { font-family:verdana; font-size:11px; }
</style>
</head>
<body>
<p align="center">
<%
' ADO Constant. Dont change this
Const adCmdText = &H0001
' Connection string and SQL statement
Dim query, connStr
query = "select id, cognome, nome, iva, provincia from tbl_authors"
'query = "select statement from RandomRec"
connStr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("/mdb-database/studio.mdb")
'connStr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("random.mdb")
'url_DB = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & server.mappath("/mdb-database/database.mdb")
' Opening database
Dim rs
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open query, connStr, 3, , adCmdText
' Generating random number from total number of records
Dim intRnd
Randomize Timer
intRnd = (Int(RND * rs.RecordCount))
' Now moving the cursor to random record number
rs.Move intRnd
' Showing the random statement
'Response.Write("prova" & rs("iva") & " " & rs("cognome") & " " & rs("nome") & " " & rs("nome") & " " & rs("provincia"))
'Response.Write rs("iva") & "" & rs("cognome") & "" & rs("nome") & "" & rs("provincia")
' Closing the database
rs.Close
Set rs = Nothing
%>
</p>
</body>
</html>
E certo che non è attivo, c'è il commento:
Leva quell'apice prima:codice:'Response.Write("prova" & rs("iva") & " " & rs("cognome") & " " & rs("nome") & " " & rs("nome") & " " & rs("provincia"))
codice:Response.Write("prova" & rs("iva") & " " & rs("cognome") & " " & rs("nome") & " " & rs("nome") & " " & rs("provincia"))
Provare paura per un qualcosa che ti possa capitare nel futuro non ti evita quell'evento,ti fa soltanto vivere un presente sbagliato!
Scusa,
l'apice era un errore nel copia-incolla.
Nella versione on-line l'apice non c'è ma il link non diventa attivo.
Scusa per l'OT. Lo script si trova in pagina asp :-D
Come diavolo faccio a risolvere il problema?
Perchè lo script rifiuta categoricamente di collaborare?
Comunque, grazie !!!
Permessi di invio
Rispondi quotando