+ Reply to Thread
Page 1 of 3 1 2 3 LastLast
Results 1 to 10 of 28

Thread: mdb to SQL SERVER

  1. #1
    Barn Enthusiast Centurion is on a distinguished road Centurion's Avatar
    Join Date
    Dec 2008
    Posts
    429
    Rep Power
    2

    mdb to SQL SERVER

    i have a connection:

    Code:
    <!--#include file="adovbs.inc"-->
    
    <%
    Response.Expires = -1500
    Response.Buffer = true
    Server.ScriptTimeout = 100
    Session.Timeout = 90
    
    
    
    			'Create an ADO connection object
    			set conn=Server.CreateObject("ADODB.Connection")
    			strSQLServerName = "XXXXXXX" 'Holds the name of the SQL Server (This is the name/location or IP address of the SQL Server)
    			strSQLDBUserName = "SA" 'Holds the user name (for SQL Server Authentication)
    			strSQLDBPassword = "test" 'Holds the password (for SQL Server Authentication)
    			strSQLDBName = "db2SQL" 
    			
    				'Initilise the DB Connection String
    			conn.open = "provider=SQLOLEDB; Server=" & strSQLServerName & ";User ID=" & strSQLDBUserName & ";Password=" & strSQLDBPassword & ";Database=" & strSQLDBName & ";"
    		
    %>
    
    and i have this code below which is working with an access database.. my problem is, i have tryed changing cn to conn but it still doesnt work.. could anyone suggest what i should do? or help me code this? pretty please

    Code:
    <%
    Dim submit1, oldpassword, newpassword, confirmpassword
    submit1 = Server.HTMLEncode(Request.Form("submit1"))
    oldpassword = Request.Form("oldpassword")
    newpassword = Request.Form("newpassword")
    confirmpassword = Request.Form("confirmpassword")
    'If submit1 = "confirmpassword" Then
     Dim sc, cn, rs, sql
     
     sc = "driver={Microsoft Access Driver (*.mdb)};dbq=" _
     & Server.MapPath("../DB/H2.mdb")
     
     Set cn = Server.CreateObject("ADODB.Connection")
     
     Set rs = Server.CreateObject("ADODB.Recordset")
     
     cn.Open conn
     
     sql = "SELECT [password] FROM [member] " _
      & "WHERE [username] = '" & Request.Form("username") & "'"
    
    
     rs.Open sql, cn, 1
     
     If oldpassword = "" Or newpassword = "" Then
      Response.Write "Make sure password is valid and fill all the fields please!"
     ElseIf rs("password") <> oldpassword Then
      Response.Write "Wrong password inserted!"
     ElseIf newpassword <> confirmpassword Then
      Response.Write "Confirm password and new password are not the same!"
     ElseIf oldpassword = newpassword Then
      Response.Write "Old password and new password are the same!"
     Else
        
        sql = "UPDATE mem SET password = '" & newpassword & "' WHERE " _
      & "username = '" & Request.Form("username") & "'"
    
      cn.Execute(sql)
      Response.Write "Your Password has been changed!"
     End If
     rs.Close
     Set rs = Nothing
     cn.Close
     conn.close
     Set cn = Nothing
    'End If
    %>
    

  2. #2
    Lazy Bum micky is a jewel in the rough micky is a jewel in the rough micky is a jewel in the rough micky is a jewel in the rough micky's Avatar
    Join Date
    Jul 2008
    Location
    India
    Posts
    683
    Blog Entries
    1
    Rep Power
    6

    Have you included the connection file or is it on the same page??

    Also do you get any error?
    If yes what is it?

  3. #3
    Barn Enthusiast Centurion is on a distinguished road Centurion's Avatar
    Join Date
    Dec 2008
    Posts
    429
    Rep Power
    2

    Quote Originally Posted by micky View Post
    Have you included the connection file or is it on the same page??

    Also do you get any error?
    If yes what is it?
    the connection file is included in the page.. and the line in the connection file is called "Conn"

    the connection is to a sql server database.

  4. #4
    The Barnfather jmurrayhead has much to be proud of jmurrayhead has much to be proud of jmurrayhead has much to be proud of jmurrayhead has much to be proud of jmurrayhead has much to be proud of jmurrayhead has much to be proud of jmurrayhead has much to be proud of jmurrayhead has much to be proud of jmurrayhead has much to be proud of jmurrayhead has much to be proud of jmurrayhead's Avatar
    Join Date
    Mar 2008
    Location
    Washington, D.C.
    Posts
    2,347
    Blog Entries
    9
    Rep Power
    19

    We'll need more info than that...what happens when you try to run the code. Also, you will have to change all the variables to either cn or conn. You can't have both.
    jmurrayhead
    If you agree, give me rep. If my post helped you, click "Thanks".
    If you like it here...throw us a few bones to help support us.


  5. #5
    Barn Enthusiast Centurion is on a distinguished road Centurion's Avatar
    Join Date
    Dec 2008
    Posts
    429
    Rep Power
    2

    Quote Originally Posted by jmurrayhead View Post
    We'll need more info than that...what happens when you try to run the code. Also, you will have to change all the variables to either cn or conn. You can't have both.
    i have changed cn to conn :

    Code:
    <%
    Dim submit1, oldpassword, newpassword, confirmpassword
    submit1 = Server.HTMLEncode(Request.Form("submit1"))
    oldpassword = Request.Form("oldpassword")
    newpassword = Request.Form("newpassword")
    confirmpassword = Request.Form("confirmpassword")
    'If submit1 = "confirmpassword" Then
     Dim sc, conn, rs, sql
     
    ' sc = "driver={Microsoft Access Driver (*.mdb)};dbq=" _
    ' & Server.MapPath("../DB/H2.mdb")
     
     Set conn = Server.CreateObject("ADODB.Connection")
     
     Set rs = Server.CreateObject("ADODB.Recordset")
     
     conn.Open conn
     
     sql = "SELECT [password] FROM [member] " _
      & "WHERE [username] = '" & Request.Form("username") & "'"
    
    
     rs.Open sql, conn, 1
     
     If oldpassword = "" Or newpassword = "" Then
      Response.Write "Make sure password is valid and fill all the fields please!"
     ElseIf rs("password") <> oldpassword Then
      Response.Write "Wrong password inserted!"
     ElseIf newpassword <> confirmpassword Then
      Response.Write "Confirm password and new password are not the same!"
     ElseIf oldpassword = newpassword Then
      Response.Write "Old password and new password are the same!"
     Else
        
        sql = "UPDATE mem SET password = '" & newpassword & "' WHERE " _
      & "username = '" & Request.Form("username") & "'"
    
      conn.Execute(sql)
      Response.Write "Your Password has been changed!"
     End If
     rs.Close
     Set rs = Nothing
     conn.Close
     conn.close
     Set conn = Nothing
    'End If
    %>
    
    and the error i get is..:

    Error Type:
    Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
    [Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified
    /changep3.asp, line 23


    line 23 is :

    Code:
     conn.Open conn
    

  6. #6
    The Barnfather jmurrayhead has much to be proud of jmurrayhead has much to be proud of jmurrayhead has much to be proud of jmurrayhead has much to be proud of jmurrayhead has much to be proud of jmurrayhead has much to be proud of jmurrayhead has much to be proud of jmurrayhead has much to be proud of jmurrayhead has much to be proud of jmurrayhead has much to be proud of jmurrayhead's Avatar
    Join Date
    Mar 2008
    Location
    Washington, D.C.
    Posts
    2,347
    Blog Entries
    9
    Rep Power
    19

    I would take a look here: ConnectionStrings.com - Forgot that connection string? Get it here! and try the various connection strings they have for SQL Server. It seems it is unable to find the data source (SQL Server). Be sure your strSQLServerName variable contains the right address/ IP of your SQL Server.
    jmurrayhead
    If you agree, give me rep. If my post helped you, click "Thanks".
    If you like it here...throw us a few bones to help support us.


  7. #7
    Super Sarcasm Mistress mehere is a glorious beacon of light mehere is a glorious beacon of light mehere is a glorious beacon of light mehere is a glorious beacon of light mehere is a glorious beacon of light mehere's Avatar
    Join Date
    Mar 2008
    Location
    Wide Awake In Dreamland
    Posts
    436
    Rep Power
    7

    maybe it's me, but i don't even see a connection string to SQL ... the only one i see, is the one to Access and that one is commented out.
    Quote of the Month:
    Leaders: Leaders are like eagles. We don't have either of them here.

    Questions to Ponder:
    Why do banks charge you a "non-sufficient funds fee" on money they already know you don't have?

    iif([sarcasm]=true,iif([you have to ask]=true,"didn't work","ha ha ha"),"not sarcasm")
    copyright © 2008 sbenj69

    Sarchasm: The gulf between the author of sarcastic wit and the person who doesn't get it.

  8. #8
    Barn Enthusiast Centurion is on a distinguished road Centurion's Avatar
    Join Date
    Dec 2008
    Posts
    429
    Rep Power
    2

    Quote Originally Posted by mehere View Post
    maybe it's me, but i don't even see a connection string to SQL ... the only one i see, is the one to Access and that one is commented out.
    the include file contains the connection.

    when i did ..

    cn = conn

    it crashed

  9. #9
    Wolfmaster Wolffy is a splendid one to behold Wolffy is a splendid one to behold Wolffy is a splendid one to behold Wolffy is a splendid one to behold Wolffy is a splendid one to behold Wolffy is a splendid one to behold Wolffy is a splendid one to behold Wolffy is a splendid one to behold Wolffy's Avatar
    Join Date
    Mar 2008
    Location
    Peoria, IL
    Posts
    1,037
    Blog Entries
    2
    Rep Power
    13

    Well, the problem is probably with the connection string. Without seeing that, we can't really help much.
    Wolffy
    ------------------------
    Opinions expressed are my own and do not necessity reflect those of any sane person. Any code provided is intended to be an example and is provided AS IS. Rework for your specific environment may be required. Void where prohibited by law. Not valid in California. Your mileage may vary.

  10. #10
    Barn Enthusiast Centurion is on a distinguished road Centurion's Avatar
    Join Date
    Dec 2008
    Posts
    429
    Rep Power
    2

    Quote Originally Posted by Wolffy View Post
    Well, the problem is probably with the connection string. Without seeing that, we can't really help much.
    the connection string was in my first post!...

+ Reply to Thread
Page 1 of 3 1 2 3 LastLast

Similar Threads

  1. SQL Server Integration Services
    By guddu in forum Microsoft SQL Server
    Replies: 1
    Last Post: April 24th, 2009, 07:08 AM
  2. SQL Server CREATE TABLE..LIKE
    By Wolffy in forum SQL Code Samples
    Replies: 2
    Last Post: March 12th, 2009, 04:51 PM
  3. SQL Server 2008
    By stephenhy88 in forum Microsoft SQL Server
    Replies: 7
    Last Post: August 13th, 2008, 01:55 AM
  4. SQL Server Views
    By theChris in forum Microsoft SQL Server
    Replies: 3
    Last Post: March 23rd, 2008, 07:35 PM

Bookmarks

Posting Permissions

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

SEO by vBSEO