Tracking Forums, Newsgroups, Maling Lists
Home Scripts Tutorials Tracker Forums
 
  HOME    TRACKER    Visual Basic




Net Send IP "message" Using VB


how can I send messages to another computer in the same LAN?
For example: my IP is 192.168.10.11 and I want to send a message to another computer whose IP is 192.168.10.20

I know that the "net" program is a solution but to use "net" program I have to goto Run from the start menu and write: net send 192.168.10.20 HI! How r u?

but I want to develop a program which will send the message itself without using the "net" program.

I developed a program to send such messages using "net" commanding: shell net send sThereceiversIP "MyMessage" under a command button's Click event. but it takes the net program's help running the "net" in the console mode.

how can I solve the prob! Please help!




View Complete Forum Thread with Replies

See Related Forum Messages: Follow the Links Below to View Complete Thread
Footer Message In Outlook After "SEND" Is Pressed.
Hi ALL,

I am a newbie to VB6. I need ur advise / pointers.

I want to develop a VB Application which will add a one line footer note at the bottom of selected outgoing Email (MS Outlook / OE).

I want the footer note to be added after the "SUBMIT" buttom has been pressed, so that user does not see the message.

I want to run a small quiz game with this, in my company.
I know there are some ready-made options to add footer notes, but I want it to be added after the "send" button is pressed.

How can I do this.
All pointers / snippets etc are thanked in anticipation.

Thx and regards,
Satsco

Send "ItemClick" Message To The List View
How do I send the "ItemClick" message to the list view through code?
I am selecting a specific item in list view, but It does not call the "ItemClick" or "Click" event unless I click with the mouse or use the keyboard.

Simulating "Send To Back" And "Bring To Front" With Code
On my form, I'm creating a lot of controls on the FormLoad event. Is it possible to "Send to Back" and "Bring to Front" using code? Thanks.

-JB

If I Use "SaveSetting App.Title, "Settings", "Font", "001122"" - Save Date In The Registry, Where Ca
If i use "SaveSetting App.Title, "Settings", "Font", "001122"" - save date in the registry, where can i find the value saved in the registry? Thanks

"Send To Back" Or "Bring To Front" In Run Time
Hi,

i would like to know how to send to back or bring to front a frame in run time.

Thanks in advance.

MSComm1.Output = "asdf" Only "a" Is Send
I am an electronics engineer
I have a graphic panel connected to com1.

I used this simple code to output a string:

MSComm1.PortOpen = True
MSComm1.Output = "asdf"
MSComm1.PortOpen = False

but I only get "a"(not"sdf"),why?
I used null modem conf.

I guess code works...

If you have any comments please let me know.

Thanx

Solution> Error: """"&&H8007007E (-2147024770) The Specified Module Cannot Be Found"""
Hello

This is the error what i am getting after installing a package of one of my module on user testing machine.
The same module being working fine on others.


What can be the reason for this and what can be the probable solution for this?

Sandeep

What Message Box Returns Either "OK" Or "Cancel"
how can i get message Box value Regarding Operation of Cilcked Buttons wheather user has clicked "OK" or "cancel"...
hope for the Favore
best Regards,
fims

How Can I Send The Keys "shift" And "tab" Together?
How can i sendkeys to send shift and tab together (like shift+tab)

[*Resolved*]"the System Cannot Find Message Text For Message Number 0x%1 "
while using Scripting.Filesystem object, an error occurs with following message

Quote: the system cannot find message text for message number 0x%1 in the Message File for %2
wht is the Cause and Remedy



Edited by - bobynj on 1/17/2007 9:48:39 PM

Method "SaveAs" Or "Save" Of Object "Excel.Workbook" Does Not Work.
Hi people.
I did for a long time a program that uses excel automation, so that from a template will create a final file with some data pulled from the database (with ADO). At the end and when the Excel file is ready to be saved I got in a couple of computers some problems. In the whole LAN have XP, but in these 2 computers we have SP2. I have checked the rights and are OK (I have even tried to save the Workbook under the Temp folder and also the same problem).
Working with Office 2003 (SP1).
I have searched in internet about any bugs but I donīt find anything.
Any ideas.
Thanks for your time
Jaime

How To Replace "Apple" With "Banana" In A String That Contains "Orange" In A TXT File
Whoa! Long thread title. Basically, how can I search for any string in a text file that contains "Orange", then replace "Apple" with "Banana" in that same string? Is this difficult? Thanks!

Data1.RecordSource = "select * From Salary Where 姓名 Like " + S + " " * ""
Data1.RecordSource = "select * from salary where 姓名 like " + s + " " * ""
thanks in advance gentlemen and ladies..
firstly...I don't know what must add "++" between "s " variant..
who can tell me why?? thanks , ,, I really don't know why it does this..
maybe i am a beginner..please forgive me why add ++ between s..thanks

How To Change Boolean Field From Displaying "0" And "-1" To "Yes" And "No"
Hey there,

I have a data report, which displays a few fields from an Access table, one which is a boolean. At the moment if the boolean value is True, then on the data report it displays "-1", and if False "0".

How can I change this so it displays "Yes" if true and "No" if False?

Would be really grateful for any help.
Thanks.

On App Exit, "Microsoft Error: Send/dont Send"
sometimes, there is a Microsoft send/dont send error in my compiled app but only when I exit the app. I used PDW to compile it, and i am rinning vb6 with sp6.

It is a multi-form ADO app. Nothing exotic.

Any thoughts?

Send Message Isnt Owrking Wiht The "Edit
i have a program that i want to write to it's edit option like this :
writing to caption works! :

visual basic code:--------------------------------------------------------------------------------
lNotepadHwnd = FindWindowWild("*nirsco*", False)
sCaption = InputBox("What do you want the caption to be?")
SendMessageSTRING lNotepadHwnd, WM_SETTEXT, 256, sCaption
--------------------------------------------------------------------------------
but when i tried to send the text to edit:

visual basic code:--------------------------------------------------------------------------------
lNotepadHwnd = FindWindowWild("*nirsco*", False)
lNotepadEdit = FindWindowEx(lNotepadHwnd, 0&, "Edit", vbNullString)
sCaption = InputBox("What do you want to say?")

SendMessageSTRING lNotepadEdit, WM_SETTEXT, 256, sCaption
--------------------------------------------------------------------------------
it has failed,the lNotepadEdit recives 0!!!
any idea why?
(*FindWindowWild is a function that gives me the lNotepadHwnd value)

Send Message Isnt Owrking Wiht The "Edit
i have a program that i want to write to it's edit option like this :
writing to caption works! :

VB Code:
lNotepadHwnd = FindWindowWild("*nirsco*", False) sCaption = InputBox("What do you want the caption to be?") SendMessageSTRING lNotepadHwnd, WM_SETTEXT, 256, sCaption

but when i tried to send the text to edit:

VB Code:
lNotepadHwnd = FindWindowWild("*nirsco*", False) lNotepadEdit = FindWindowEx(lNotepadHwnd, 0&, "Edit", vbNullString) sCaption = InputBox("What do you want to say?")      SendMessageSTRING lNotepadEdit, WM_SETTEXT, 256, sCaption

it has failed,the lNotepadEdit recives 0!!!
any idea why?
(*FindWindowWild is a function that gives me the lNotepadHwnd value)

Extract Local Names For "OK", "Cancel" And "Apply"
Hi!

I noticed that some programs written in C++ have an English language, but the captions of the buttons "OK", "Cancel" and "Apply" are in German, Swedish or whatever localized Windows version the user utilizes. Any idea how to obtain the captions of those buttons in VB? The only method which comes into my mind is to get the locale ID and have an array with strings for the the various language versions, but I doubt that those programs do it in that way.

Regards,
Sebastian

<input Type="submit" Name="op-savefile" Value="Save"> - How To S
<input type="submit" name="op-savefile" value="Save"> - How can you submit this button through visual basic in a webbrowser?

Disabling "wake Up", "sleep" && "power" Button
hello there, how to disable "wake up", "sleep" & "power" button with visual basic? thanks

Pleez, Read This!!! Matter Important! "Printing In "DOS Mode" Using "Shell" -not Happening, I Wonder
Hi

[I had to repost it since I have not received any replies for my earlier post]

I have a problem.

Following is the code :

Shell("c:windowscommand.com /c type " & App.path & "matrix.txt &gt;prn")

where App.path is C:XYZ

when the above line is executed, the contents of "matrix.txt" is not printed on the printer. Instead, control just passes on to the next line.

So, to find out why, I modified the line thus.

Shell("c:windowscommand.com /K")

The above command takes me to the "command prompt". Here, when I give the command "type c:xyzmatrix.txt &gt;prn", which is what the vbcode does, I get the message "file creation error".

So, I have identified the problem. Can anyone tell me why this "File creation error" occurs, And how to solve the problem?

Thanks for reading through.

How Do I Create A Message Box With A "yes" Or A "no" And....
How do I create a message box with a "yes" or a "no" and make it so that if Yes was selected, then do the task, if no was selected, do nothing... anyone know?

Send Keys "%" + "{F4}"
Private Sub CommandKilIAM_Click()
On Error GoTo Humph
AppActivate "Internet Answering Machine", True
SendKeys "%" + "{F4}"
Humph:
End Sub

Why does this kill not only it's target, but also the program that executes this command?

Getting The File "Type" Descriptions (i.e., "doc" = "Microsoft Word Docume
Hello there,
I am creating an Explorer-type Listview to display the files in a directory, and one piece of info I need to know how to obtain is the file "type" (i.e., "doc" = "Mircosoft Word Document", "xls" = "Microsoft Excel Worksheet", etc.). Is there an API, or does anyone have a technique to do this? Thanks.

Changing The "title" Of A VB Created Word Doc From "Document1" 2 "BadgerBai
Ok, when I create a new word doc it automatically takes on the name "DocumentX", where X is a number greater than 1.
What I want to do is change this by using something like:

VB Code:
Dim objWoof As New Word.ApplicationDim objGrowl    As Word.Document    Set objGrowl = objWoof.Documents.Add    objGrowl.[What Property] = "Badger Baiters R Us"

Is this possible?

Oh, and b4 anyone mentions it, I do NOT want to save it, that is NOT an option...just getting that out the way now

Rarararrrrrrrrr

Woka

Resubmitting: "BeginTrans" , "CommitTrans" And "Rollback With Data Environments
----- Original Message -----


From: shankar [ babu ]


To: visualbasic-l@OpenITx.com


Sent: Wednesday, February 26, 2003 12:24 PM
Subject: "BeginTrans" , "CommitTrans" and "Rollback with dataenvironments



hello everybody,
I am using data enviroment designer in my project.


I am getting error while using
"BeginTrans" , "CommitTrans" and "Rollback"
of the DataEnvironment 's connection properties



kindly let me know the solution
thanks in advance
bye
shankar

Suppress Excel97 Message "this File Was Created Using A Later Version Of Excel"
is there a way to stop excel 97 showing this message when saving a file created using excel 2002?

or is there a neat way to copy all the contents (including modules) of one excel 2002 file to excel 97?

Crystal Reports 8.5 And Visual Basic 6--Err Message" Server Has Not Yet Been Opened"
I have been trying to get a pre-developed crystal report to display in a VB6 app at runtime. I can get the report to display with saved data, but when ever I use the .DiscardSavedData method and try to refresh the data I get an error message. The message is this "Server has not been opened". This is my first encounter with this version of Crystal 8.5, so I am sure that I am not using a certain method that is needed. Another question I had is do I even need to open an ADO recordset to populate the report?

Also, one other thing to point out is that my report is using to different tables from with in the same database.

=======================================================
'Declare GS Connection
Public cnGS As New ADODB.Connection

'Declare Connection String Variable
Public sGSConString As String

'Declare ADO record set
Public rsSelect As New ADODB.Recordset
Public rsExec As New ADODB.Recordset

'Declare SQL query string
Public sSQLSelect As String
Public sSQLExec As String

' Declare the application object
Public crxApplication As New CRAXDRT.Application

' Declare report object
Public crxReport As CRAXDRT.Report

Private Sub cmdViewReport_Click()

Call LoadReport

End Sub

Private Sub Form_Load()

Call OpenDatabase

End Sub

Public Function LoadReport()

Set crxReport = New CRAXDRT.Report
Set crxApplication = CreateObject("crystalruntime.application")

Set crxReport = crxApplication.OpenReport("C:Report1Test.rpt", 1)

crxReport.DiscardSavedData
crxReport.Database.SetDataSource rsSelect

crvViewer.ReportSource = crxReport
crvViewer.ViewReport


End Function


Public Function OpenDatabase()

'Setup the GS database connection
Set cnGOS = New ADODB.Connection
sGSConString = "Provider=SQLOLEDB.1;Persist Security Info=True;User ID=noway;Password=nohow;Initial Catalog=GR;Data Source=GS"
cnGS.ConnectionString = sGSConString
cnGS.Open
cnGS.CursorLocation = adUseClient

sSQLSelect = "SELECT * FROM OMDR"

rsSelect.Open sSQLSelect, cnGS, adOpenDynamic, adLockReadOnly
rsSelect.MoveFirst

End Function
========================================================

Any suggestions would be appreciated!

Error Message "Object Doesn't Support This Property Or Method"
When i trry to populate my listview i get a runtime error 438 saying "Object doesn't support this property or method" . I have 4 columns in my listview and this error occured for my last column. Can anyone help me with this?
This is the code i use to populate the listview.


VB Code:
Sql = SQLCommand("51", "", "")    Set OraDynaset = OraDatabase.CreateDynaset(Sql, 0&)    If OraDynaset.RecordCount <> 0 Then    OraDynaset.MoveFirst        Do While Not OraDynaset.EOF            Set itmx = ListView1.ListItems.Add(, , OraDynaset.Fields("Company_ID"))            itmx.SubItems(1) = OraDynaset.Fields("Dept_id")            itmx.SubItems(2) = OraDynaset.Fields("Customer_id")            itmx.sumitems(3) = OraDynaset.Fields("Customer_name")                    OraDynaset.MoveNext        Loop    End IfSet OraDynaset = Nothing

Datagrid Message "Insufficient Base Table Information" - Does Not Save
monthview used to populate col 0 of datagrid. Datagrid displays records
for which ever date is clicked on the monthview object.

Click a row to display text boxes for updating the grid. On any date except
the starting date (ie today) the update works.

However, on the opening date (today) if you immediately opt to edit
it will not save this information and instead gives the message in the
Subject heading above. If user clicks on monthview to go to next day
and edits info there it updates perfectly well.

So why won't it update for day 1?

Remember Me! "Select Any Menu Item & Display Message In Status Bar"
Hi John

How can this event work on menu . MouseMove event is work on Form not in Menu. Suppose I work on Form_MouseMove event then How I reconize that which menu item is selected. I looked the menu all properties but failed to find select properties.

Plz require your help.



Best Regards/Nadeem

FileSystemObject, CopyFile, And "Permission Denied" Error Message.
Hi everyone,

I need help with the following problem:
I have a Visual Basic application where some of my users are getting a "Permission Denied" error message when trying to copy files from one network drive to another.
Here it is part of my code:

Set fso = CreateObject("Scripting.FileSystemObject")
sourceFile = "K:UserDataSmith est1.txt"
destFile = "X:NetDataEPI est1.txt"
fso.CopyFile sourceFile, destFile, true
Set fso = Nothing

I believe it has to do with accessing a remote server by impersonating the user logged on to the client machine. Does anybody have any ideas on how to resolve this problem?

Thanks,

TM

Error Message "Memory Cannot Be Read" After Run Macros In Word.
Hi,
I have a word template which is composed of a series of macros to create documents with standard format. However, after I execute those macros, I will get error message about memory allocation problem such as "The instruction at xxxxx referenced memory at xxxxx. The memory could not be read. Click OK to terminate the program. " in windows 2000 or page fault error in windows 98.
I would like to know how I can solve this problem by (maybe) redoing the macro or by other solution. I don't have a clue where should I start. Please could somebody help me? Thank you.

Error Message "A Script Engine For The Specified Language Can Not Be Created"
Hello,
I have a VB program including VB Script. This program has worked on many PC but for some reason i am having problems with one.

First i got this error message :
" Run time error '-2147467259(80004005)'
The operation could not be completed because the script engine has not been intialized to a valid language"

I then include when loading form:

ScriptControl.language="VBScript"

and also copied the files msscript.ocx etc from the working PCs.. now im in a phase when getting this error:

"A script Engine for the specified language cannot be created"
Run - time error '380'

Has anyone seen this before and knows the workaround?

Thanks!

How To Turn Off "Use MS Word To Edit Email Message" In MS Outlook VB
Hi everyone,

I'm looking for a way to uncheck "Use MS Word to edit email message" in MS Outlook programatically. Does anyone know the code in VB?? Thanks.

"Can't Find DLL Entry Point In MyDLL.dll" Error Message
Hi,

What does the VBA error mean when the watch window for a particular function says "Can't find DLL Entry point in C:MydirectorypathmyDLL.dll"

What is an entry point and what might be causing the error?
I think my VBA syntax is correct so it's possibly the DLL itself that's not working? That would be strange since the DLL was provided in a book on how to write DLL's for Excel using C++.
This DLL was the very first example and I copied/pasted the C++ directly from the CD ROM that came with the book.

The DLL compiled fine in VC++ 6 and without errors or warnings, so I'm really surprised that the DLL didn't run in Excel via my VBA function declaration:

Declare Function get_system_time_C Lib "C:Documents and SettingsJohn DoeMy DocumentsGetTimeDebugGetTime.dll" (ByVal trigger As Long) As Double

Outlook Addin - Toolbar In "New Mail Message" Window
Hi all,

I want to add toolbar or menu on "new message" window only in outlook 2000 and geater. I can't find any clue on how to add addins only in new message window. The purpose of this plugin is to let user record their voice message and attach it to the mail.

So i have two questions.

1) how can i add toolbar or menu COM addin in "new message" window.
2) how can i attach a file to this currenly open "new message" window.

plz help me in this regard, thanks in advance

Regards,
Naveed.

Error Message "This Array Is Fixed Or Temporarily Locked"
Hi

I get this error message "This array is fixed or temporarily locked" when I try to use the function of a COM object.

I am executing the code with Excel and the strange thing is that, if I reference the dll of the object and declare my object like 'dim obj as New MyObject', then it works perfectly, but if I try to use it this way: 'set obj = createobject("MyObject")' then I get the error I mentionned.

What is the difference between the 2 methods I used ?

Thanx

Small Form With Message "loading Data" And With Progressbar
hi!

well all i have is access database .........my program loads thousands of data in listview. it take bit time to load.
All i want to do is while loading datas i want to pop up small form with message loading data and with progressbar that indicates the percentage of data loaded.
how to do this?/
please anyone help me

thanks
saracjl

Error Message "Project Is Unavailable" When Closing Document !!!!
I have put all my macro codes in to a template1, and use
this template as a library, the library is not password
protected. This Library as been add to other template2 as
a refences and are password protected .
Everithing work great, but sometime when closing a
document created with template2 i recieve at least 10
Error message "Project is Unavailable".

Like i am trying to view a password protected project...
and i am not!

Does any one have an idea of what's wrong?

Please i realy need help!!!

Can Someone Guide Me On How To "PUT" A "CHECKBOX" Inside A "Datagrid" For VB6.0?
Can someone guide me on how to "PUT" a "CHECKBOX" inside a "Datagrid" for VB6.0?
please i need these to complete my program security....................for my thesis? please please!!Can someone guide me on how to "PUT" a "CHECKBOX" inside a "Datagrid" for VB6.0?

