Visual Basic

Re: macro code that prompt for password or display message each time MS word is opened

2-Jul-09 18:33

Guy, there's no real way to do it. Word doesn't support a security model extensive enough to support this in a way that is not easily defeatable.

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007, 2008

ChiSmile2-Jul-09 22:07

ChiSmile

2-Jul-09 22:07

Dave, thats ok, Thanx men!

Re: macro code that prompt for password or display message each time MS word is opened

dan!sh 2-Jul-09 8:45

dan!sh

2-Jul-09 8:45

So you are the one who wants people to hate MS Word and switch to open office.

Socket programming

Cory Kimble2-Jul-09 4:20

Cory Kimble

2-Jul-09 4:20

I am having difficulty communication through a socket. I am new to this, so bare with me.

I am trying to pass string control protocols to a device like a display sign.

Here is how I have connected to the sign. I think this has worked because I don't get an error. Plus, when I try to connect again it says that I am already connected.

Private endpoint as new IPEndPoint(ipaddress, port)
private socket as new socket(endpoint.addressFamily, SocketType.Stream, ProtocolType.Tcp)

--Sub

socket.connect(endpoint)

--end sub

The issue is when I try to send the protocol text string to the sign. I need help formatting the string.

EXAMPLE: The documentation says to send <0x01>Z00<0x02>AA<0x1C>1<0x1D>B3This is where message is.<0x04>

So I changed it to hex:

dim signmsg = This is where message is.
dim signstring = &H1.tostring + "Z00" + &H2.tostring + "AA" + &H28.tostring + "1" + &H29.tostring + "B3" + signmsg + &H4.toString

First, can you see if I am doing any thing wrong above.

Second, What is the easiest way to get this data formatted correctly and sent to the socket.
Will this work?

dim Buffer() as Byte = System.text.acsciiencoding.ascii.getbytes(signString)

To send I use

socket.send(Buffer, buffer.length, Sockets.SocketFlags.none)

But I get nothing from the sign.

What am I doing wrong?

I can't think of anything cool and nerdy to say.

Luc Pattyn2-Jul-09 4:31

Luc Pattyn

2-Jul-09 4:31

Hi Cory,

have you looked at the content of signstring? IMO it is not what you want it to be.

Smile | :)

Luc Pattyn [Forum Guidelines] [My Articles]

DISCLAIMER: this message may have been modified by others; it may no longer reflect what I intended, and may contain bad advice; use at your own risk and with extreme care.

Cory Kimble2-Jul-09 4:54

Cory Kimble

2-Jul-09 4:54

I also tried this that worked on a different project.

Dim sValue As String

        Dim i As Integer = 0
        Do While signString.Length > 0


            'first I take each character using substring

            sValue = signString.Substring(0, 1).ToString()

            'then convert character into ascii.        

            sValue = Strings.Asc(sValue).ToString

            'then convert ascii value into Hex Format 

            sValue = Conversion.Hex(sValue)

            'after converting remove the character. 

            buffer(i) = Byte.Parse(sValue, Globalization.NumberStyles.AllowHexSpecifier)
            signString = signString.Substring(1, signString.Length - 1)
            i = i + 1

        Loop

I can't think of anything cool and nerdy to say.

Luc Pattyn2-Jul-09 5:05

Luc Pattyn

2-Jul-09 5:05

Seems like you ignored my previous reply.

The latest code snippet is garbage, it may do what you need, it does what it does in a horrible way.
It is clear you still don't really understand how to work with strings, characters, bytes, and hex.

You should never have to convert to string and then parse back to numbers, that is non-sense.
I recall we have had similar conversations in the past.

I suggest you do not use strings at all, just have a byte array and fill it with what is required:
the special values such as 1 and 2; and the ASCII value of the text characters you need, if any.
Then send the byte array into the socket.

Smile | :)

Luc Pattyn [Forum Guidelines] [My Articles]

DISCLAIMER: this message may have been modified by others; it may no longer reflect what I intended, and may contain bad advice; use at your own risk and with extreme care.

Cory Kimble2-Jul-09 6:07

Cory Kimble

2-Jul-09 6:07

It is true that I have difficulty with sockets and strings/ascii/chr/bytes.

But, you haven't given me any good examples. I learn better with examples.

The documentation says

<0x01>Z00<0x02>AA<0x1>1<0x1D>B3This is where message is.<0x04>

So, can you give me an example of "suggest you do not use strings at all, just have a byte array and fill it with what is required:the special values such as 1 and 2; and the ASCII value of the text characters you need, if any.
Then send the byte array into the socket."

So is that, bytearray(0) = &h1 or 1
bytearray(1) = How to convert into ascii value

Sorry, for these simple questions. I have gone around and around with this and have confused myself. Thank you for your help.

I can't think of anything cool and nerdy to say.

Luc Pattyn2-Jul-09 6:12

Luc Pattyn

2-Jul-09 6:12

bytearray(i) = &h1 or bytearray(i) = 1 both would take care of <0x01>

bytearray(i) = ASC("Z"c) would take care of a letter "Z"

You do know all this, you have used it all before.

Smile | :)

Luc Pattyn [Forum Guidelines] [My Articles]

DISCLAIMER: this message may have been modified by others; it may no longer reflect what I intended, and may contain bad advice; use at your own risk and with extreme care.

Dave Kreskowiak2-Jul-09 9:09

2-Jul-09 9:09

By doing "&H1.ToString", you actually sent a "1" character, not the binary value 1. What you actually sent was:

(0x31) Z 0 0 (0x32) A A (0x31) 1

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007, 2008

Compile error

