Re: [foxboro] AIM*AT access through ODBC
- From: Jim Pan <JPan@xxxxxxx>
- To: "'Control y Automatizacion (Rodolfo Piedra)'" <rpiedra@xxxxxxxxxxx>
- Date: Thu, 22 Aug 2002 11:49:56 -0500
We have done applications in VB using AIM*ODBC. Please see the sample code
below. Also it is important that your ODBC DSN is set up correctly.
Regards,
Jim Pan
Plant Automation Services
Private Type JouEventConfigType
Type As String
Path As String
Login As String
Password As String
SysDB As String
DSNDB As String
DataSourceLabel As String
PrcAlmTable As String
PrcChngTable As String
PrcAlmFlds As PrcAlmFldType
PrcChngFlds As PrcChngFldType
ALM As String
RTN As String
ACK As String
AlarmEventID() As String
ChangeEventID() As String
End Type
Private Sub OpenSourceDB(udtProp As JouEventConfigType, dbsSource As
Database)
Dim strConnect As String
'open source database
If udtProp.Type = "MS Access Database" Then
'Access
If udtProp.SysDB <> "" Then
DBEngine.SystemDB = udtProp.SysDB
DBEngine.DefaultUser = udtProp.Login
DBEngine.DefaultPassword = udtProp.Password
End If
Set dbsSource = OpenDatabase(udtProp.Path)
ElseIf udtProp.Type = "MS Excel" Then
'Excel
If udtProp.Login <> "" Then
DBEngine.DefaultPassword = udtProp.Login
End If
Set dbsSource = OpenDatabase(udtProp.Path, False, True, "Excel 5.0")
Else
'ODBC
strConnect = "ODBC;UID=" & udtProp.Login & ";PWD=" &
udtProp.Password & ";DATABASE=" & udtProp.DSNDB
Set dbsSource = OpenDatabase(udtProp.Path, 0, -1, strConnect)
End If
End Sub
-----Original Message-----
From: Control y Automatizacion (Rodolfo Piedra)
[mailto:rpiedra@xxxxxxxxxxx]
Sent: Thursday, August 22, 2002 4:50 AM
To: foxboro@xxxxxxxxxxxxx
Subject: Re: [foxboro] AIM*AT access through ODBC
Can someone provide an example using visual basic and MS-SQL,
Thanks in advance, regards,
Rodolfo Piedra
Control y Automatización SA
rpiedra@xxxxxxxxxxx
----- Original Message -----
From: <sturner@xxxxxxxxxxxxx>
To: <foxboro@xxxxxxxxxxxxx>
Sent: Thursday, August 22, 2002 3:29 PM
Subject: Re: [foxboro] AIM*AT access through ODBC
>
>
> We use AIM * ODBC with Lotus Notes for some production databases, and it
> works well. We have used Crystal Reports with ODBC with some success.
>
>
>
>
> "Balasubramaniam, Satishkumar"
> <Satishkumar.Balasubramaniam@Inv To:
foxboro@xxxxxxxxxxxxx
> ensys.com> cc:
> Sent by: Subject:
[foxboro] AIM*AT access through ODBC
> foxboro-bounce@xxxxxxxxxxxxx
>
>
> 08/22/2002 09:19 AM
> Please respond to foxboro
>
>
>
>
>
>
>
> Appreciate if anyone can show me some links on AIM*AT access through ODBC!
> Looks like it is a bit different from the normal ODBC as I get an error
> while doing a SQLPrepare for an update command!
>
> Thanks & Regards,
> Satish
>
>
>
> _______________________________________________________________________
> This mailing list is neither sponsored nor endorsed by Invensys Process
> Systems (formerly The Foxboro Company). Use the info you obtain here at
> your own risks. Read http://www.thecassandraproject.org/disclaimer.html
>
> foxboro mailing list: http://www.freelists.org/list/foxboro
> to subscribe: mailto:foxboro-request@xxxxxxxxxxxxx?subject=join
> to unsubscribe: mailto:foxboro-request@xxxxxxxxxxxxx?subject=leave
>
>
>
>
>
>
> _______________________________________________________________________
> This mailing list is neither sponsored nor endorsed by Invensys Process
> Systems (formerly The Foxboro Company). Use the info you obtain here at
> your own risks. Read http://www.thecassandraproject.org/disclaimer.html
>
> foxboro mailing list: http://www.freelists.org/list/foxboro
> to subscribe: mailto:foxboro-request@xxxxxxxxxxxxx?subject=join
> to unsubscribe: mailto:foxboro-request@xxxxxxxxxxxxx?subject=leave
>
>
_______________________________________________________________________
This mailing list is neither sponsored nor endorsed by Invensys Process
Systems (formerly The Foxboro Company). Use the info you obtain here at
your own risks. Read http://www.thecassandraproject.org/disclaimer.html
foxboro mailing list: http://www.freelists.org/list/foxboro
to subscribe: mailto:foxboro-request@xxxxxxxxxxxxx?subject=join
to unsubscribe: mailto:foxboro-request@xxxxxxxxxxxxx?subject=leave
_______________________________________________________________________
This mailing list is neither sponsored nor endorsed by Invensys Process
Systems (formerly The Foxboro Company). Use the info you obtain here at
your own risks. Read http://www.thecassandraproject.org/disclaimer.html
foxboro mailing list: http://www.freelists.org/list/foxboro
to subscribe: mailto:foxboro-request@xxxxxxxxxxxxx?subject=join
to unsubscribe: mailto:foxboro-request@xxxxxxxxxxxxx?subject=leave
Other related posts: