I have run / debug my application and it is not giving me any errors. The moment i tried to create a setup and deployment i start getting problems. The setup file is created and when i install it, it does what it is supposed to do. BUT.. when i run it , it says Exeption was thrown in Mymodule.vb.
I have the module here, and it looks fine. Can anybody tell me what is going on.
Is there anybody to whom i can send ALL of my code, to help me, yust with the compiling.. This is a project for College i am working on, and my time is running out. PLEASE HELP...!!!
Here is the mymodule code..
Public Module MyModule
Dim Rs_AppPath As String = System.IO.Directory.GetCurrentDirectory
Public testname1, testname2, testname3, testname4, testname5, testname6, testname7, testname8, testname9, testname10 As String
Public AmountTests As Integer
Public str As String = "Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=" & Application.StartupPath.Substring(0, Application.StartupPath.LastIndexOf("bin")) & "libra.mdb;Mode=Share Deny None;Extended Properties=;Jet OLEDB:System database=;Jet OLEDB:Registry Path=;Jet OLEDB:Engine Type=5;Jet OLEDB:Database Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=False;Jet OLEDB:Don't Copy Locale on Compact=False;Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False"
Public currentstudent As String
Public lecturerdays1, lecturerdays2, lecturerdays3, lecturerdays4 As Integer
End Module