"Window.Alert" Message Box Creating Problems In Webbrowser Form Submissions
I have been trying to implement an automated form submission program using webbrowser control. Earlier I had problems with javascript errors popping out. That I fixed by setting wb.silent=true. But now I have a new problem.

The form I am trying to fill will show an error message box if a wrong value is entered. In the HTML code, it is given as

window.alert ("Please enter a valid email address");

Because of this, an error message box from IE pops up on the program screen and also locks the webbrowser component. I want to get rid of this somehow. I just need to get it bypassed i.e. even if it cant submit this particular form, it must proceed to the next form.

Please help me.

"Window.Alert" Message Box Creating Problems In Webbrowser Form Submissions
I have been trying to implement an automated form submission program using webbrowser control. Earlier I had problems with javascript errors popping out. That I fixed by setting wb.silent=true. But now I have a new problem.

The form I am trying to fill will show an error message box if a wrong value is entered. In the HTML code, it is given as

window.alert ("Please enter a valid email address");

Because of this, an error message box from IE pops up on the program screen and also locks the webbrowser component. I want to get rid of this somehow. I just need to get it bypassed i.e. even if it cant submit this particular form, it must proceed to the next form.

Please help me.

Crytal Report "Verify Database" Message
OS = Windows XP Professional; VB 6 Enterprise; Crytal Report XI Developer Edition

