Results 1 to 2 of 2

Thread: unable to open database

  1. #1

    Thread Starter
    New Member
    Join Date
    Aug 2003
    Location
    Australia
    Posts
    9

    unable to open database

    Hi, this woks in localhost but when uploaded to server the message (unable to open database)
    Why?



    Code:
    Imports System
    Imports System.Collections
    Imports System.ComponentModel
    Imports System.Data
    Imports System.Data.OleDb
    Imports System.Drawing
    Imports System.Web
    Imports System.Web.SessionState
    Imports System.Web.UI
    Imports System.Web.UI.WebControls
    Imports System.Web.UI.HtmlControls
    Imports System.Web.Security
    
    Public Class Login1
        Inherits System.Web.UI.Page
    
    #Region " Web Form Designer Generated Code "
    
        'This call is required by the Web Form Designer.
        <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
            Me.OleDbDataAdapter1 = New System.Data.OleDb.OleDbDataAdapter
            Me.OleDbDeleteCommand1 = New System.Data.OleDb.OleDbCommand
            Me.OleDbConnection1 = New System.Data.OleDb.OleDbConnection
            Me.OleDbInsertCommand1 = New System.Data.OleDb.OleDbCommand
            Me.OleDbSelectCommand1 = New System.Data.OleDb.OleDbCommand
            Me.OleDbUpdateCommand1 = New System.Data.OleDb.OleDbCommand
           
            Me.OleDbDataAdapter1.DeleteCommand = Me.OleDbDeleteCommand1
            Me.OleDbDataAdapter1.InsertCommand = Me.OleDbInsertCommand1
            Me.OleDbDataAdapter1.SelectCommand = Me.OleDbSelectCommand1
            Me.OleDbDataAdapter1.TableMappings.AddRange(New System.Data.Common.DataTableMapping() {New System.Data.Common.DataTableMapping("Table", "Users", New System.Data.Common.DataColumnMapping() {New System.Data.Common.DataColumnMapping("loginID", "loginID")})})
            Me.OleDbDataAdapter1.UpdateCommand = Me.OleDbUpdateCommand1
            '
            'OleDbDeleteCommand1
            '
            Me.OleDbDeleteCommand1.CommandText = "DELETE FROM Users WHERE (loginID = ?)"
            Me.OleDbDeleteCommand1.Connection = Me.OleDbConnection1
            Me.OleDbDeleteCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("Original_loginID", System.Data.OleDb.OleDbType.VarWChar, 50, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "loginID", System.Data.DataRowVersion.Original, Nothing))
            '
            'OleDbConnection1
            '
            Me.OleDbConnection1.ConnectionString = "Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Registry Path=;Jet OLEDB:Database L" & _
            "ocking Mode=1;Data Source=""C:\Inetpub\wwwroot\VB\MyWebSite\Login.mdb"";Jet OLEDB:" & _
            "Engine Type=5;Provider=""Microsoft.Jet.OLEDB.4.0"";Jet OLEDB:System database=;Jet " & _
            "OLEDB:SFP=False;persist security info=False;Extended Properties=;Mode=Share Deny" & _
            " None;Jet OLEDB:Encrypt Database=False;Jet OLEDB:Create System Database=False;Je" & _
            "t OLEDB:Don't Copy Locale on Compact=False;Jet OLEDB:Compact Without Replica Rep" & _
            "air=False;User ID=Admin;Jet OLEDB:Global Bulk Transactions=1"
            '
            'OleDbInsertCommand1
            '
            Me.OleDbInsertCommand1.CommandText = "INSERT INTO Users(loginID) VALUES (?)"
            Me.OleDbInsertCommand1.Connection = Me.OleDbConnection1
            Me.OleDbInsertCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("loginID", System.Data.OleDb.OleDbType.VarWChar, 50, "loginID"))
            '
            'OleDbSelectCommand1
            '
            Me.OleDbSelectCommand1.CommandText = "SELECT loginID FROM Users"
            Me.OleDbSelectCommand1.Connection = Me.OleDbConnection1
            '
            'OleDbUpdateCommand1
            '
            Me.OleDbUpdateCommand1.CommandText = "UPDATE Users SET loginID = ? WHERE (loginID = ?)"
            Me.OleDbUpdateCommand1.Connection = Me.OleDbConnection1
            Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("loginID", System.Data.OleDb.OleDbType.VarWChar, 50, "loginID"))
            Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("Original_loginID", System.Data.OleDb.OleDbType.VarWChar, 50, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "loginID", System.Data.DataRowVersion.Original, Nothing))
    
        End Sub
        Protected WithEvents nameList As System.Web.UI.WebControls.DropDownList
        Protected WithEvents passwordTextBox As System.Web.UI.WebControls.TextBox
        Protected WithEvents submitButton As System.Web.UI.WebControls.Button
        Protected dataReader As OleDbDataReader
        Protected WithEvents OleDbDataAdapter1 As System.Data.OleDb.OleDbDataAdapter
        Protected WithEvents OleDbSelectCommand1 As System.Data.OleDb.OleDbCommand
        Protected WithEvents OleDbInsertCommand1 As System.Data.OleDb.OleDbCommand
        Protected WithEvents OleDbUpdateCommand1 As System.Data.OleDb.OleDbCommand
        Protected WithEvents OleDbDeleteCommand1 As System.Data.OleDb.OleDbCommand
        Protected WithEvents OleDbConnection1 As System.Data.OleDb.OleDbConnection
        Protected WithEvents requiredPasswordValidator As System.Web.UI.WebControls.RequiredFieldValidator
        Protected WithEvents inValidPasswordValidator As System.Web.UI.WebControls.CustomValidator
    
        'NOTE: The following placeholder declaration is required by the Web Form Designer.
        'Do not delete or move it.
        Private designerPlaceholderDeclaration As System.Object
    
        Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
            'CODEGEN: This method call is required by the Web Form Designer
            'Do not modify it using the code editor.
            InitializeComponent()
    
    
            If Not IsPostBack Then
                Try
                    OleDbConnection1.Open()
                    dataReader = OleDbDataAdapter1.SelectCommand.ExecuteReader()
                    While (dataReader.Read())
                        nameList.Items.Add(dataReader.GetString(0))
                    End While
                Catch exception As OleDbException
                    Response.Write("Unable to open database!")
                Finally
                    OleDbConnection1.Close()
                End Try
            End If
        End Sub
        Private Sub invalidPasswordValidator_ServerValidate( _
        ByVal source As Object, _
        ByVal args As ServerValidateEventArgs) _
        Handles invalidPasswordValidator.ServerValidate
            Try
                OleDbConnection1.Open()
                OleDbDataAdapter1.SelectCommand.CommandText = "SELECT * FROM Users WHERE loginID = '" & _
                Request.Form("nameList").ToString() & "'"
                dataReader = OleDbDataAdapter1.SelectCommand.ExecuteReader()
                dataReader.Read()
    
    
                If args.Value = dataReader.GetString(1) Then
                    FormsAuthentication.SetAuthCookie(Request.Form("namelist"), False)
                    Session.Add("name", Request.Form("nameList").ToString())
                    Response.Redirect("RickAndLita.aspx")
                Else
                    args.IsValid = False
                End If
            Catch exception As OleDbException
                Response.Write("Unable to open database!")
            Finally
                OleDbConnection1.Close()
            End Try
        End Sub ' InvalidPasswordValidator_ServerValidate
    
    
    #End Region
    
        Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            'Put user code to initialize the page here
        End Sub
    
        Private Sub CustomValidator1_ServerValidate(ByVal source As System.Object, ByVal args As System.Web.UI.WebControls.ServerValidateEventArgs)
    
        End Sub
    
        Private Sub OleDbDataAdapter1_RowUpdated(ByVal sender As System.Object, ByVal e As System.Data.OleDb.OleDbRowUpdatedEventArgs) Handles OleDbDataAdapter1.RowUpdated
    
        End Sub
    End Class

  2. #2
    Hyperactive Member
    Join Date
    Aug 2002
    Location
    Fort Collins, CO
    Posts
    366
    make sure the directory that that .mdb is located is writeable and that the aspnet account has permission to write to that directory.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width