استفاده از ماژول برای فراخوانی توابع

[fereshte22]

با سلام و خسته نباشد به دوستان
من میخواهم از یک تابع در تمام صفحات خود استفاده کنم.میدونم که باید از ماژول استفاده کرد و تابع را فراخوانی کرد.
ولی دوتا مشکل دارم .یکی در فراخوانی تابع در صفحات و دوم اینکه ایا صفحه ای که درواقع ماژول ما است و تابع را در ان تعریف میکنیم مثل همون صفحات معمولی است.(web form) , و یا از نوع دیگری است.
و سوال دیگرم اینه که ایا میتوان از کلاس به جای ماژول استفاده کرد؟چه تفاوتی دارند؟
ممنون

 

[webdesigner2020]

هيچ فرقى بين كلاس و ماژول نيست ، نوشتن خود ماژول به كرات پيچيده تر از فراخوانى اونه .

 

[fereshte22]

سلام
از راهنمایتون ممنون هستم.
ببینید من یک کلاس با نام Class1.vb ایجاد کردم و در اون کد زیر را قرار دادم

Imports Microsoft.VisualBasic

Public Class Class1
    Public Function secure(ByVal a As String) As String
        a = Replace(a, "'", "ٰٰٰٰ ٰ")
        
        secure = a
        Return secure
    End Function
End Class

بعد در صفحات خود تابع را به صورت زیر فراخوانی کردم

 Dim cs As Class1
 cmdselect = New SqlCommand("Select * From keysearch  Where keysearch= '" & cs.secure(javab) & "'", con)

این کار را برای جلوگیری از sqlinjection انجام دادم.ولی وقتی برنامه را اجرا کردم خطای زیر را میدهد.
Object reference not set to an instance of an object.
حالا سوالم اینه کلاس را درست تعریف و استفاده کردم؟مشکلش چیه؟
در ضمن وقتی گفته میشود تابع باید در یک PublicModule قرار گیرد.منظور چیه؟ایا اون طور که شما گفتید نوشتن ماژول
برای این مورد هم سخته؟
ممنون میشوم دوستان راهنمایی کنند

 

[MDP]

سلام!

اشکال کاملا واضحه!

توی کد نویسی بیشتر دقت کنید!

[LEFT]
Dim cs As  [COLOR="Red"][SIZE="5"]NEW[/SIZE][/COLOR] Class1
 cmdselect = New SqlCommand("Select * From keysearch  Where keysearch= '" & cs.secure(javab) & "'", con)[/LEFT]

 

[fereshte22]

سلام
این سوال را به خاطر این میپرسم که خوب من تا حالا از Public Module استفاده نکردهام و میخواستم اگه خواستم یه موقع از Public Module استفاده کنم طریقه فراخوانیه تابع را بدونم.
من ماژول و تابع را به صورت زیر تعریف کردم.

Public Module test
    Public Function secure(ByVal a As String) As String
        a = Replace(a, "'", "ٰٰٰٰ ٰ")
        secure = a
        Return secure
    End Function
End Module

ایا باید این کد ها را در یک webform تعریف کنیم؟
طریقه فراخوانیه تابع در صفحات پروژه به چه صورت است؟
ممنون