This same (Identical ) code works well in another program but does not in windows service... Returns 0 for window handle ...?
Public WindowStr As String = "ImagSrvWindow"
Protected Overrides Sub OnStart(ByVal args() As String)
'necessary to get control to paint Pic&Txt boxes in stream of Browser navs
[Code].....
I have spent the last 3 hours trying to figure this out with no success:The WIndows XP phone dialer has a "Hide Calls" available from the context menu, can someone run Spy++ (or similar) over it and let me know what message i should be looking out for to fire the "hide calls" option. Also, do i send it to the child ("Preview") or the parent ("Phone Dialer")
View 1 Repliesi have a Windows service that is hosting a WCF service through net.tcp and this is working great. I have also created a WCF service application. I am trying to add the net.tcp service reference to the service application. Then I add it to the GAC that goes ok but if I try to RegAsm the WCF service application to allow it to be called from Server.CreateObject I get the error:
Warning: Type library exporter encountered a type that derives from a
generic class and is not marked as
[ClassInterface(ClassInterfaceType.None)]. Class interfaces cannot be
exposed for such types. Consider marking the type with
[ClassInterface(ClassInterfaceType.None)] and exposing an explicit
interface as the default interface to COM using the
ComDefaultInterface attribute.
It does not work. I have tried to call it through a class library but this does not work either as the end point is not set correctly.
I have been given the task of calling a web service which returns an xml data feed which I am doing like so:
For Each r As DataRow in SomeDataTable
Dim msFeed As String = string.format("[URL]?param={0}", r!SOME_VAL)
Dim x As XDocument = XDocument.Load(msFeed)
Next
This is all fine but as you can see x just gets overwritten with every iteration. What I need is create an xDocument and add each feed from my loop but I am unsure how to proceed.
Solution
Dim xAllFeeds As XElement = New XElement("Feeds")
For Each r As DataRow in SomeDataTable
Dim msFeed As String = string.format("[URL]?param={0}", r!SOME_VAL)
Dim x As XDocument = XDocument.Load(msFeed)
xAllFeeds.Add(x.Root)
Next
I'm connecting to a Web Service that returns a system.xml.xmlnode. How can I convert that to a datatable?
View 3 RepliesI'm trying to get data with the methods below and I get null response and can't figure out why. I'm just trying out a different way of using a wcf service from silverlight and I don't understand something that I should.[code]...
The employee object will stay null. If I put a break into the service call and follow through the code it finds the correct record from the database and the return statement shows an object with the correct data but still the employee object in silverlight side will remain null.
In a VB.NET application that runs as a service, I am getting a value of "Nothing" returned when I use Registry.CurrentUser.OpenSubKey(). The same code executes correctly when the application runs in desktop mode. I am not much on VB.NET and unfortunately, this is not my code.
Code:
Dim regURL As String = "SoftwareMyCompany" + _
System.Reflection.Assembly.GetCallingAssembly.GetName.Name + _
[code].....
I am trying to communicate with a Windows service on a remote machine on the network but i keep getting an exception saying the following: "System.InvalidOperationException: Cannot open Service Control Manager on computer 'machine001'. This operation might require other priviledges. ---> System.ComponentModel.Win32Exception: Access is denied.
[Code]...
Is it possible to have a dotnet windows service which monitor other services and upon stop of any service, the monitoring service would be able to start the stopped service.
View 4 RepliesIn the past I had the indexing service installed on a Windows Server 2003 and used it to index files for my website. I did this by executing an OleDbCommand with a query and a connection string.How do I accomplish the same thing with the new "Windows Search Service" (Windows Server 2008) by using VB.NET? Does this work the same way so that I only need to change the Provider name which has been "MSIDXS.1" up to now? Case true, what is the new Provider name?
View 1 RepliesI'm trying to create a function that would return a PDF document. Something like this:
Function GetPDF(ByVal DirectoryPath as String) as PDF
Return DirectoryPath
End Function
I have to cut down the amount of code in my blackjack program so im trying to use a function however the function always returns a value of 0 I have tried putting in "return cardvalue" but it still comes out as 0 I dont know where I went wrong or if the code im using can even be used as a function.
Function Values(ByVal deal() As Integer, ByVal counter As Integer, ByVal cardvalue As Integer) As Integer
If deal(counter) = 1 Or deal(counter) = 2 Or deal(counter) = 3 Or deal(counter) = 4 Then
[Code]....
When you create a Windows Service, you create a list of the services you want to start. The default is this:
ServicesToRun = New System.ServiceProcess.ServiceBase() {New Service}
Can you have multiple instances of the same Service class (that bind to different addresses or ports), like this?
ServicesToRun = New System.ServiceProcess.ServiceBase() {New Service("Option1"), New Service("Option2")}
Or will that cause problems? Should we use two different classes instead?
I wrote a vb program that would prompt the user to enter a number and then enter the exponent value they wanted the number raised to. When they clicked button 3 it did the calculation. everything worked perfectly.
Now I need to change the program. I must create a function in a module and then call that function from button3 click event. I have tried several different ways and even though it seems to "work", it keeps returning an incorrect value![code]...
I have to create dinamcly a Table ( not a DataTable) and I need to write the Functions in other class... so I need to create a function that Returns a Table to make possible I just atribuite the Table to my <asp:Table> control.
[Code]...
We have a server with multiple services written in .Net 1.1 and 3.5 running on a Win 2003 server. Everything runs fine, but when we stop a certain service, an unrelated service stops. I have checked and neither has any dependencies. The service we stop is in 3.5, and the unrelated service that incorrectly stops is in 1.1. We get no error messages, nor event log errors, so we are baffled.Does anyone have an idea as to what may be causing this?
View 7 RepliesI am using this method to install windows service
processInstaller = New ServiceProcessInstaller()
serviceInstaller1 = New ServiceInstaller()
serviceInstaller2 = New ServiceInstaller()[code].....
How can I get the account name after whenever the service is started ?
I need top create a function that gets the next integer in the sequence of 1 to 60. Each time the function is called, I need it to increment from what the last value was and return the next number as the result. It also cannot return the same integer in 2 consecutive calls. When the count gets to 60, the sequence needs to reset back to 1. I would like to function to have no parameters.
I have created a function that does this using the cache to store the last value that was returned, but I am worried that with concurrent calls to the function that it might not work as I expect and 2 calls could get the same integer.
Is cache blocking the correct method to use in this instance or is there something other method I am not thinking about?
Also, stuck using .Net 3.5 and this is a web application.
I just wrote this function based on using SyncLock. Any obvious problems with it that I don't see? I am using the Cache to save the last value that was returned.
Private Shared Function GetNextNumber() As Integer
Dim o As Integer
Dim r As Integer
[Code].....
I have a function that returns a bitmap meant to be used as background in a panel, and occasionally I'd have to call it to create a new background based on parameters
View 2 RepliesHow can I call individual parts of this function? I would like to call return Gallons and decPaintCostperRoom as individual entities with a single function.
[Code]...
i hav two openfilefialogs(1 and 2). So i also have a listbox. the files opened with the openfiledialogs will be added to the listbox. and when i need to open the files i need to see if they are from which openfiledialog. so
it is like this.
Path.GetDirectoryName(OpenFileDialog1.FileName) & "" & Form3.ListBox1.SelectedItem.ToString
'if this returns a null then go to this
Path.GetDirectoryName(OpenFileDialog2.FileName) & "" & Form3.ListBox1.SelectedItem.ToString
I have a function class in which I have created a function that connects to an Access database and runs a query and returns a dataset.
View 3 RepliesSo I have a class called Transactions and I put all my functions there. The problem is, when I try to call that specific function and assign it to a variable, there is a "ByRef Argument Type mismatch" error that keeps on bugging me.
Public Function GetUserID(name As String) As Integer
Dim gotID As Integer
Dim rec As Recordset
Call connectDB
sSQL = "select ID from User where Name ='" & name & "'"
Set rec = CurrentDb.OpenRecordset(sSQL)
[Code] ......
I have just received some documentation for an Interface and a class implementation, and I had a question about the return type defined in the interface. here is the function from my interface (I have abbreviated the parameter list in the SearchAddress function).my concern is the SearchAddress function.
Public Interface IAddress
Property AddressID As Long
Property AddressTypeID As Long
[code].....
i am trying to write a function which should return a 2D array , please advise what is wrong with.
vb.net
Public Function Cursor(ByVal SQL As String, Optional ByVal PARA1 As String = "", _
Optional ByVal PARA2 As String = "") As String(,)
Dim Cols, roWES, I, J As Integer
[code]....
Im making a login system that encrypts and decrypts the username and password. My encryption code is:
Private Shared Function enc(ByVal targetString As String, ByVal maskvalue As String) As String
Dim Index As Integer = 0
Dim ReturnValue As String = ""
[code]....
The enc function works for both encrypting and decrypting (I've tested with a MsgBox alert. The problem I'm having is when the program loads, it reads the file and decrypts it. However, instead of properly working, it returns one character in the first textbox and nothingin the other without any error being thrown.
I am working on a project that requires me to hop into to separate DB's. So I have figured that I need to have multiple functions inside of my VB page. The only problem I am having,is I am not to sure how to get this all accomplished. So far I have figured out the overall structure, just need to implement that structure.
Here is my idea:
The main Function would call two other functions. We can Call them Sub Function 1 and Sub Function 2. So, the main Function takes the saved sessions information for the E-mail address and dumps in into Sub Function 1. It needs to open up a new connection to the db/stored procedure and RUN the following procedure and then return the result. Here is the stored procedure and what I think is correct.
CREATE PROCEDURE WEB_User
(@EMAIL_ADDRESS varchar(80) = [EMAIL_ADDRESS])
AS SELECT MEMBER_NUMBER
FROM WEB_LOGIN
WHERE EMAIL_ADDRESS = @EMAIL_ADDRESS
So my question is, what is the function suppose to look like? how do I send the session information to the procedure? and finally, how do I return the stored procedure results and push back into the main function so it can be carried into sub function 2?
In our code base there is a function which should return either an object or nothing. The exact code is this : Return NothingThe calling method looks something like thismyObj = theClass.function()if myObj <> nothing then // fails
View 1 RepliesI call a function (SaveChanges) to access my business / data layer and save any changes to fields that are marked as an Add or Update and are marked to be processed. This function used to work fine up until 60+ minutes ago. What is happening is that suddenly the function is returning false. After debugging through the code, when it hits Return the local boolean is set as True but when it gets back to the calling method (and uses the return value) it is now False. As I said I went through line by line and debugged it, then I added a watch to it. The funny part is that there is one spot that sets the Boolean to false, and when I put a breakpoint on that spot it is never reached.
Here is the function:
Private Function SaveChanges() As Boolean
Dim blnSaved As Boolean = True
Dim saveableRows As List(Of DataRow) = (From d As DataRow In _listData.Tables(0).Rows _
Where Not d("Marking") = "Duplicate" _
And d("Process") = True _
[Code] ....
[VB.Net 2008 Express Edition]I have a 2D array of Integers called Map(0 to 79, 0 to 79)In this array I store IDs for tiles to be loaded later.I'm trying to write a module to generate a random dungeon every time it starts by making a room 10x10 tiles in the middle, picking a wall, making a hallway from that wall, and adding a room to the end of that hallway.From there it picks a random wall anywhere in the map, adds a hallway and a room, and repeats until the number of floor tiles is high enough [400 atm] The problem is that when the rooms and hallways are made, it first runs a function to return whether or not that space is empty. The problem is that even when I know for a fact the space is empty, it returns false. I don't understand why. Here's the Clear function.
Code:
Public Function Clear(ByVal Top As Integer, ByVal Left As Integer, ByVal Height As Integer, ByVal Width As Integer) As Boolean
'Returns whether a rectangle is empty
'used to loop through a rectangle of the map array
Dim introw As Integer
[code]....
