Please start any new threads on our new
site at https://forums.sqlteam.com. We've got lots of great SQL Server
experts to answer whatever question you can come up with.
Author |
Topic |
vadarv
Starting Member
1 Post |
Posted - 2006-08-26 : 15:00:45
|
Hia!I'm a total amateur to VBS but need help on a VBS script. This is used in a HMI system from Siemens called WinCC, used for process viewing and control.What I need to is to write to a table in Access, then read these values and then delete records (rows) in Access.By using help functions in WinCC I have this set up:I created an Access database with the WINCC_DATA table and columns (ID,TagValue) with the ID as the Auto Value.Then I can write to Access by the following code:Dim objConnectionDim strConnectionStringDim lngValueDim strSQLDim objCommandstrConnectionString = "Provider=MSDASQL;DSN=SampleDSN;UID=;PWD=;"lngValue = HMIRuntime.Tags("Tag1").ReadstrSQL = "INSERT INTO WINCC_DATA (TagValue) VALUES (" & lngValue & ");"Set objConnection = CreateObject("ADODB.Connection")objConnection.ConnectionString = strConnectionStringobjConnection.OpenSet objCommand = CreateObject("ADODB.Command")With objCommand.ActiveConnection = objConnection.CommandText = strSQLEnd WithobjCommand.ExecuteSet objCommand = NothingobjConnection.CloseSet objConnection = NothingThis actually works fine, pure luck I guess!Can anyone help me with scripts for:1. Reading one record (row) according to a ID number2. Deleting the a record (row) according to a ID numberI would be very thankful for any help!Best regards Vadar |
|
SwePeso
Patron Saint of Lost Yaks
30421 Posts |
Posted - 2006-09-01 : 18:13:49
|
ReadingstrSQL = "SELECT * FROM WINCC_DATA WHERE TagValue = " & lngValueDeletingstrSQL = "DELETE FROM WINCC_DATA WHERE TagValue = " & lngValuePeter LarssonHelsingborg, Sweden |
 |
|
|
|
|