Navigation

WinCC Database approach

Created by: Filo at: 7/4/2006 10:32 AM (19 Replies)

Rating (2)

Thanks 1

Result pages:: |; 1 | 2; |

20 Entries

Entries per page: 10 | all

7/14/2006 9:09 AM

Rate (0)

Filo

Posts: 54

Rating:

(2)

A few questions about this code if you don't mind

[code]
Private Sub Workbook_Open()
Const NMAX = 100
Dim sPro As String
Dim sDsn As String
Dim sSer As String
Dim sCon As String
Dim sSql As String
Dim conn As Object
Dim oRs As Object
Dim oCom As Object
Dim m, n, s, nRec
Dim strDateTime As String
Dim iMS As Long

'1.1 Make connection string for ADODB
sPro = "Provider=WinCCOLEDBProvider.1;"
sDsn = "Catalog=CC_Monitori_06_07_06_11_05_37R;" ' CC_ExternalBrowsing
sSer = "Data Source=.\WinCC"
sCon = sPro + sDsn + sSer

' 1.2 Define command text in sSql (relative time)
sSql = "TAG:R,'5s_values\CO_n','2006-07-13 08:10:00.000','2006-07-14 09:00:00.000'"
MsgBox "Open with:" & vbCr & sCon & vbCr & sSql & vbCr

' 2.1 Make connection
Set conn = CreateObject("ADODB.Connection")
conn.ConnectionString = sCon
conn.CursorLocation = 3
conn.Open

' 2.2 Use command text for query
Set oRs = CreateObject("ADODB.Recordset")
Set oCom = CreateObject("ADODB.Command")
oCom.CommandType = 1
Set oCom.ActiveConnection = conn

oCom.CommandText = sSql

' 2.3 Fill the recordset
Set oRs = oCom.Execute
m = oRs.Fields.Count
n = 0

oRs.MoveFirst

Do While (Not oRs.EOF)
n = n + 1
ActiveSheet.Cells(n, 1) = oRs.Fields(2).Value
ActiveSheet.Cells(n, 2) = oRs.Fields(1).Value
oRs.MoveNext
Loop
End Sub
[/code]

My first question is. when I try to connect with CC_ExternalBrowsing it is not workign.

My second question is. I tun this query at 10:00 the time for the query is 2006-07-13 08:10:00.000','2006-07-14 09:00:00.000' but it reads only from 13.7.2006 08:10 to 14.7.2006 06:57. Maybe there is a limit of the point I can read.

I've hoticed that the last 3 hours are missing from the query
10x

Last edited by: Filo at: 7/14/2006 9:29 AM

7/14/2006 12:19 PM	Rate (0)
Ikkezelf Posts: 1084 Rating: (72)	Hi, Please note that the time of the SQL Server is in UTC time, and could therfore be different then the local time set on your pc ! with regards, Ikkezelf
Ikkezelf Posts: 1084 Rating: (72)
Suggestion To thank Quote Answer

7/14/2006 12:48 PM	Rate (0)
Filo Posts: 54 Rating: (2)	Yes you are right. I didn't cathc that because I've used statical data. Many thanks.
Filo Posts: 54 Rating: (2)
Suggestion To thank Quote Answer

7/20/2006 6:16 PM	Rate (0)
Filo Posts: 54 Rating: (2)	Any idea why I didn't succeded connecting with CC_ExternalBrowsing ?
Filo Posts: 54 Rating: (2)
Suggestion To thank Quote Answer

7/21/2006 9:18 AM	Rate (0)
Salma Gold Member Joined: 9/27/2005 Last visit: 11/27/2007 Posts: 1398 Rating: (151)	Open Start -> Programs -> Microsoft SQL Server -> Enterprise Manager. Expand the tree to see your server and the databases in it. Can you see a CC_ExternalBrowsing database ?

Suggestion To thank Quote Answer

7/21/2006 10:45 AM	Rate (0)
Filo Posts: 54 Rating: (2)	Salma, no there is no CC_ExternalBrowsing database.
Filo Posts: 54 Rating: (2)
Suggestion To thank Quote Answer

7/21/2006 10:49 AM	Rate (0)
Salma Gold Member Joined: 9/27/2005 Last visit: 11/27/2007 Posts: 1398 Rating: (151)	That would explain why it does not work [:D] You only get this database when you install the Connectivity Pack Server. You could try installing (or reinstalling if it is already there).

Suggestion To thank Quote Answer

7/21/2006 10:56 AM	Rate (0)
Filo Posts: 54 Rating: (2)	Yes it does. I've installed the connectivity pack client. As I've read in the help it is enough for reading the databases. Is the price different for client / server ? 10x once again
Filo Posts: 54 Rating: (2)
Suggestion To thank Quote Answer

7/21/2006 11:02 AM	Rate (0)
Salma Gold Member Joined: 9/27/2005 Last visit: 11/27/2007 Posts: 1398 Rating: (151)	Hi It is the same license for the server and the clients [:D] You install the Connectivity Pack Server and the license on the WinCC machine. You can then install the Connectivity Pack client on any remote computers that need it. You do not need to install a Connectivity Pack license on these remote computers. Salma

Suggestion To thank Quote Answer

7/21/2006 11:49 AM	Rate (0)
Filo Posts: 54 Rating: (2)	Oh I've missed that. Thank you
Filo Posts: 54 Rating: (2)
Suggestion To thank Quote Answer

Share this page:

Share this page on...

Created by: Filo at: 7/4/2006 10:32 AM (19 Replies)

Rating (2) Thanks 1

20 Entries

Entries per page: 10 | all

Last edited by: Filo at: 7/14/2006 9:29 AM

20 Entries

Entries per page: 10 | all

All about SIMATIC WinCC

Follow us on

Rating (2)

Thanks 1