varchar(20), you are lucky... somebody who's name i will not mention, there it's my only "programming" colleague, is coming from VB6 and now in .Net all data types are still variant(in her head). Adding numbers to strings is standard... Type Casting? What is that? Turning on option strict results in hundreds of errors , in one project with one source file, of 3000 lines... and tables, don't ask ... today my heart stopped a moment with this... CREATE TABLE `tkolkinfo` ( `tkolkIK` int(11) NOT NULL auto_increment, `tKolkClientId` varchar(100) NOT NULL default '', `tKolkTimestampBerichtOpmaak` varchar(100) NOT NULL default '', `tKolkTimestampDateKolkDone` varchar(100) NOT NULL default '', `tKolkTimestampHourKolkDone` varchar(100) NOT NULL default '', `tKolkTimestampDateTimeKolkDone` varchar(100) NOT NULL default '', But at least in the company where i work next to .Net there is windev, helping me to forget all the IT horror and dream away on a beach with a beautifull girl: http://www.pcsoft-windev-webdev.com/WD14brochure.pdf[^] (this was sarcasm for the ones who didn't notice...)

It feels good to learn and achieve

modified on Monday, August 24, 2009 10:47 PM

And remind him he was drinking poison...

It feels good to learn and achieve

Very nice, But i have visual studio 2003, :laugh: I always liked the elegance of recursion... I never understood why i learned this technique on fobenuca and not on directories,... That was the point i wanted to make . X|

It feels good to learn and achieve

I wonder, if recursion = spogitta then how do you enumerate directories?

It feels good to learn and achieve

14 more to go, i hope i'll make it... :~

It feels good to learn and achieve

Looks like VB is scoring better,...

Dim codes() As String = New String(){"bad", "good"}
Dim rating As Integer = (Array.IndexOf(codes, "bad") + 1) * 5

It feels good to learn and achieve

To be a little more specific, it is not a HttpApplication but a Windows Forms Application calling the web service. Maybe i better posted it in another message board. But because i am not sure the problem resides on the Client side, and it's includes ASP.NET, i posted it here.

It feels good to learn and achieve

Hy, thanks but i'm afraid it's not... I guess the problem resides on the client side(SOAP Client) and not on the server. I use a BasicHttpBinding class and need to set the property "AllowCookies" to true for the client to remember the session id. Now when i want to share that session/cookie between 2 SOAP Clients, they call a different "WebService Class" in the same "WebService Project" (ASP.NET VS2008). I still did not figure out how to do this, so i made a "work around"... Not so clean but now the PHB is happy... I posted this problem earlier (VS2008 SOAP Client - losing Session problem[^]).

It feels good to learn and achieve

How to share a session between 2 soap clients? The soap clients are generated by VS2008 in a VB.Net Windows Froms project by making a reference. The 2 clients make requests to the same "Project" but different "WebService" classes. I don't find a way to add a cookie container or sortlike to share the session. Dim service1 As New ServiceReference1.Service1SoapClient(bhp, New ServiceModel.EndpointAddress("http://localhost/TheWebService/Service1.asmx")) Dim service2 As New ServiceReference2.Service2SoapClient(bhp, New ServiceModel.EndpointAddress("http://localhost/TheWebService/Service2.asmx"))

It feels good to learn and achieve

hy, i made a Web Service project in visual studio 2008. then added 2 "Web Service" files to the project. Service1.asmx

Imports System.Web.Services
Imports System.Web.Services.Protocols
Imports System.ComponentModel

' To allow this Web Service to be called from script, using ASP.NET AJAX, uncomment the following line.
' <system.web.script.services.scriptservice()> _
<system.web.services.webservice(namespace:="http://tempuri.org/")> _
<system.web.services.webservicebinding(conformsto:=WsiProfiles.BasicProfile1_1)> _
<toolboxitem(false)> _
Public Class Service1
Inherits System.Web.Services.WebService

<webmethod(true)> \_
Public Function HelloWorld() As String
    Session("foo") = "bar"
    Return "Hello World"
End Function

End Class

Service2.asmx

Imports System.Web.Services
Imports System.Web.Services.Protocols
Imports System.ComponentModel

' To allow this Web Service to be called from script, using ASP.NET AJAX, uncomment the following line.
' <system.web.script.services.scriptservice()> _
<system.web.services.webservice(namespace:="http://tempuri.org/")> _
<system.web.services.webservicebinding(conformsto:=WsiProfiles.BasicProfile1_1)> _
<toolboxitem(false)> _
Public Class Service2
Inherits System.Web.Services.WebService

<webmethod(true)> \_
Public Function HelloWorld() As String
    If Session("foo") <> "bar" Then
        Throw New UnauthorizedAccessException
    End If
    Return "Hello World"
End Function

End Class

After i made a windows application, where i made a "Service Reference" to both web service classes/files. The problem is that Service1.asmx doesn't share it's session with Service2.asmx,... I get the thrown "UnauthorizedAccessException" on calling "Service2.HelloWorld()" because the session is not created in Service2.asmx after calling Service2...

Public Class Form1

Private Sub Form1\_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim bhp As New System.ServiceModel.BasicHttpBinding
bhp.AllowCookies = True

    Dim x As New ServiceReference1.Service1SoapClient(bhp, New ServiceModel.EndpointAddress("http://localhost/ImsBrowserWebService/Service1.asmx"))
    Dim y As New ServiceReference2.Service2SoapClient(bhp, New ServiceModel.EndpointAddress("http://localhost/ImsBrowserWebService/Service2.asmx"))
    MsgBox(x

In visual studio 2008 if you use the "application framework" you can choose the "shutdown mode" in the project properties. (maybe in older versions of visual studio too, i did not check it) Project -> Properties -> Application -> Shutdown mode If you want to write a statement that closes your application you can use

System.Windows.Forms.Application.Exit()

I think the "End" keyword still works too in a VB.Net application

It feels good to learn and achieve

You can make a reference to the object... If not then you can use "Late Binding",...

Type type = Type.GetTypeFromProgID("WScript.Shell");
Object oShell = Activator.CreateInstance(type);
Object[] oArgs = {"notepad.exe"};
type.InvokeMember("Run", System.Reflection.BindingFlags.InvokeMethod, Type.DefaultBinder, oShell, oArgs);

I'm not home in C#, but in VB.Net with "Option Strict Off" you can also just write

Dim type As Type = Type.GetTypeFromProgID("WScript.Shell")
Dim oShell As Object = Activator.CreateInstance(type)
oShell.Run "notepad.exe"

GTH

It feels good to learn and achieve

modified on Thursday, April 9, 2009 5:58 PM

Now i'm confused :laugh: ;)

I had the same problem importing msado15.dll, a solution was found on some Chinese forum[^], adding rename("EOF", "adoEOF") on the end of the import statement line for example,

#import "c:\program files\common files\system\ado\msado15.dll" no_namespace rename("EOF", "adoEOF")

In my case the error was raised on a line inside msado15.tlh with folowing code

__declspec(property(get=GetEOF))
VARIANT_BOOL EOF;

So i suppose the conflict was on EOF being defined multiple times, and the rename solves this. HTH,... ;)