---
title: "public function"
type: "forum-thread"
url: "https://www.webforum.nu/amne/dotnet/64636-public-function"
topic: ".NET"
topic_url: "https://www.webforum.nu/amne/dotnet"
author: "henrikjohansson"
published: "2003-01-13T08:12:52.000Z"
updated: "2003-01-13T10:29:55.000Z"
replies: 5
views: 247
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/dotnet/64636-public-function"
---

# public function

## #1 — henrikjohansson, 2003-01-13T08:12Z

Jag har några funktioner som skall vara med på alla sidor och för att göra detta så la jag dom i en modul där jag skrev följande 

```
Imports System.Data.OleDb
Module Modul
    Public Class Funktioner

        Shared Function CropText(ByVal sText As String, ByVal sLength As Integer) As String
            Dim iNewLength As Integer
            If Len(sText) > sLength Then
                iNewLength = InStrRev(sText, " ", sLength + 1)
                sText = Left(sText, iNewLength) & "..."
            End If
            CropText = sText
        End Function

    End Class
End Module
```

Detta fungerade bra tills jag ville ha en function som skall anropas från en .aspx fil.. i aspx.vb filen så var jag tvungen att inkludera modulen. Måste jag göra det på aspx sidan också isf hur? Testade att inkludera den precis likadant som på aspx sidan men det blir bara error..

Permalänk: https://www.webforum.nu/p/64636

## #2 — henrikjohansson, 2003-01-13T08:41Z

löste det genom att lägga funktionerna i en codefile istället

här är koden ifall någon är intresserad

```
Imports System.Data.OleDb
Namespace CodeFile

    Public Class FunktionerOchSubbar

        Shared Function CropText(ByVal sText As String, ByVal sLength As Integer) As String
            Dim iNewLength As Integer
            If Len(sText) > sLength Then
                iNewLength = InStrRev(sText, " ", sLength + 1)
                If Not iNewLength < sLength Then
                    sText = Left(sText, iNewLength) & "...<br>Läs mer"
                End If
            End If
            CropText = sText
        End Function

        Shared Sub FillObj(ByVal obj As Object, ByVal sSQL As String)
            Dim Con As OleDbConnection = New OleDbConnection(System.Configuration.ConfigurationSettings.AppSettings.Get("dbconn"))
            Dim DA As OleDbDataAdapter = New OleDbDataAdapter(sSQL, Con)
            Dim DT As New DataTable()
            DA.Fill(DT)
            Con.Close()
            obj.DataSource = DT
            obj.DataBind()
        End Sub

    End Class

End Namespace
```

och för att inkludera på .aspx.vb fil

```
Imports h2data2.CodeFile.FunktionerOchSubbar
```

och på aspx

```
<%@ Import namespace="h2data2.CodeFile.FunktionerOchSubbar" %>
```

Permalänk: https://www.webforum.nu/p/911044

## #3 — h0lger, 2003-01-13T08:41Z

Jag är inte riktigt säker på att jag förstår frågan men jag antar följande:

Du har skapat en modul i en egen dll som innehåller en klass. Du vill anropa din moduls funktioner från dina aspx-sidor.

Om detta stämmer så skall du göra följande:

\- Lägg till din dll under References genom att högerklicka på References i solution explorer och välja Add Reference.

I din kod (aspx.vb) kan du sedan skapa instanser till din modul genom t.ex.

```
Dim objFunktioner as new Modul.Funktioner

s = objFunktioner.CropText("", 2)
```

Permalänk: https://www.webforum.nu/p/911045

## #4 — henrikjohansson, 2003-01-13T08:44Z

Vad är fördelen med att lägga det i en dll?

Permalänk: https://www.webforum.nu/p/911047

## #5 — NETwork, 2003-01-13T10:28Z

> **henrikjohansson skrev:**
>
> Vad är fördelen med att lägga det i en dll?

Lätt att återanvända. Behöver du modulen i ett annat projekt så behöver du bara importera den dit. Dessutom har du koden på ett ställe vilket gör det betydligt smidigare att ändra, bygga ut, rätta buggar etc. Bland annat...

Permalänk: https://www.webforum.nu/p/911107

## #6 — henrikjohansson, 2003-01-13T10:29Z

ok.. låter som en ganska bra ide att använda sig av en dll då..

Permalänk: https://www.webforum.nu/p/911111

---

Tråden på webben: https://www.webforum.nu/amne/dotnet/64636-public-function