Hi!

I have looked everywhere in net but none solved my issue. I have a project that was created in VB6+sql server 2000. I am trying to migrate it to VB.NET.
The project is made up of3 sub projects. data access layer, business layer and presentation layer. I successfully migrated both DAL and BOL using VBupgrade.exe but when I tried to upgrade PL it complainted and said ensure it complies. originally i have vs installed in 2005 and not vb6. just to ensure that the project compiles fine I installed vb6.at times I also get error which is mentioned as in http://www.eggheadcafe.com/forumarchives/VisualBasiccom/Jan2006/post26072868.aspso I thought I should start from beginning and I opened all 3 vb6 project in vb6 environment. set the compatibily to project only and tried to compile first DAL, and then BL regenerated dll for each and when I tried to generate for PL it says access denied to overwrite existing DLL. i couldnt figure out why. now when I simply do "start with full compile in PL" I get error "Compile Error: Error loading DLL" which hits inclass moduleas below
-----------------------------------------------------------------------------
'local variable(s) to hold property value(s)
Option Explicit

Public Function FGetErrAction(Response As Response, lngErrNo As Long, strErrSrc As String, strErrDsc As String) <--here error isthrown

Dim strReturnAction As String

On Error GoTo FGetErrAction_Error

strReturnAction = FDBFunctions(lngErrNo, strErrSrc, strErrDsc)

'Response.Clear

Response.Write strReturnAction

FGetErrAction_Exit:
Exit Function

FGetErrAction_Error:

Call FLogEvent(Err.Number, Err.Source, Err.Description)

Response.Write conErrErr1

End Function
------------------------------------------------------------------
I have already spend more than 3 days not sure whats wrong.

could anyone help me please? I have tried searching for reference offunction FGetErrAction but I cant see any reference. when i delete everything from this module the error hits at .bas module as below
Private Sub SOpenConnection(ByRef adoconErrors As ADODB.Connection, ByRef adoconErrLog As ADODB.Connection)
'
'Descr: Opens and returns ADO Errors and ErrLog database connection's
'
'Inputs:
'adoconErrors - ADO connection
'adoconErrLog - ADO connection
'
'process: Opens ADO connection's

Dim strConn As String
Dim strUsID As String
Dim strPass As String
Dim strDSN As String

On Error GoTo SOpenConnection_Error

Set adoconErrors = CreateObject("ADODB.connection")

adoconErrors.open conErrorsFileDsn, conErrUserId, conErrUserPwd

Set adoconErrLog = CreateObject("ADODB.connection")

adoconErrLog.open conErrLogFileDsn, conErrUserId, conErrUserPwd

Exit Sub

SOpenConnection_Error:

Err.Raise Err.Number, Err.Source, Err.Description

End Sub

I think its something to do with ADODB.connection but what should I do about it?

could any one please help?

OK, I didn't realize the error was occurring in the VB 6.0 environment.

Did you check your project References to see if any of the libraries are listed as "missing"?

Let's back up a bit. First, can you compile the application (and COM components) in Visual Basic 6.0 w/o any problems? Does the resulting executable run w/o any errors?

I can compile both BOL.dll and DAL.dll except presentationlayer.dll. this is where my whole problem lies

thankyou. its a web application that i am trying to compile.

after following the article above. I installed service pack 6.0. I managed to successfully compile and create DLL. now when I run the project I get warning

"The MTSTransactionMode property for one or more classes in this project has been set to indicate that the class
should be run under MTS. To debug an MTS class, you must make the project into a DLL. IT is strongly recommended that
you set the Project Properties, Version Compatibility open to Binary Compatibility using that DLL and then register the
DLL with MTS. If you wish to continue anyway, select 'Yes'", I ignored the error. ran the service called Distributed transaction cordinator and it opens up

http://localhost/VSPresentationLayer/VaultSystem.ASP with error below Error Type:
Server object, ASP 0178 (0x800A0005)
The call to Server.CreateObject failed while checking permissions. Access is denied to this object.
/VSPresentationLayer/VaultSystem.ASP, line 14

Browser Type:
Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; .NET CLR 2.0.50727)

Page:
GET /VSPresentationLayer/VaultSystem.ASP
----
this article gave bit of hunch but I failed to find "VB ASP debugging" as I am using XP
http://support.microsoft.com/kb/259725/EN-US/

could you please point me as to how i could fix this issue? also when i expand DCom config it was asking me to register lots of things with {C00998} not sure what that meant but I think its registering COM component.

thankyou

I am using win XP so that link is not really helpful. below are the codes that are in ASP page

<%
Server.ScriptTimeout=600
Response.Buffer=True
Response.Expires=0

