|
The only way to do what you want is to write your own proxy server. Your game would have to connect to the proxy server where all packets outgoing to the list of servers that you have would have to be re-written to be redirected to the new address. This is, by far, not an easy task.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Dear All,
Can anybody teach me how to call database from the crystal report by use the VB.NET code.
Example : I have two database file like "c:\mycode\mydata1.mdb" and "c:\mycode\mydata2.mdb". This two database have same database structure and table, just each database have difference data inside. I just want to create a single report file and may call mydata1.mdb or mydata2.mdb.
Can anybody teach me how to call it on the coding.
|
|
|
|
|
I have some problems with Sendkeys.Send() function
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Shell("C:\Windows\System32\cmd.exe", AppWinStyle.MaximizedFocus)
SendKeys.Send("cd\")
SendKeys.Send("{Enter}")
End Sub
Sometimes , it work but sometimes not. I don't understand why ? can you help me ?
Thanks!!
Hung
|
|
|
|
|
You have to wait for the process to completely start before you send keystrokes to it. Instead of using Shell, you might want to use Process.Start instead. This will give you more options, like being able to check if the process has actually started yet.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Hi, can anyone tell me how can I set/revoke the permission to a folder for user in windows using VB.net.Thank you.
|
|
|
|
|
There's no support for this in the .NET BCL until the .NET Framework 2.0 comes out. You might want to checkout this[^] sample on GotDotNet.com.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
|
Hi, i need to save to a text file with a variable name. This is what i have at them moment. It saves to mood.txt in the same directory as the project.
FileNum4 = FreeFile<br />
' Create mood.txt<br />
Open appPath & "mood.txt" For Append As #FileNum4<br />
' Write the contents of TextBox1 to mood.txt<br />
Print #FileNum4, mood; " , "; lblTime; " , "; songTitle<br />
' Close the file<br />
Close FileNum4
What i want tho, is for the filename to be "songTitle" mood.txt where songTitle is a varible As String. Ive tried this:
Open appPath & songTitle & " mood.txt" For Append As #FileNum4
But i get a bad file name error when i try to save to the file. Im sure there must be a way to do this, i just cant figure it out. How is it done?
Thanks
Gizza
-- modified at 2:14 Monday 29th August, 2005
|
|
|
|
|
If you're going to have spaces in your filename, the entire file path must be enclosed in quotes: "C:\Documents and Settings\...."
Dim filePath As String
filePath = """" & appPath & songTitle & " mood.txt""" For Append As #FileNum4
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
I get a syntax error try to put " around the filename.
I aslo need help on another matter. My text files look like this.
upbeat, 2507
upbeat, 5503
slow, 8521
upbeat, 11517
upbeat, 14512
upbeat, 17507
calm, 20526
I need to read this in. But i want to put whats before the comma in one array, and whats after the comma in another array.
Thanks for the help
|
|
|
|
|
Hi there,
May I ask a question?
I wanna write a program about Call Logs.
However, when researching the information about Call Logs in MSDN, I cannot find anything about that.
Would you please supply me any simple sample about Call Logs?
Thank you very much.
|
|
|
|
|
Perhaps MSDN, like me, has no idea what you mean by call logs ?
Christian Graus - Microsoft MVP - C++
|
|
|
|
|
Thank your repost.
I want to get call logs on my smartphone.
In smartphone SDK,it's include in "phone.h".
like~~~" PhoneCloseCallLog "...
I need any simple sample or idea about Call Logs with vb.net or embedded vc++ 4.0 .
Would you please supply me any simple sample or idea about this?
Thank you~
|
|
|
|
|
How can i make a data grid in VB.Net
|
|
|
|
|
Do you want to elaborate on that? All you really need to do is drop a DataGrid control on your form. Afte that, it's up to you to supply the data, however you want, from wherever you want. So what's the real question here?
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
hellow to all ..
i have an database tabel that i wana to bind it to a datagrid that i had created ...
how can i do this ?
thx
|
|
|
|
|
DataGrid1.DataSource = myDataTable
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Dave Kreskowiak wrote:
DataGrid1.DataSource = myDataTable
You have great patience.
Jon
Information doesn't want to be free.
It wants to be sixty-nine cents @ pound.
|
|
|
|
|
Hello,
I currently have a problem that i have thought of a soultion for but im unsure of how i can implement this.
Problem:
I have an new instance of a class, lets call it "Temp_Class" and within that class there are some properties x,y,z and say 6 instances of another class "Sub_Class". There may be 1 instance of "Sub_Class" or as many as 100 depending on Property X which is an integer.
Just like the "Temp_Class", "Sub_Class" contains some Properties A,B,C and up to 5 instance of a thrid class "Sub_Sub_Class" which just contains properties D,E,F.
I wanted to be able to referance each of the "Sub_Sub_Class" properties by using arrays so that i can set a varing amount of Sub_Classes or Sub_Sub_Classes where nessercary but for this i would need to create a new instance of each class. The problem with defining an array as a class is that it wont allow me to define it as a new class for some reason.
Public Temp_Class<br />
<br />
Private X_Value<br />
Private Y_Value<br />
Private Z_Value<br />
<br />
Public Property X .............(Get and Set are tested and are known to work)<br />
Public Property Y .............<br />
Public Property Z .............<br />
<br />
Public Array_1(X_Value) as Sub_Class<br />
<br />
End Class<br />
<br />
Public Sub_Class<br />
<br />
Private A_Value<br />
Private B_Value<br />
Private C_Value<br />
<br />
Public Property A .............<br />
Public Property B .............<br />
Public Property C .............<br />
<br />
Public Array_2(Y_Value) as Sub_Sub_Class<br />
<br />
End Class<br />
<br />
Public Sub_Sub_Class<br />
<br />
Private D_Value<br />
Private E_Value<br />
Private F_Value<br />
<br />
Public Property D .............<br />
Public Property E .............<br />
Public Property F .............<br />
<br />
End Class
The Idea is that you can then Referance any D,E,F propery as follows.
<br />
Dim Test as new Temp_Class<br />
<br />
Test.Sub_Class(0).Sub_Sub_Class(0).D = "Hello" '(assuming 'D' is a String)<br />
Test.Sub_Class(0).Sub_Sub_Class(1).D = "Test"<br />
Test.Sub_Class(0).Sub_Sub_Class(2).D = "Hello"<br />
Test.Sub_Class(0).Sub_Sub_Class(3).D = "Test"<br />
<br />
Test.Sub_Class(1).Sub_Sub_Class(0).D = "Hello"<br />
Test.Sub_Class(1).Sub_Sub_Class(1).D = "Test"<br />
Test.Sub_Class(2).Sub_Sub_Class(2).D = "Hello"<br />
Test.Sub_Class(2).Sub_Sub_Class(3).D = "Test"
I have been able to get this working but only if dont use arrays, but then everything becomes alot more complicated.
i.e. (tested and works, where items have been defined as new instances)
Test.Sub_Class_0.Sub_Sub_Class_0.D = "Hello"<br />
Test.Sub_Class_0.Sub_Sub_Class_1.D = "Test"<br />
Test.Sub_Class_1.Sub_Sub_Class_0.D = "Hello"<br />
Test.Sub_Class_1.Sub_Sub_Class_1.D = "Test"
If anyone can help me with this problem or if they know if this idea would even work it would be much apprechated.
Shaun Bone
Bonio55@hotmail.com
|
|
|
|
|
when u define the array as a class you have to define it with a random figure i.e.
public Temp(0) as Sub_Class
then in the subroutine 'New' for the class "Sub_Class" you call a subroutine called create_X()
Public Test as new Temp_Class(8,1,2)<br />
.....<br />
.....<br />
<br />
Public Class Temp_Class<br />
.....<br />
public Temp(0) as Sub_Class<br />
.....<br />
Private x_Value as integer<br />
Private y_Value as integer<br />
Private z_Value as integer<br />
.....<br />
Public Sub New(ByVal x_val, ByVal y_val, ByVal z_val)<br />
ReDim Temp(Temp_Class.X)<br />
x_value = x_val<br />
y_value = y_val<br />
z_value = z_val<br />
Create_X()<br />
End Sub<br />
....<br />
Public Sub Create_X()<br />
Dim temp_X As New Sub_Class<br />
Dim n As Integer<br />
Public Sub Create_X()<br />
For n = 0 To Temp_Class.X<br />
Me.Sub_Class(n) = temp_X<br />
Next<br />
End Sub<br />
....<br />
....<br />
End Class<br />
<br />
Public Class sub_Class<br />
.....<br />
public Temp2(0) as Sub_Sub_Class<br />
.....<br />
Public Sub New()<br />
ReDim Temp2(Temp_Class.Y)<br />
.....<br />
Create_Y()<br />
End Sub<br />
....<br />
Public Sub Create_Y()<br />
Dim temp_Y As New Sub_Sub_Class<br />
Dim n As Integer<br />
Public Sub Create_Y()<br />
For n = 0 To Temp_Class.Y<br />
Me.Sub_Sub_Class(n) = temp_Y<br />
Next<br />
End Sub<br />
....<br />
....<br />
End Class
this relies on the fact hta default values have been put into the sub_Class and Sub_Sub_Class Properties in the subroutine new() and also relies on the fact the initaliation 'Test' class being called with overload.
if this approach is then taken you are effectivly creating defualt values for thouse classes and by doesing so removes the problem of the computer bringing up Null References
Sorry if this isnt very clear but someone else might be able to write it up more clearly if they can understand what i mean.
|
|
|
|
|
I want to connect Webcam to my application. I have made a form i want that as i click the button the image from webcam should be apear in picturebox. Please help me !!!!!!!!!!!!!!!!!
|
|
|
|
|
This is how i decided to implement it you can mess around with it to how u want it once you have it working.
1) Create a picture box and call it "picCapture"
2) Create a list box and call it "Video_Sources"
3) Create a Button Called "Change_Video_Apply"
4) Create a Buttin Called "Change_Video_Source"
On the Form designer place the Button and List box 'Behind' the Picture box.
Make sure the pic box has a ratio of 4:3 for its Width:Height - stops streching
Copy these into your form class
Place this with you declerations i.e. before subroutines
#Region "Webcam Defines"<br />
Const WM_CAP As Short = &H400S<br />
<br />
Const WM_CAP_DRIVER_CONNECT As Integer = WM_CAP + 10<br />
Const WM_CAP_DRIVER_DISCONNECT As Integer = WM_CAP + 11<br />
Const WM_CAP_EDIT_COPY As Integer = WM_CAP + 30<br />
<br />
Const WM_CAP_SET_PREVIEW As Integer = WM_CAP + 50<br />
Const WM_CAP_SET_PREVIEWRATE As Integer = WM_CAP + 52<br />
Const WM_CAP_SET_SCALE As Integer = WM_CAP + 53<br />
Const WS_CHILD As Integer = &H40000000<br />
Const WS_VISIBLE As Integer = &H10000000<br />
Const SWP_NOMOVE As Short = &H2S<br />
Const SWP_NOSIZE As Short = 1<br />
Const SWP_NOZORDER As Short = &H4S<br />
Const HWND_BOTTOM As Short = 1<br />
<br />
Dim iDevice As Integer = 0<br />
Friend WithEvents SerialPort1 As System.IO.Ports.SerialPort<br />
Friend WithEvents Button3 As System.Windows.Forms.Button<br />
Friend WithEvents Timer1 As System.Windows.Forms.Timer<br />
Friend WithEvents Button4 As System.Windows.Forms.Button<br />
' Current device ID<br />
Dim hHwnd As Integer ' Handle to preview window<br />
<br />
Declare Function SendMessage Lib "user32" Alias "SendMessageA" _<br />
(ByVal hwnd As Integer, ByVal wMsg As Integer, ByVal wParam As Integer, _<br />
<MarshalAs(UnmanagedType.AsAny)> ByVal lParam As Object) As Integer<br />
<br />
Declare Function SetWindowPos Lib "user32" Alias "SetWindowPos" (ByVal hwnd As Integer, _<br />
ByVal hWndInsertAfter As Integer, ByVal x As Integer, ByVal y As Integer, _<br />
ByVal cx As Integer, ByVal cy As Integer, ByVal wFlags As Integer) As Integer<br />
<br />
Declare Function DestroyWindow Lib "user32" (ByVal hndw As Integer) As Boolean<br />
<br />
Declare Function capCreateCaptureWindowA Lib "avicap32.dll" _<br />
(ByVal lpszWindowName As String, ByVal dwStyle As Integer, _<br />
ByVal x As Integer, ByVal y As Integer, ByVal nWidth As Integer, _<br />
ByVal nHeight As Short, ByVal hWndParent As Integer, _<br />
ByVal nID As Integer) As Integer<br />
<br />
Declare Function capGetDriverDescriptionA Lib "avicap32.dll" (ByVal wDriver As Short, _<br />
ByVal lpszName As String, ByVal cbName As Integer, ByVal lpszVer As String, _<br />
ByVal cbVer As Integer) As Boolean<br />
<br />
#End Region
Place these with your Functions
Private Sub LoadDeviceList()<br />
Dim strName As String = Space(100)<br />
Dim strVer As String = Space(100)<br />
Dim bReturn As Boolean<br />
Dim x As Integer = 0<br />
' Loads name of all avialable devices into the Video_Sources<br />
Do<br />
bReturn = capGetDriverDescriptionA(x, strName, 100, strVer, 100)<br />
If bReturn Then Video_Sources.Items.Add(strName.Trim)<br />
x += 1<br />
Loop Until bReturn = False<br />
If Video_Sources.Items.Count > 0 Then<br />
Video_Sources.SelectedIndex = 0<br />
Else<br />
Video_Sources.Items.Add("No Capture Device")<br />
End If<br />
End Sub<br />
<br />
Private Sub OpenPreviewWindow()<br />
Dim iHeight As Integer = picCapture.Height<br />
Dim iWidth As Integer = picCapture.Width<br />
<br />
hHwnd = capCreateCaptureWindowA(iDevice, WS_VISIBLE Or WS_CHILD, 0, 0, 640, _<br />
480, picCapture.Handle.ToInt32, 0)<br />
<br />
If SendMessage(hHwnd, WM_CAP_DRIVER_CONNECT, iDevice, 0) Then<br />
SendMessage(hHwnd, WM_CAP_SET_SCALE, True, 0)<br />
SendMessage(hHwnd, WM_CAP_SET_PREVIEWRATE, 66, 0)<br />
SendMessage(hHwnd, WM_CAP_SET_PREVIEW, True, 0)<br />
SetWindowPos(hHwnd, HWND_BOTTOM, 0, 0, picCapture.Width, picCapture.Height, _<br />
SWP_NOMOVE Or SWP_NOZORDER)<br />
Else<br />
DestroyWindow(hHwnd)<br />
<br />
End If<br />
End Sub <br />
<br />
Private Sub ClosePreviewWindow()<br />
SendMessage(hHwnd, WM_CAP_DRIVER_DISCONNECT, iDevice, 0)<br />
DestroyWindow(hHwnd)<br />
End Sub
In the code for the Change_Video_Apply button put
iDevice = Video_Sources.SelectedIndex<br />
OpenPreviewWindow()<br />
<br />
Video_Sources.SendToBack()<br />
Change_Video_Apply.SendToBack()
In the code for the Change_Video_Source button put
ClosePreviewWindow()<br />
Video_Sources.BringToFront()<br />
Change_Video_Apply.BringToFront()
|
|
|
|
|
I build my Matlab .m file as dll and I'm going to integrate vb.net with this dll. Just, I dont know how to pass an image to that matlab dll? Which data type i should use to declare that image?
Here is the code used in vb.net to call the method in that dll:
Private obj1 As MyMatlabApp.MyClass
obj1 = New MyMatlabApp.MyClass
obj1.methodName(1, objReceivedImage, objSendImage)
Due to the code above:
1 means only 1 object will be returned which is objReceivedImage
objSendImage is the image that i'm going to pass it into the dii for further processing
Anyone who knows about this, pls help me out here. I'm really in fix. Thanks in advance.
|
|
|
|
|
Hi,
I have just acquired a dual processer (SMP) machine for my latest database project (SQL Server & vb.net). It is working great. But when i check performance graph in my Windows Task Manager, it shows only one processor working to almost 100% and second processor pitching in only for short while befor going idle.
How do i develop my vb.net application that utilizes maximum of both the processor, like SQL Server itself and some graphics application like Ulead products while rendering graphics.
Note: I have tried to set the Affinity and Task priorities in Windows Task manager ... but with no success.
I assume it is some base architecture that utilizes multi-Processors, that i am lacking.
Any help would be much appreciated.
Regards,
msali.
|
|
|
|
|
Is your app written to use multi-threading?
Using a second processor doesn't happen automatically. You actually have to write your app to use mutiple threads of execution. Otherwise, you're running a single threaded app that only runs on a single processor.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
