Archiv der Kategorie VB.NET

Imports IBM.Data.DB2: Visual Studio Add Reference

To Work with IBM.Data.DB2  in VisualStudio use:

 Project->Add Refernce->Browse/Search->”C:\Program Files\IBM\SQLLIB\BIN\netf11\IBM.Data.DB2.dll”

Make sure you have installed the “Visual_Studio_AddIns_v9.5fp2_nt32_vsai.exe” or the “DB2 .NET Data Provider”.

You can Download it for free from IBM:

 http://www-01.ibm.com/software/data/db2/windows/dotnet.html

string.replace with DataBinder.Eval in ASP.NET

string.replace mit DataBinder.Eval in ASP.NET 

 

Um die Funktion replace im Databinder zu nutzen kann man folgende Vorgehensweise wählen: 

Ohne Replace: 

<a href=”page.aspx?id=<%#DataBinder.Eval(Container.DataItem, ” fileID “)%>“>  LINKTEXT                                                                                                                                                                             </a> 

Mit Replace: 

<a href=”page.aspx?id=<%#DataBinder.Eval(Container.DataItem, ” fileID “).replace(”textToFind”,”ReplaceWithThis”)%>“> LINKTEXT                                                                                                                                                                             </a> 

 

To use string.replace in databinder use the following example: 

Without Replace: 

<a href=”page.aspx?id=<%#DataBinder.Eval(Container.DataItem, “fileID”)%>“>  LINKTEXT                                                                                                                                                                                                                                                                                                                                                          </a> 

With Replace: 

<a href=”page.aspx?id=<%#DataBinder.Eval(Container.DataItem, ” fileID “).replace(”textToFind”,”ReplaceWithThis”)%>“> LINKTEXT                                                                                                                                                                             </a> 

 

Was that helpfull? Please link my Blog.

System.Web.HttpUtility in Win32 Anwendung

Beim Import der Klasse “System.Web.HttpUtility” in eine WIN32 Anwendung erscheint folgender Fehler:

Warning 1 Namespace or type specified in the Imports ‘System.Web.HttpUtility’ doesn’t contain any public member or cannot be found. Make sure the namespace or the type is defined and contains at least one public member. Make sure the imported element name doesn’t use any aliases. C:\Visual Studio 2005\Projects\p1\Form1.vb 4 9 p1

Lösung: Es muss im Visual Studio Projekt ein Verweis hinzugefügt werden: Menü Project / Add Reference / - Unter .Net den Eintrag “System.Web” suchen OK klicken. Fertig.

Add Reference

VB.NET: Function Wordwrap in ASP.NET

VB.NET:  Function Wordwrap in ASP.NET 

 

 

Viele kennen vielleicht die PHP-Funktion  „wordwrap“. Stand heute gibt es eine solche Funktion nicht im .NET Framework – Zumindest entzieht sich das meiner Kenntnis. 

Gerade im Bereich HTML-Layout ist es problematisch Daten aus <TEXTAREA> Feldern vernünftig zu formatieren.  

 

Grund genug eine Funktion wordwrap selbst zu bauen: 

 

 

 

Public Function wordrap(ByVal currentText As String, ByVal_ maxCharsPerLine As Integer) As String 

    Dim returnString As String = “” 

    Dim rx As New Regex(“(\S{” & maxCharsPerLine.toString & “})”,_ RegexOptions.IgnoreCase) 

    returnString = rx.Replace(currentText, “$1 “) 

     Return returnString 

End Function 

 

 

 

War diese Information hilfreich? Dann würde ich mich über eine Verlinkung freuen. 

Was this Information helpfull? I’d be very pleased if you link my page. 

ASP.NET: Dropdownlist dynamisch mit Items füllen

  

ASP.NET:  Fill Dropdownlist dynamic with Items: 

 

 

Um eine ASP Dropdownlist mit Items zu füllen benötigt man ein neues ListItem. In folgendem Beispiel wird über eine FOR NEXT Schleife iteriert und entsprechende Items hinzugefügt. 

Items oder Strings mit führenden Nullen auffüllen:Fill Items or Strings with leading zeros: 

Um eine einheitliche Formatierung zu gewährleisten fülle ich einstellige Werte mit führenden Nullen auf. Dies geschieht mit der Funktion „“PadLeft()“ des String-Objekts. 

Im Beispiel verwende ich den Literalausdruck “0″c – Alternativ könnte man auch die chr(0) Funktion verwenden. 

 

Option Explicit On 

Option Strict On 

 

Imports microsoft.visualbasic 

Imports System.Web.UI.WebControls 

 

Dim i As Integer = 0 

Dim ddlDs As New System.Web.UI.WebControls.DropDownList 

Dim lItem As New System.Web.UI.WebControls.ListItem 

 

 

For i = 0 To 20 

 ddlDs.Items.Add(New ListItem(i.ToString.PadLeft(2, “0″c), i.ToString))

  

Next 

 

VB.NET: Problem mit Konstanten in Strukturen

Problem with Constants in Structure 

 

Folgende Struktur ist gegeben: 

 

 

    Public Structure pagingStructure1 

        Public Const itemsPerPage As Integer = 100 

        Public totalItems As Integer 

        Public currentPage As Integer 

        Public totalPageCount As Integer 

    End Structure 

 

 

 

Im Hauptprogramm verursacht die ROT markierte Zeile einen Fehler:(Access of shared member, constant member, enum member or nested type through an instance; qualifying expression will not be evaluated) 

 

 

Public Shared Function getPagingObject()As pagingStructure1 

 

        Dim oSqlCommand As New SqlCommand(sqlStr) 

        oSqlCommand.Connection = getConnection() 

 

        Dim ps As pagingStructure1 

        ps.totalItems = CInt(oSqlCommand.ExecuteScalar()) 

 

        ps.totalPageCount = ps.totalItems \ ps.itemsPerPage 

 

        oSqlCommand.Connection.Close() 

        oSqlCommand.Connection.Dispose() 

 

        Return ps 

    End Function 

 

 

Wenn man allerdings über den namespace auf die Kostante zugreift, geht es: 

 

      ps.totalPageCount = ps.totalItems \ mdt.pagingStructure1.itemsPerPage 

 

 

Da ich das aber stilistisch nicht so gut finde, habe ich in der Deklaration eine ReadOnly-Property eingebaut: 

 

    Public Structure pagingStructure1 

        ‘Public Const itemsPerPage As Integer = 100 

        Public totalItems As Integer 

        Public currentPage As Integer 

        Public totalPageCount As Integer 

 

        Friend ReadOnly Property itemsPerPage() As Integer 

            Get 

                Return 100 

            End Get 

        End Property 

    End Structure 

 

 

 

 

Damit funktioniert jetzt auch der direkte Zugriff (oben ROT markiert)  

 

Eine Erklärung dafür habe ich nicht, in einem MS-Forum habe ich gelesen das es ein VS 2005 Bug sein soll, kann das zum jetzigen Zeitpunkt weder bestätigen, noch dementieren.  Wäre gut wenn jemand hierzu eine Referenz oder eine Erklärung posten könnte. 

 

|