If (VarType(Application("~WC~WebClassManager")) = 0) Then
Application.Lock
If (VarType(Application("~WC~WebClassManager")) = 0) Then
Set Application("~WC~WebClassManager") = Server.CreateObject("WebClassRuntime.WebClassManager")
End If
Application.UnLock
End If

This is where error is->>>>Application("~WC~WebClassManager").ProcessNoStateWebClass "VSPresentationLayer.VaultSystem", _
Server, _
Application, _
Session, _
Request, _
Response
%>

thankyou

The error for that line of codeis indicating that an instance of your Web Class cannot be created. I would suspect that it's either not registered or that there is a security issue of some type. Check the following MS KB article:

PRB: Server Object Error 'ASP 0178 : 800a0005' From WebClasses

At the moment you're not using .NET (it's Classic ASP and VB 6.0)so the Framework version isn't an issue. As far as converting the application is concerned, I would do some Googling with respect to converting a WebClass to an ASP.NET Web Form app.

Migrating to Web Forms

that didnt help too. I followed the instruction from article http://support.microsoft.com/kb/259725/EN-US/but still same error.

Btw, when i run the project by hitting F5, I below screen appears and I click yes.

Binary Compatibility has not been set for the project 'VSPresentationLayer'.

The MTSTransactionMode property for one or more classes in this project has been set to indicate that the class
should be run under MTS. To debug an MTS class, you must make the project into a DLL. It is strongly recommended that you
set the Project Properties, Version Compatibility option to Binary Compatibility using that DLL, and then register
the DLL with MTS. If you wish to continue anyway, select 'Yes'

I dont know may be it has something to do with this one too?
thankyou

Hi, thankyou. after following this article I managed to fix few error shown in eventvwr http://geekswithblogs.net/mhamilton/archive/2006/12/19/101568.aspxthe initial error was iusr_computername and iwam_computername need to have some permission to machine debug manager. after giving permission I get another error that says.
The machine-default permission settings do not grant Local Activation permission for the COM Server application with CLSID

{DEB00F6B-CA04-473A-B29E-AA3F25EF07B5}

to the user SHRESTHA\IUSR_SHRESTHA SID (S-1-5-21-823518204-1078081533-839522115-1004). This security permission can be modified using the Component Services administrative tool.

upon searching for string "DEB00F6B-CA04-473A-B29E-AA3F25EF07B5" in regedit It shows application name 'VSPresentationLayer.VaultSystem'. Now I am guessing I need to register this dll in registry and give permssion to iuser_machine name? I did register the dll but i canfind in dcom folder as {DEB00F6B-CA04-473A-B29E-AA3F25EF07B5}. I have given launch and activation permission to internet guest account but seems to disappear.I have also giving full access to root directory of web folder to iusr_computername.
thankyou

this is the error in eventvwr

Event Type:Error
Event Source:WebClassRuntime
Event Category:None
Event ID:1
Date:6/1/2009
Time:10:25:58 PM
User:N/A
Computer:SHRESTHA
Description:
The WebClass runtime trapped the following error

Source: VaultSystem
Thread ID: 4268
Description: An unspecified error has occurred

For more information, see Help and Support Center at http://go.microsoft.com/fwlink/events.asp.

please help. thankyou

HTTP 500.100 - Internal Server Error - ASP error
Internet Information Services

Technical Information (for support personnel)

• Error Type:
  WebClass Runtime (0x800A801D)
  An unspecified error has occurred
  /VSPresentationLayer/VaultSystem.ASP, line 14
  

• Browser Type:
  Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; .NET CLR 2.0.50727)

• Page:
  GET /VSPresentationLayer/VaultSystem.ASP

• Time:
  Tuesday, June 02, 2009, 11:51:51 PM

• More information:
  Microsoft Support

Hi Paul, do you mean I create a VB 6.0 windows form and try to initialize one of the classes and compile the project? not sure if thats what you meant? If I could initialize, does it means there is no problem running webclass? could you please point me or show an example how could i initialise? I have all the classes and bas files so If I have a class called

Car.cls in my new form I do

Car c = new Car();
c.getWheels();

is this what you mean?

thankyou

Ok I just tried this link http://www.avdf.com/oct98/art_id003.htmland not sure If I came up with codes correctly as I am having problem creating dll. below are the codes

Option Explicit
Option Compare Text

Private Sub WebClass_Start()

Set WebClass.NextItem = WebClass.ServerVars

End Sub
Private Sub ServerVars_Respond()
ServerVars.WriteTemplate
End Sub

Private Sub ServerVars_ProcessTag()
Dim name As Variant