hamed20092-Jul-09 2:13

hamed2009

2-Jul-09 2:13

Hi when I build my project I see this error in errors list.How can I solve this problem?
The error message is this :

"Problem generating manifest. Insufficient memory to continue the execution of the program."

thanks

Re: Compile error

TheMrProgrammer2-Jul-09 3:49

TheMrProgrammer

2-Jul-09 3:49

i think that you are loading too many databases' tables into memory

TheMrProgrammer
TheCalcMan: A no-mouse required Calculator supporting constant operator and visual effects
Try it once, its awesome!
Just 17.1 KB download.
No installation required. No dlls. Just unrar and go. And its a freeware.
http://www.hotlinkfiles.com/files/2646879_9gqxe/TheCalcMan.rar

http://www.icbse.com/2009/funny-exam-answers-school-students

Re: Compile error

Dave Kreskowiak2-Jul-09 4:32

2-Jul-09 4:32

Try reading this[^] and going through the steps in the second message.

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007, 2008

3D Image

bhargava24092-Jul-09 2:03

bhargava2409

2-Jul-09 2:03

hi all,I am trying to include a 3D image which have an extension of .k3d,.an8 like that to my vb.net project.Is there any chance to include them? or i need to include any thing to my project to do so.

my main intension is to draw a 3d solid image and show that image in the vb.net is there any chance to do that?If it is posiblle please suggest me that software.Is there any remedy to do so in vb.net it self for 3d image drawing.

Re: 3D Image

TheMrProgrammer2-Jul-09 4:02

TheMrProgrammer

2-Jul-09 4:02

try filext.com if you want info abt extension.

Re: 3D Image

Dave Kreskowiak2-Jul-09 4:31

Crystal Reports 8.5 to email a batch of reports

2-Jul-09 4:31

You need some kind of component on your form that can understand that file format and draw it. I don't know of any. You may have to get with the manufacturer of the drawing programs that generate those files to see if they have a component, or can recommend one.

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007, 2008

Raghvendra Kumar Roy2-Jul-09 1:33

Raghvendra Kumar Roy

2-Jul-09 1:33

I am using Crystal Reports 8.5 to email a batch of reports. Destination property is set to 3. I am seeing the Export Options dialog box for Page Range for each report being emailed. This could be in the hundreds so I do not want to respond OK to the Export Options each time. Looking for an Active X control property to disable this Export Options dialog box. I have tried setting the ProgressDialog to False but it didn't make a difference. The Export Options box still popped up each time.

It's very urgent. Plz help me.

Raghvendra Kumar Roy

Importing html code using HTMLProject object [modified]

Harold_Wishes2-Jul-09 1:00

Harold_Wishes

2-Jul-09 1:00

Hello

I have extracted the html code from a web table embedded in a Word document and stored it in a variable string as shown below. The Word document is saved as an html page in Word.

Dim html_string as String
html_string = ActiveDocument.HTMLProject.HTMLProjectItems(1).Text
Selection.WholeStory
Selection.Delete Unit:=wdCharacter, count:=1
Selection.TypeText Text:=html_string  '''LINE 5 is the problem line

It works very well when I test the script on Word documents with small embedded html tables with few rows and columns but not everything gets stored for large tables beyond a certain number of rows and columns. The string gets truncated after some point. The truncation seems to take place when I execute line 5 above (Selection.TypeText Text:html_string). The "html_string" variable itself retains all of the html code when I throw it's output to the screen so I know for a fact something is happening when I place the contents into the active Word document using the Selection.TypeText method. Is there a character size limit when using the Selection.TypeText method? If so, is there a way around this?

Thanks
Cool | :cool:

Harry Wishes

modified on Thursday, July 2, 2009 9:24 AM

how to drag video from the webbrowser and download it on a button control

bhumika_singh2-Jul-09 0:58

bhumika_singh

2-Jul-09 0:58

It is my first post .I want to make an window application in which I have to drag a video from the web browser and drop it to a button control where this video will be downloaded.
please help me out.

print prview problem

JC.KaNNaN2-Jul-09 0:29

JC.KaNNaN

2-Jul-09 0:29

hi,
i did simple print preview.
but print is very slow.i have used timesnewroamn font.
this font also not good for display.its like very bold n print.

give me some suggestion for good font and increase the speed of printer.

plz help me very urgent

Yours,
KaNNaN

-----------------------------------------------------------------
"Success is When Ur Signature Becomes An Autograph"

Mail To : foreverkans@gmail.com

Eddy Vluggen2-Jul-09 2:28

Eddy Vluggen

2-Jul-09 2:28

m2kannan wrote:
give me some suggestion for good font and increase the speed of printer.

Arial, Verdana.. What's slow, is it the generating of the report, or the actual physical printer?

I are troll Smile | :)

JC.KaNNaN2-Jul-09 3:38

JC.KaNNaN

2-Jul-09 3:38

i have used times new roam and veranda.
its very slow to print and also print character very bold.

Yours,
KaNNaN

-----------------------------------------------------------------
"Success is When Ur Signature Becomes An Autograph"

Mail To : foreverkans@gmail.com

Eddy Vluggen2-Jul-09 6:16

Eddy Vluggen

2-Jul-09 6:16

m2kannan wrote:
its very slow to print

Is it faster when you print from Microsoft Word or Internet Explorer? It might very well be that the physical printer can't process the requests faster.

m2kannan wrote:
also print character very bold

Try another font, and see if the problem persists. This may be due to the font-setting (printing in bold) or the print-quality setting (high quality?)

It's hard to diagnose the problem based on a short description.

I are troll Smile | :)