I have written an VB application that has a "Menu Screen" for various reports design in Crytal Reports.

The problem is, everytime I access the report, I am getting the following message: "Verify Database: The database file "table name" has been changed. Proceeding to fix up the report! OK(button)"

I don't want the user to have to see this message or press the OK button. How do I get rid of it?

Thanks,
Sam

"Preparing To Install" Message In Visual Studio 6.0
I just installed Visual Studio 6.0 on a new laptop.

When I try to start it, I get a dialog that says "Preparing to Install".

The only button on the dialog is a cancel button.

The dialog never goes away. There is no hard drive activity. I let it sit over night, and nothing changed. Same message. I'm unable to use Visual Studio. Even if I click cancel.

If I click cancel the dialog just changes to "canceling" and stays that way forever.

I have reinstalled twice, and I'm still getting the same thing.

Does anyone have any suggestions as to what it's looking for? Perhaps I can just install it manually for it.





Added green "resolved" checkmark - Hack

Code For "Copy, Paste" And Font For A New Message
I am designing a form for New Message similar to Outlook Express.For commands like "Copy","Paste","Cut" how to code for these? And also when I click Font in the menu that standard Font window having "Font", "Style", "Size" should be displayed.So how to code for this?
Any help will be grately appreciated. Thanks.

"errors During Load" Message On Form With Toolbar
Hi there;

I am having a scary VB day here at work having encountered an error that apparantly numerous others have seen, but each time I acces an article from this forum (or another), there is no solid answer. So let's try again!!......

The form in question is an MDI form that has a toolbar. This is what the log records:

Line 177: Property Left in Toolbar1 could not be set.
Line 177: Property Width in Toolbar1 could not be set.

The error appears when running from the VB IDE, but does not appear in a compiled version. I have already ruled out the following possible explanations:

1. I am not referencing these properties anywhere (they are read only)
2. I have verified that the library has not changed for the toolbar.


Here is some additonal info that MAY be pertinent:

When the form loads initially, there is no error. It is when the user exercises the option to log into another 'garage' (its an app that manages workorders for fleets of leased company vehicles) and the form reloads....here is the code that does this:

If MDIForm1.Visible = False Then
Unload Me
MDIForm1.Show

Else
bNewLogin = True
Unload Me
Unload MDIForm1
MDIForm1.Show
End If

So I check if it is the first time logging in, otherwise the form is unloaded and then reloaded. The reason this is, is because when they log back in to another garage, they can change languages - so the captions need to be reset and a bunch of variables reinitialized. What's weird is that I did not change any code today - I was testing only, when suddenly this error started appearing. An answer will quite possibly result in the naming of my next born after the person who provides it - HELP PLEASE!!!!

Thanks much

Trap A "subscript Out Of Range" Array Message
hello people of the universe,

i have a line of code that i need to alter.

at present, it looks to see if the value of the 1st array position is (-1) or (0).

however, because the array is not always used, it occassionally will give me a "subscript out of range" error message.

what i really need is an if then statement that determines if the array has been created.

any ideas?

thx moonlite


the existing test is:

If aryCategory4(1) = -1 Or aryCategory4(1) = 0 Then

Really Annoying "Can&#039;t Edit Module" Error Message
I have two PCs, one at work and one at home. They both run under NT4, SP3 and I use VB6 Enterprise on both and yet the VB IDE behaves differently! I also don't use SourceSafe on either PC. Here's the problem. At work when a module is read-only, I can still edit it in the IDE. When I want to save the changes all I need to do is to first change the read-only property. At home however if the module is read-only, the IDE won't let me make any changes to it and I get the "Can't edit module" error message. Does anyone have any idea why this happens?

Copyright Đ 2005-08 www.BigResource.com, All rights reserved