Select Case TagName
Case "WC@ServerVars"
TagContents = "<TABLE BORDER=1>"
TagContents = TagContents & "<TR><TD><b>Server Variables:</b></TD>"
TagContents = TagContents & "<TD><b>Value</b></TD></TR>"
For Each name In Request.ServerVariables
TagContents = TagContents & "<TR><TD>" & name & "</TD>"
TagContents = TagContents & "<TD>" & Request.ServerVariables(name)
TagContents = TagContents & "</TD></TR>"
Next
TagContents = TagContents & "</TABLE>"
Case Else
'no other tags
TagContents = "No tags found"
End Select

End Sub


It also gives same error. thankyou. I am thinking if this works then components in com+ should be fine.

Thanks Paul, I am still getting same error. I am using IIS 6.0. I have already created a application in Com+ called vault, so when i try to add VSBusinessLogicLayer and VSDataAccessLayer it says components already registered. below are the steps that I took to add. browse to COM+
create new application> create empty application>gave name "Vault" and activation type to server application> select account to MSHOME/shrestha(my windows login). inside the application added those components in same way. I can see Vault applicaiton running with X marking moving.

when i click on any of the asp page it doesnt work. it takes me to blank screen. I can see application running. does the components should be running too? pages I have tried are

http://localhost/vs/VaultSystem.asp?form=f01006
http://localhost/vs/VaultSystem.asp?form=f01003&WhereFrom=extlogon

how do I debug the presentation layer?

thankyou

thankyou. I tried to open the lot.vbg project. added a debug when the web page loads it says unspecified error. I unregistered VSPresentationLayer.dll and re-registered it and i could get to the home page screen but upon clicking the login button i couldnt step through to the code. it just goes to the blank screen. when i stop and start the application it again says unspecified error and i had to unregister and re-register the dll not sure what is causing this. could you please provide me step from the begging. that includes adding the com+ component. thankyou. Is there anything I am doing wrong in my end?

one more thing when I hit F5 and type login details in the home page of the browser i can see the application 'vs' start running but it takes me to blank screen could you please help me why its doing this? thankyou

Try recreating the virtual folder using the following steps:

Run the IIS applet and delete any web application named VSPresentationLayer.
Stop and start the IIS service from the Web Class Designer in Visual Basic.
Click the Start button in Visual Basic to run the Web Class app, it should prompt you to create a new virtual root called VSPresentationLayer. Click OK.
Next, you should see a white page with the (Access Denied) CreateObject error in the web browser. Stop the application in Visual Basic and close the web browser.
Run the IIS applet and disable Anonymous authentication for the (recreated) VSPresentationLayer app.
Go back to Visual Basic and stop and re-start the IIS service from the Web Class Designer.
Set a debug breakpoint in the code that I mentioned before (f00002 Function).
Click on the Start button (or F5) in Visual Basic. The web app should display in the web browser.
Enter a user ID and password and click on the Logon button.
Now look in Visual Basic to see if execution has stopped at the breakpoint you set in the f00002 Function.

hi!

I get below error instead of access denied. Please note after disabling anonymous access and running the project just the way you mentioned also produces below error. This is the root of the problem.
--------------
The page cannot be displayed
There is a problem with the page you are trying to reach and it cannot be displayed.

--------------------------------------------------------------------------------

Please try the following:

Click the Refresh button, or try again later.

Open the localhost home page, and then look for links to the information you want.
HTTP 500.100 - Internal Server Error - ASP error
Internet Information Services

--------------------------------------------------------------------------------

Technical Information (for support personnel)

Error Type:
WebClass Runtime (0x800A801D)
An unspecified error has occurred
/VSPresentationLayer/VaultSystem.ASP, line 14

Browser Type:
Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; .NET CLR 2.0.50727)

Page:
GET /VSPresentationLayer/VaultSystem.ASP

Time:
Tuesday, June 16, 2009, 5:36:34 PM

More information:
Microsoft Support

-------------

I checked the eventvwr and it has error

----
source: webclassruntime

The WebClass runtime trapped the following error

Source: VaultSystem

Thread ID: 3104

Description: An unspecified error has occurred

For more information, see Help and Support Center at http://go.microsoft.com/fwlink/events.asp.

----

I really dont know whay its happening?
please help. thankyou

HTTP 500.100 - Internal Server Error - ASP error
Internet Information Services

Technical Information (for support personnel)

• Error Type:
  WebClass Runtime (0x800A801D)
  An unspecified error has occurred
  /VSPresentationLayer/VaultSystem.ASP, line 14
  
  could you please tell me what are the steps i should follow so i could get an exact error details. thankyou very much