ASP Connection Statement Problem, Please help

Collapse
X
 
  • Time
  • Show
Clear All
new posts
  • jegray
    New Member
    • Nov 2006
    • 3

    ASP Connection Statement Problem, Please help

    I am very much a beginner in dealing with connection statments. I am getting the following error:

    Microsoft OLE DB Provider for ODBC Drivers error '80004005'

    [Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified

    /default.asp, line 32


    Here is my connection include:

    <%
    FileName="Conne ction_odbc_conn _dsn.htm"
    Type="ADO"
    HTTP="false"
    Catalog=""
    Schema=""
    var MM_connCustomer s_STRING = "dsn=access_cus tomers2.dsn;"
    %>

    Here is my javascript page coding:

    <%@LANGUAGE="JA VASCRIPT"%>

    <!--#include file="Connectio ns/connCustomers.a sp" -->
    <script language=vbscri pt runat=server>
    cr = Request.Form("c bxRemember")
    If (cr = "yes") Then
    Response.Cookie s("ckPassword ") = Request.Form("t xtPassword")
    Response.Cookie s("ckPassword") .Expires = Date + 90

    End If

    </script>
    <script language=vbscri pt runat=server>
    cr = Request.Form("c bxRemember")
    If (cr = "yes") Then
    Response.Cookie s("ckUserID") = Request.Form("t xtusername")
    Response.Cookie s("ckUserID").E xpires = Date + 90

    End If

    </script>
    <%
    var rsLogin = Server.CreateOb ject("ADODB.Rec ordset");
    rsLogin.ActiveC onnection = MM_connCustomer s_STRING;
    rsLogin.Source = "SELECT * FROM customers";
    rsLogin.CursorT ype = 0;
    rsLogin.CursorL ocation = 2;
    rsLogin.LockTyp e = 3;
    rsLogin.Open();
    rsLogin_numRows = 0;
    %>
    <%
    // *** Validate request to log in to this site.
    var MM_LoginAction = Request.ServerV ariables("URL") ;
    if (Request.QueryS tring!="") MM_LoginAction += "?" + Request.QuerySt ring;
    var MM_valUsername= String(Request. Form("txtuserna me"));
    if (MM_valUsername != "undefined" ) {
    var MM_fldUserAutho rization="Acces sGroup";
    var MM_redirectLogi nSuccess="Login OK.asp";
    var MM_redirectLogi nFailed="Regist er.asp";
    var MM_flag="ADODB. Recordset";
    var MM_rsUser = Server.CreateOb ject(MM_flag);
    MM_rsUser.Activ eConnection = MM_connCustomer s_STRING;
    MM_rsUser.Sourc e = "SELECT ID, UserID, Password, AccessGroup, PA, ITB, PDA, UNV1, UNV2, UNV3, UNV4, UNV5, UNV6, UNV7, ICMS, CFocus, Formation";
    if (MM_fldUserAuth orization != "") MM_rsUser.Sourc e += "," + MM_fldUserAutho rization;
    MM_rsUser.Sourc e += " FROM customers WHERE UserID='" + MM_valUsername + "' AND Password='" + String(Request. Form("txtpasswo rd")) + "'";
    MM_rsUser.Curso rType = 0;
    MM_rsUser.Curso rLocation = 2;
    MM_rsUser.LockT ype = 3;
    MM_rsUser.Open( );
    if (!MM_rsUser.EOF || !MM_rsUser.BOF) {
    // username and password match - this is a valid user
    Session("MM_Use rname") = MM_valUsername;
    Session('svID') = MM_rsUser.Field s('ID').Value;
    Session('svAcce ssGroup') = MM_rsUser.Field s('AccessGroup' ).Value
    Session('svPA') = MM_rsUser.Field s('PA').Value;
    Session('svITB' ) = MM_rsUser.Field s('ITB').Value;
    Session('svPDA' ) = MM_rsUser.Field s('PDA').Value;
    Session('svUNV1 ') = MM_rsUser.Field s('UNV1').Value ;
    Session('svUNV2 ') = MM_rsUser.Field s('UNV2').Value ;
    Session('svUNV3 ') = MM_rsUser.Field s('UNV3').Value ;
    Session('svUNV4 ') = MM_rsUser.Field s('UNV4').Value ;
    Session('svUNV5 ') = MM_rsUser.Field s('UNV5').Value ;
    Session('svUNV6 ') = MM_rsUser.Field s('UNV6').Value ;
    Session('svUNV7 ') = MM_rsUser.Field s('UNV7').Value ;
    Session('svICMS ') = MM_rsUser.Field s('ICMS').Value ;
    Session('svFocu s') = MM_rsUser.Field s('CFocus').Val ue;
    Session('svForm ation') = MM_rsUser.Field s('Formation'). Value;
    if (MM_fldUserAuth orization != "") {
    Session("MM_Use rAuthorization" ) = String(MM_rsUse r.Fields.Item(M M_fldUserAuthor izati on).Value);
    } else {
    Session("MM_Use rAuthorization" ) = "";
    }
    if (String(Request .QueryString("a ccessdenied")) != "undefined" && true) {
    MM_redirectLogi nSuccess = Request.QuerySt ring("accessden ied");
    }
    MM_rsUser.Close ();
    Response.Redire ct(MM_redirectL oginSuccess);
    }
    MM_rsUser.Close ();
    Response.Redire ct(MM_redirectL oginFailed);
    }
    %>
    <script language=vbscri pt runat=server>
    ' *** Set A Session Variable
    ' *** MagicBeat Server Behavior - 2006 - by Jag S. Sidhu - www.magicbeat.c om

    </script>

    The site is bieng hosted by godaddy and a valid dsn is in place under the name:
    access_customer s2.dsn

    Please help this is driving me nuts. It will serve to be a login and customer information update.

    Thanks
Working...