WinCC webseite öffnen und Anmelden

G

GoodOld

Level-1
Beiträge
51
Reaktionspunkte
0
Zuviel Werbung?
-> Hier kostenlos registrieren
Hi,
ich wollte in ein WinCC projekt eine Webseite einbinden, das habe ich soweit auch hinbekommen.
jetzt würde ich gerne das sich WinCC automatisch mit Benutzername + Passwort anmeldet und dann einen Bestimmt Link auswählt.
Habe mir mal vor ewigkeiten in Visual Basic ein Programm geschrieben das sowas macht indem indem ist den "Quellcode" der Seite ausgelesen/ausgefüllt habe, aber wie kann ich das in WinCC übertragen/machen.
Habe absolut keinen ansatz.


Code: 
Imports Excel = Microsoft.Office.Interop.Excel
Imports Microsoft.Office.Core
Imports System.Runtime.InteropServices
 
 
 
Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Me.Text = "Working..."
        Button1.Enabled = False
        Me.Cursor = Cursors.WaitCursor
        WebBrowser1.Navigate("C:\Users\xxxx\Desktop\xxxxxx.htm")
        'WebBrowser1.Navigate("http://xxxxxxx/xxxxx/")
 
        If TextBox3.Text = "" Then
            TextBox3.Text = Format(Today, "dd.MM.yyyy*")
        Else
        End If
 
        Application.DoEvents()
 
        Do While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete
            Application.DoEvents()
 
        Loop
 
        WebBrowser1.Refresh()
 
 
        Me.Text = "Seite wurde geladen"
 
        Button1.Enabled = True
        Me.Cursor = Cursors.Arrow
 
        'System.Threading.Thread.Sleep(1000)
        WebBrowser1.Document.GetElementById("txtName").InnerText = "abcd"
        WebBrowser1.Document.GetElementById("pwdPasswort").InnerText = "efgh"
 
        Dim elem As HtmlElement
        For Each elem In WebBrowser1.Document.All
            If (elem.GetAttribute("value") = "Anmelden") Then
                elem.InvokeMember("click")
            End If
        Next
        Me.Text = "Working..."
        ' Button4.Enabled = False
        Me.Cursor = Cursors.WaitCursor
        System.Threading.Thread.Sleep(2000)
        'WebBrowser1.Navigate("http://xxxxxx/xxxxx/xxxxxx")
so sah der code damals aus


Gruß
Eddy
 
Wie kann nach dem Hochlauf ein Standardbenutzer automatisch angemeldet werden, ohne die Login Box zu verwenden?
Siemens Industry Online Support - Automation Service, Automation Support, Simatic Service, Simatic Support, Technical Support, Technical Consulting

Wenn du dann den Passwortlevel abfragst, kannst du abhängig davon eine Aktion ausführen, z.B. deine Website starten

Wie kann per Script abgefragt werden, ob der eingeloggte Benutzer für eine bestimmte Berechtigungsstufe die Freigabe hat?
Siemens Industry Online Support - Automation Service, Automation Support, Simatic Service, Simatic Support, Technical Support, Technical Consulting
 
Zurück
Oben