我所有的测试在 Nunit 中都被忽略
我写了一个 HomePageClass
Imports System
Imports System.Collections.Generic
Imports System.Text.RegularExpressions
Imports System.Text
Imports WatiN.Core
Namespace TestDesign
Public Class HomePage
Inherits IE
Public Const HomePageURL As String = "test"
Public Sub New()
MyBase.New(HomePageURL)
End Sub
Public Sub New(ByVal instance As IE)
MyBase.New(instance.InternetExplorer)
End Sub
Public ReadOnly Property UserIDField() As TextField
Get
Return TextField(Find.ById(New Regex("txtuserName")))
End Get
End Property
Public ReadOnly Property PasswordField() As TextField
Get
Return TextField(Find.ById(New Regex("txtPassword")))
End Get
End Property
Public ReadOnly Property ContinueButton() As Button
Get
Return Button(Find.ById(New Regex("Submit")))
End Get
End Property
Public ReadOnly Property UserRegistrationLink() As Link
Get
Return Link(Find.ByUrl("userregistration.aspx"))
End Get
End Property
Friend Sub Login(ByVal username As String, ByVal password As String)
UserIDField.TypeText(username)
PasswordField.TypeText(password)
ContinueButton.Click()
End Sub
'Friend Function GoToUserRegistration() As UserRegistrationPage
' UserRegistrationLink.Click()
' Return New UserRegistrationPage(Me)
'End Function
End Class
End Namespace
和一个 HomePagetestsClass
Imports System.Threading
Imports NUnit.Framework
Namespace TestDesign
<TestFixture()>_
Class HomePageTests
<Test()> _
Public Sub GoToHomePageTest()
Dim home As New HomePage()
Assert.IsTrue(home.ContainsText("Welcome"))
home.Close()
End Sub
<Test()> _
Public Sub Login()
Dim home As New HomePage()
home.Login("abc", "def")
Assert.IsTrue(home.ContainsText("Welcome"))
home.Close()
End Sub
End Class
任何人都可以告诉我,我哪里出错了。 只是试图实现一个通用的测试模式。
I have written a HomePageClass
Imports System
Imports System.Collections.Generic
Imports System.Text.RegularExpressions
Imports System.Text
Imports WatiN.Core
Namespace TestDesign
Public Class HomePage
Inherits IE
Public Const HomePageURL As String = "test"
Public Sub New()
MyBase.New(HomePageURL)
End Sub
Public Sub New(ByVal instance As IE)
MyBase.New(instance.InternetExplorer)
End Sub
Public ReadOnly Property UserIDField() As TextField
Get
Return TextField(Find.ById(New Regex("txtuserName")))
End Get
End Property
Public ReadOnly Property PasswordField() As TextField
Get
Return TextField(Find.ById(New Regex("txtPassword")))
End Get
End Property
Public ReadOnly Property ContinueButton() As Button
Get
Return Button(Find.ById(New Regex("Submit")))
End Get
End Property
Public ReadOnly Property UserRegistrationLink() As Link
Get
Return Link(Find.ByUrl("userregistration.aspx"))
End Get
End Property
Friend Sub Login(ByVal username As String, ByVal password As String)
UserIDField.TypeText(username)
PasswordField.TypeText(password)
ContinueButton.Click()
End Sub
'Friend Function GoToUserRegistration() As UserRegistrationPage
' UserRegistrationLink.Click()
' Return New UserRegistrationPage(Me)
'End Function
End Class
End Namespace
And a HomePagetestsClass
Imports System.Threading
Imports NUnit.Framework
Namespace TestDesign
<TestFixture()>_
Class HomePageTests
<Test()> _
Public Sub GoToHomePageTest()
Dim home As New HomePage()
Assert.IsTrue(home.ContainsText("Welcome"))
home.Close()
End Sub
<Test()> _
Public Sub Login()
Dim home As New HomePage()
home.Login("abc", "def")
Assert.IsTrue(home.ContainsText("Welcome"))
home.Close()
End Sub
End Class
Can anyone plz tell, where I am getting wrong. Just trying to implement a generalised Test Pattern.
如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。
绑定邮箱获取回复消息
由于您还没有绑定你的真实邮箱,如果其他用户或者作者回复了您的评论,将不能在第一时间通知您!
发布评论
评论(1)
您的测试被忽略的原因是所有 TestFixture 类都必须是公共的。 如果您没有具体声明可见性级别,则 .NET 假定您的类应该仅在程序集中可见(Friend 又名 C# 中的 Internal)。 由于 NUnit GUI 不是程序集的一部分,因此它无法创建 TestFixture。 只需将行:更改
为:
即可。
The reason your tests are being ignored is that all TestFixture classes must be public. If you do not specifically state a level of visibility, then .NET assumes your class should only be visible within your assembly (Friend aka Internal in C#). Since the NUnit GUI is not part of your assembly, it cannot create your TestFixture. Simple change the line:
to:
and you'll be good to go.