Visualizzazione dei risultati da 1 a 5 su 5
  1. #1

    Problemi connessione database

    Ciao a tutti, all'interno dei tutorials ho trovato uno script per leggere news con flash tramite una pagina ASP+DB. Il problema è che lanciando solamente la pagina ASP mi appare questo errore:

    Microsoft OLE DB Provider for ODBC Drivers error '80004005'
    [Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified
    /prova/news.asp, line 8

    La pagina si trova sui servers di Aruba, forse va modificato il codice? Eccolo qua:


    <%
    Response.Expires = 0
    Dim rs, cn, sql
    Set rs = Server.CreateObject("ADODB.Recordset")
    Set cn = Server.CreateObject("ADODB.Connection")
    sql = "SELECT * FROM News ORDER BY News.IDNews DESC"
    cn.Open "DSN=news;" <--- line 8

    Set rs.ActiveConnection = cn
    rs.CursorType = adOpenStatic
    rs.LockType = adLockOptimistic
    rs.Source = "News"
    rs.Open sql, cn

    x = 0

    Do until(x=5)
    x = x + 1
    Response.Write("titolo" & x & "=" & rs("Titolo") & "&link" & x & "=" & rs("Link"))
    rs.MoveNext
    If x<5 then Response.Write("&")
    Loop

    rs.Close
    Set rs=Nothing
    %>


  2. #2
    Utente di HTML.it L'avatar di Sypher
    Registrato dal
    Jun 2003
    Messaggi
    1,994
    vedi se può esserti utile questo
    La passera non dura perchè Sypher la cattura!

    "No one like us we don't care, we are millwall, super millwall, we are millwall from the DEN"

  3. #3
    ma la connessione dovè??
    quale es hai utilizzato??
    la verità non è una meretrice che si getta al collo di chi non la vuole ma anzi essa è dotata di una così altera bellezza che anche chi sacrifica tutto per ottenerla non è sicuro di averla raggiunta !

  4. #4

  5. #5
    in un modo o nell'altro sono riuscito a sistemare la connessione in questo modo:

    Response.Expires = 0
    Dim rs, cn, sql
    Set rs = Server.CreateObject("ADODB.Recordset")
    Set cn = Server.CreateObject("ADODB.Connection")
    Cn.Open = "driver={Microsoft Access Driver (*.mdb)};dbq=" + Server.MapPath("/mdb-database/database.mdb")
    sql = "SELECT * FROM News ORDER BY id DESC"
    ....

    ma il codice finale :

    x = 0
    Do until(x=5)
    x = x + 1
    Response.Write("titolo" & x & "=" & rs("Titolo") & "&link" & x & "=" & rs("Link"))
    rs.MoveNext
    If x<5 then Response.Write("&")
    Loop

    che significa?
    Grazie per l'aiuto.


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.