Re: Forms and ODBC connections

Tech-Archive recommends: Repair Windows Errors & Optimize Windows Performance

Thank you for your answer but it isn't clear to me the sintax you are using
for the connection string and the update statement.
I am trying with something like
strCnn = "Provider=MSDASQL;DSN=hpsic;UID=hpdba;PWD=hpdba"
CurrentProject.Connection.Execute "update " & strCnn & " dummy set dummy
=0"
but I get an error in the update sintax

(I get other errors if I write
strCnn = "[Provider=MSDASQL;DSN=hpsic;UID=hpdba;PWD=hpdba].dummy")
CurrentProject.Connection.Execute "UPDATE " & strCnn & " SET DUMMY = 0")
Thanks,
Marta

"Daniel Doyle" wrote:

> I read about an idea for this on the Internet, I can't remember where,
> basically you provide a login box that will execute SQL statement, which
> will then pool the connection.
> This is a function I've used in the past to initiate a connection to to SQL
> Server. I had login form that passed username and password to this function
> and the connection string mirrored that of my linked tables. The dummy table
> is updated as this is a quick way of connecting rather than doing a select,
> so you would also need to create this table and on the server with update
> permission.
> I was never 100% confident about this method and decided to have users log
> into terminal server and then use windows authentication, but it may work
> for you.
>
> Dan.
>
> Public Function LoginBackendSQLUser(username As String, Password As String)
> _
> As Boolean
>
> Dim strCnn As String
>
> On Error GoTo ErrHandler
>
> DoCmd.Hourglass True
>
> strCnn = "[ODBC;DRIVER=SQL
> Server;SERVER=193.111.111.111;APP=appname;WSID=;DATABASE=mydatabase;" & _
> "uid=" & username & ";pwd=" & Password & "].dummy"
>
> CurrentProject.Connection.Execute "UPDATE " & strCnn & " SET DUMMY = 0"
>
> LoginBackendSQLUser = True
>
> ExitHere:
> DoCmd.Hourglass False
> Exit Function
>
> ErrHandler:
> LoginBackendSQLUser = False
> Resume ExitHere
>
> End Function
> "martal" <martal@xxxxxxxxxxxxxxxxxxxxxxxxx> wrote in message
> news:5D0DB969-AA0A-48B9-981E-B5AD878EB81D@xxxxxxxxxxxxxxxx
> > I have a data form using a record source based on a linked table in an
> Oracle
> > database.
> > I would like to have a logon form where users input their username and
> > password and then to pass them to the data form, in order to avoid the
> ODBC
> > logon form.
> > I was suggested to do something like
> >
> > Private Sub Form_Open()
> > Dim conn As New ADODB.Connection
> > conn.ConnectionString = "Provider=MSDASQL;DSN=hpsic;UID=hpdba;PWD=hpdba"
> > conn.Properties("PROMPT") = adPromptNever
> > conn.Open
> >
> > but it dosen't works: when users open the data form, at first the ODBC
> logon
> > form is displayed, and only after that the form open event code is
> executed.
> > Has anyone any suggestion?
> > Thanks,
> > Marta
> >
> >
>
>
>
.

Relevant Pages

  • Re: ADO connections question
    ... Function CreateADOObjects(ConnectionString as string) ... you'll see this error if the connection has not been ... I have a specific login form that calls the dbLogin function as shown ... Dim strCriteria As String ...
    (microsoft.public.access.adp.sqlserver)
  • Re: Nochmals Treeview
    ... private void button1_Click(object sender, System.EventArgs e) { ... private void TabelleAnlegen(string strDBPfad, string strDB, string strTabellenName){ ... OleDbConnection connection = new OleDbConnection; ... OleDbCommand command = new OleDbCommand; ...
    (microsoft.public.de.german.entwickler.dotnet.csharp)
  • Re: ExecuteReader requires an open and available Connection.
    ... you have ALL your users sharing one connection. ... Public Shared Function GetServerAs String ... Dim theServer As String ...
    (microsoft.public.dotnet.framework.aspnet)
  • RE: Error using Login control ASP.NET App_Data Folder
    ... the UserInstance type of connection string is for SQLEXPRESS only and is ... Server Management Studio and use a standard connection ... An error has occurred while establishing a connection to the server. ... SqlInternalConnectionTds connHandler, Boolean ignoreSniOpenTimeout, ...
    (microsoft.public.dotnet.framework.aspnet)
  • Change Connection String during runtime
    ... connection is stored in the app.config file. ... connection string without exiting the application. ... Dim newConnection As String ... Private Sub RecordDatabase_Enter(ByVal sender As Object, ...
    (microsoft.public.dotnet.languages.vb)