Collapse All Expand All Language Filter: Code: All Code: Multiple Code: Visual Basic Code: C# Code: Visual C++ Code: J# Code: JScript

EDKB12WS Reference
ModMain.Word_Werte_Auslesen Method
See Also

Assembly: EDKB12WS (in EDKB12WS.exe)

# Syntax

Visual Basic
Public Shared Function Word_Werte_Auslesen( _ ByVal xdata As DataTable _ ) As Boolean
C#
public static bool Word_Werte_Auslesen( DataTable xdata )
C++
public: static bool Word_Werte_Auslesen( DataTable^ xdata )
JScript
public static function Word_Werte_Auslesen( xdata : DataTable ) : boolean;
## Parameters xdata

# Source code

Visual Basic | Copy Code
Public Function Word_Werte_Auslesen(ByVal xdata As System.Data.DataTable) As Boolean Try Dim i As Integer Dim pos, pos2 As Integer For i = 0 To xdata.Rows.Count - 1 xdata.Rows(i).Item("used") = 0 If xdata.Rows(i).Item("beginntextmarke") <> "" And xdata.Rows(i).Item("endetextmarke") = "" Then Try docword.Bookmarks.Item(xdata.Rows(i).Item("beginntextmarke")).Select() xdata.Rows(i).Item("oldvalue") = convert(objword.Selection.Text) xdata.Rows(i).Item("used") = 1 Catch End Try If xdata.Rows(i).Item("beginntextmarke") = "TGEDKCompanyBBEB99" Then xdata.Rows(i).Item("used") = 1 End If If xdata.Rows(i).Item("beginntextmarke") <> "" And xdata.Rows(i).Item("endetextmarke") <> "" Then Try docword.Bookmarks.Item(xdata.Rows(i).Item("beginntextmarke")).Select() pos = objword.Selection.Start docword.Bookmarks.Item(xdata.Rows(i).Item("endetextmarke")).Select() pos2 = objword.Selection.Start objword.Selection.SetRange(Start:=pos, End:=pos2) xdata.Rows(i).Item("oldvalue") = convert(objword.Selection.Text) xdata.Rows(i).Item("used") = 1 Catch End Try End If Try If xdata.Rows(i).Item("feldname") <> "" Then Try xdata.Rows(i).Item("oldvalue") = convert(docword.FormFields.Item(xdata.Rows(i).Item("feldname")).Result) xdata.Rows(i).Item("used") = 1 Catch End Try End If Catch End Try Next Return True Catch ex As Exception Return False End Try End Function

# Platforms

Windows 8, Windows Server 2012, Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows XP SP2 x64 Edition, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2 The .NET Framework does not support all versions of every platform. For a list of the supported versions, see System Requirements.

# Version Information

## .NET Framework Supported in: 4.5, 4, 3.5, 3.0, 2.0, 1.1, 1.0 ## .NET Compact Framework Supported in: 3.5, 2.0, 1.0 ## XNA Framework Supported in: 3.0, 2.0, 1.0

# See Also

## Reference ModMain Class ModMain ModMain Members