|
I have a VB.NET Application that consumes a webMethods web service. This web service is called over https. I can successfully call the web service in all instances (dev, test, prod, & dr) on my development machine. When I try to deploy the exe (this is the only thing created in the bin directory) to other machines I am getting the following error:
The underlying connection was closed: Could not establish secure channel for SSL/TLS. Inner Exception: The function completed successfully, but must be called again to complete the context
I have installed all the certs on the non development machines, but still receive this error.
Is this a deployment issue?
Is this a certificate issue?
Can anyone point me in the right direction to fix this problem?
Thanks in Advance.
Mike
|
|
|
|
|
|
Well, I haven't done anything with secured WebServices yet, but my first guess would be that your not supplying a correct Certificate. You might also be missing the CA's certificate. Can you test the web service methods directly out of IE on these machines?
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
I finally got some time do to more testing. I was able to pull these sites up uinsg internet explorer.
But I noticed the following which seems odd.
On Windows 2000 machine I can call my development instance (no security or certs)
On XP SP1 at work the same code gives an 503 Internet Error Service Unavailable
On XP SP2 at home (logged in using VPN) code works fine.
This is really going to become a problem, since they are upgrading my machine at work and I might not be able to test any longer from my testing tool. To make matters worse I am moving to a different position and would like to have this working before I move (If I could only find the time).
Any ideas? My development Web Service runs on port 5595 on a webMethods Integration Server. If my company has shut down communication of port 5595 for XP machines I shouldn't be able to get there from IE, right?
Mike Lasseter
|
|
|
|
|
mr_12345 wrote: If my company has shut down communication of port 5595 for XP machines I shouldn't be able to get there from IE, right?
Correct, but it wouldn't make any difference which O/S your machine is running. After that, I'm not real clear on what machine is where and on what machine the web service is running and where that is.
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
OK. Let me try to make it clearer.
Web Service runs on webMethods B2B Integration Server on port 5595. Call it eai2:5595. This box does not need any certs to connect to it.
Client (Win2000) Calling web service on eai2:5595 works with out a problem.
Client (XP SP 1) Calling web service on eai2:5595 gives me the following error:
The request failed with HTTP status 503: Service Unavailable.
Client (XP SP 2) Calling web service on eai2:5595 gives me the following error: Request for the permission of type System.Net.WebPermission .... failed
Hope this helps.
Mike Lasseter
|
|
|
|
|
Dave,
I got the problem figured out. The problem was in the machine.config file. The proxy setting on the XP SP1 machines <proxy usesystemdefault=""> was set to true. I changed it to default and it now works. I also installed the certs on the XP SP1 machine for connecting to test, prod, and dr. And all calls work like a champ.
Thanks for your help.
Mike Lasseter
|
|
|
|
|
I have created a .class file by using java. I can execute it in the command prompt.
like this
E:\Pro Languages\Java\Test1>set path = D:\Program Files\Java\jdk1.5.0_06
E:\Pro Languages\Java\Test1>java MyApp
I expect to create a small & simple EXE file, to implement above commands. I do not like to use VB.Net because I have to install .Net framework to computers which have java only. Therefore, I decided to use VB6.
I have three questions.
1. How to implement above commands by using VB6
2. Do I need to install VB6 to computers (which do not have VB6), before executing that simple EXE file
3. Are there any other ways to do it
Never mind, if you can answer atleast one question
Thank You,
Regards,
Chatura Dilan
If at first you don't succeed, try; try again, so that you know
what not to do the next time. The answer is out there.
|
|
|
|
|
Does VB6 offer ShellExecute ? Why don't you use C++ ? Then you can just call ShellExecute and be done with it.
If all you want to do is run the app, a batch file is another solution.
Christian Graus - Microsoft MVP - C++
|
|
|
|
|
Yes,VB6 offers ShellExecute. I have no idea about ShellExecute. Here is an example which I found in MSDN.
Clicking the command1, but I can go to URL with the default web browser. I need your support to change it according to my question.
Private Declare Function ShellExecute _<br />
Lib "shell32.dll" _<br />
Alias "ShellExecuteA" ( _<br />
ByVal hwnd As Long, _<br />
ByVal lpOperation As String, _<br />
ByVal lpFile As String, _<br />
ByVal lpParameters As String, _<br />
ByVal lpDirectory As String, _<br />
ByVal nShowCmd As Long) _<br />
As Long<br />
<br />
Private Sub Command1_Click()<br />
Dim r As Long<br />
r = ShellExecute(0, "open", "http://www.microsoft.com", 0, 0, 1)<br />
End Sub
Regards,
Chatura Dilan
If at first you don't succeed, try; try again, so that you know
what not to do the next time. The answer is out there.
|
|
|
|
|
Batch file works well,
but I cannot assign an icon to the batch file.
Therefore I run the batch file by creating an EXE file, like this
Private Declare Function ShellExecute _<br />
Lib "shell32.dll" _<br />
Alias "ShellExecuteA" ( _<br />
ByVal hwnd As Long, _<br />
ByVal lpOperation As String, _<br />
ByVal lpFile As String, _<br />
ByVal lpParameters As String, _<br />
ByVal lpDirectory As String, _<br />
ByVal nShowCmd As Long) _<br />
As Long<br />
<br />
Private Sub Form_Load()<br />
Dim r As Long<br />
r = ShellExecute(0, "open", "E:\Pro Languages\Java\Test1\MyApp.bat", 0, 0, 1)<br />
End<br />
End Sub
Is there a way to execute the command by using EXE file only (without the batch file)?
Regards,
Chatura Dilan
If at first you don't succeed, try; try again, so that you know
what not to do the next time. The answer is out there.
|
|
|
|
|
Take the commands out of the batch file and put them in your VB calls to shellexecute.
Christian Graus - Microsoft MVP - C++
|
|
|
|
|
I tried this,
Private Declare Function ShellExecute _<br />
Lib "shell32.dll" _<br />
Alias "ShellExecuteA" ( _<br />
ByVal hwnd As Long, _<br />
ByVal lpOperation As String, _<br />
ByVal lpFile As String, _<br />
ByVal lpParameters As String, _<br />
ByVal lpDirectory As String, _<br />
ByVal nShowCmd As Long) _<br />
As Long<br />
<br />
<br />
Private Sub Form_Load()<br />
Dim r As Long<br />
r = ShellExecute(0, "open", "set path = D:\program Files\Java\jdk1.5.0_06", 0, 0, 1)<br />
r = ShellExecute(0, "open", "java MyApp", 0, 0, 1)<br />
End<br />
End Sub
But it doesn’t work. Can you change it?
Regards,
Chatura Dilan
If at first you don't succeed, try; try again, so that you know
what not to do the next time. The answer is out there.
|
|
|
|
|
You don't need all that junk. VB6 has it's own built-in Shell function. Also, if you're only running this on NT kernel machines, you can also put all your command-line statements together and run them all at once like this:
C:\>SET PATH=D:\Program Files\Java\jdk1.5.0_06 & Java MyApp
Soooo, you can do this in one or two lines:
Dim commandLine As String
commandLine = "CMD /K ""SET PATH=D:\Program Files\Java\jdk1.5.0_06 & JAVA MyApp"""
' The vbHide option (0) should hide the command window and show only your Java app
Shell(commandLine, vbHide)
I can't test this code because I haven't had VB6 installed anywhere for the last, oh, 4 years at least. But, I can tell you that any machine you put this on will require the VB6 Runtime[^] in order to run.
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
Thank you Dave It works when I use this
Dim commandLine As String<br />
commandLine = "CMD /K ""set path = D:\program Files\Java\jdk1.5.0_06 & java MyApp"""<br />
Dim runMyApp As Double<br />
runMyApp = Shell(commandLine, vbNormalFocus)
Thank you Cristian![Rose | [Rose]](https://www.codeproject.com/script/Forums/Images/rose.gif)
Thank you Dave
Regards,
Chatura Dilan
If at first you don't succeed, try; try again, so that you know
what not to do the next time. The answer is out there.
|
|
|
|
|
My problem is:
I have to rotate a picture for 180 degrees in VB 6.0 and show it in PictureBox/ImageBox. Does anyone knows how to do that?
Thank you
|
|
|
|
|
|
Hi all. This may be a silly question, but does anyone know definitively what the keyword "Sub" in Visual Basic is short for (or, perhaps "derived from" is a better expression)? Does it come from "subroutine", "subprogram", something else? Or did the VB creators just call it "Sub" with no intent to reference earlier forms of BASIC?
Or is "Sub" a bonafide keyword for BASIC (and not just Visual Basic)?
I'm not sure why I want to know... just curious, I guess.
|
|
|
|
|
I'm guessing it means subrouting. From earlier forms of basic "GO SUB"
"On two occasions, I have been asked [by members of Parliament], 'Pray, Mr. Babbage, if you put into the machine wrong figures, will the right answers come out?' I am not able to rightly apprehend the kind of confusion of ideas that could provoke such a question."
--Charles Babbage (1791-1871)
My: Website | Blog
|
|
|
|
|
Hi Colin. That was always my guess too - but I wondered (call it a geek obsession) if there were a definitive history to it.
|
|
|
|
|
I've always though it was 'subroutine', and took it for granted...now I wonder...
hey...slang is the vernacular for the vernacular...wow
|
|
|
|
|
FrankyT wrote: hey...slang is the vernacular for the vernacular...wow
Ooooohhhh.... 
|
|
|
|
|
It is short for "subroutine" - has been as long as I've been involved with computers.
...Steve
1. quod erat demonstrandum
2. "Give a man a fish and you've fed him for a day. Teach him how to fish and you've fed him for life." I read that somewhere once
|
|
|
|
|
Page 422, chapter 9, of "Visual Basic 6 Complete", Table 9.5: Statements Supported in VBScript.
Sub - Declares a Subroutine
Looking at the example provided, a subroutine is a division or seperate event happening inside of an "event procedure" as described below.
Page 42, chapter 4, "Visual Basic 6 For Dummies"
In Visual Basic lingo, subprograms are event procedures (although some programmers may call them subroutines).
So my understanding would be that a "Sub" is actually an "Event Procedure" and a "Subroutine" is inside of an event procedure and seperated by a marker consisting of an apostrophe followed by a tilde ('~). The example is provided on page 441, chapter 9, of "Visual Basic 6 Complete".
Hope this helps, Garner
|
|
|
|
|
It's short for Subroutine.
It's an extension to the original BASIC language. In BASIC there are no subroutine structures, only the GOSUB command that jumps to a line number and returns using the RETURN command:
10 GOSUB 40<br />
20 END<br />
30 REM Here follows the subroutine:<br />
40 PRINT "Hello world!"<br />
50 RETURN
---
b { font-weight: normal; }
|
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
