|
vincentkhoosiongleng wrote: I want to retreive all the table name out.
If you are using SQL Server 2000, you can query table sysobjects.All user tables have the type column = 'U'
vincentkhoosiongleng wrote: I also want to retreive the fields name
You can query syscolumns based on the ids of the tables you retrieved from queyring sysobjects
|
|
|
|
|
hi i want to build desktop application that should stay alligned on to position of the screen just as taskbar stays on bottom with the ability to autohide after some definate time and ability to cover desktop area as well ... i want if any can help me give any example how to build such a an application or find me on the web... any help will be much appreciated !!! Thanks a lot;)
Do Not Follow Where The Path May Lead.
Go Instead Where There Is No Path; and leave a Trail
|
|
|
|
|
Found a nice article here at CP written by Neil Yao that handles the docking and auto hiding. It's in C++ so you could convert it to vb or just us the dll. CAppBar[^]
|
|
|
|
|
Hey all,
I have the folling code to post data to a php page. However, I'd like to retreieve the response from this page after the posting and save it to a file. The response should just be plain-text XML. (IE, it'll echo out an XML file in plain text as the source). Is there a way to use something like the downloadstring(URL) on this AFTER posting up the data, in order to capture the response?
Thanks,
Mike
Public Function PostToWebUpdate(ByVal postData) As Boolean<br />
Dim Client As WebClient<br />
Try<br />
<br />
Dim dataBytes As Byte() = Encoding.ASCII.GetBytes(postData)<br />
<br />
Client = New WebClient<br />
Client.Headers.Add("Content-Type", "application/x-www-form-urlencoded")<br />
Dim returnedBytes As Byte() = Client.UploadData("http://www.mysite.com/folder/file.php", dataBytes)<br />
<br />
Dim myResponse As String = New String(Encoding.ASCII.GetChars(returnedBytes))<br />
<br />
Return myResponse = "SAVED"<br />
Catch ex As Exception<br />
MessageBox.Show("Error: PostToWeb: " & ex.Message)<br />
Return False<br />
Finally<br />
Client.Dispose()<br />
Client = Nothing<br />
End Try<br />
End Function
Gaming at the GuildofBlades.com is the only way to really experiece the level 99 Soul-Sucking Sword!
|
|
|
|
|
|
alexrad wrote: WHAT WAS OR IS MY MISTAKE
YOU'RE YELLING! Quiet down...
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
|
As you have been repeatedly told, but don't seem to get the idea yet. TYPING EVERYTHING IN CAPS MEANS THAT YOU'RE YELLING AT THE TOP OF YOUR LUNGS! DON'T...do it...
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
Why are u yelling, it can harm people?
|
|
|
|
|
Your probably didn't make one. It's one of those little quirks that doesn't have an explanation. Though, that may change with the release of SP1 for Visual Studio .NET 2005.
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
Thangs Dave, i will no more yell,but those things
are too much for 2 in the morning
|
|
|
|
|
I would like to be able to know when a key is pressed within my application. I've been looking at different options and came across keyboard and mouse hooks. The examples I've seen (unfortunately for me written in c#) seem to only be for global hooks. I'm not interested in what happens outside of the program I'm writing, just when the program is active should it listen for a keypress. It would be nice if it didn't matter which control had the focus either. The idea is to create a commandline that becomes activated instantly when a certain key is pressed.
I'm not sure if hooks are the right direction to go for this or perhaps there is something simpler that I can use.
Any help would be greatly appreciated.
Thanks,
David
|
|
|
|
|
You don't need a global hook for this. All you have to do is set the Form's KeyPreview property to True, then handle the Form's KeyDown event. It'll give you all the keystrokes going to that form, even it's child controls, before the controls see the keystroke.
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
Hi,
Are there any good, methods of creating a routine in an application, making the application trialware, until a key code has been entered. Must stop application running after x uses or x days after original install date.
Thanks, Andrew Robinson.
|
|
|
|
|
If your familiar with the settings in properties you could have a boolean for first use, when the program is first run set to false and set another setting to the current date, then each time the program is run check that date and compare.
Both of these settings could then be made redundant by a boolean setting that is set to true when registered. Sorry about not providing code, but this might give you a start.
Posted by The ANZAC
|
|
|
|
|
With one of my applications I have an encrypted file named "Activation.dat". This file contains 3 lines of code.
{ProgramEdition}
{Time activation file created - day of year)
(days left of the trial period)
When the program starts in the main procedure I read in all this data and make sure that the days left not equal to less than 0 and that the day of year is not before the current date of the computer. If the file is missing or the days left is less than 0 then I write to the days left field 'expired'. The program will then fail to execute. This is a very basic form of trial protection that I am using in the beta release of one of my pieces of software, I will be updating it but this is what I have right now. I would suggest a strong encryption procedure, I use a OneTimePad rolling encryption algorithm, but algorithms like RSA, DES, Rijndael should be sufficient.
For further protection you can also have the software end on a particular date.
Regards,
Thomas Stockwell
Programming today is a race between software engineers striving to build bigger and better idiot-proof programs, and the Universe trying to produce bigger and better idiots. So far, the Universe is winning.
Visit my homepage Oracle Studios[ ^]
|
|
|
|
|
i have cretaed one blank report and i have placed one textobject now i want to connect to database how to do it?
|
|
|
|
|
|
CR HAVE MANY OF SOURCE OPTIONS
IN FIELD BROWSER U CAN SPECIFIED A PLANTY OF SOUCES
I USE DATATABLE FROM DATASET WICH IS, BY SOME ADAPTER, FILLED FROM DATABASE
FIRST CREATE STORED PROCEDURE TO FILTRATE DATA
WRITE SOME CODE FROM FRONT END TO FILL DATATABLE USING DATAADAPTER IN, FOR EXEMPLE, BUTTON'S CLIK EVENT
THEN CONNECT WITH CR
....
|
|
|
|
|
Hi all,
Can anybody please send me the code of how to write into a file.
Thank you.
|
|
|
|
|
How about something a little more usefull[^].
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
Lets say you wanna write data into binary file. Make sure you already convert the data into byte array (in this examples: StreamByte()). And if you;re using vb 2005, use this a line code to write to file.
My.Computer.FileSystem.WriteAllBytes("C:\MyData.dat", StreamByte, True)
Set the last argument to False if you want to append the file. It means, you can add more bytes chain into the same file.
And if you wanna read your data, use this one
Dim StreamByte As Byte() = My.Computer.FileSystem.ReadAllBytes("C:\MyData.dat")
hope this helpful.
|
|
|
|
|
How do I fix this error.
Pls I have the following code as a method in a class.
Public Function adminlevel() As Dataset<br />
Dim adminsql As String = "Select * from userlevel"<br />
Dim admindata As New SqlClient.SqlDataAdapter(adminsql, con)<br />
Dim adminset As New DataSet<br />
con.Open()<br />
If con.State = ConnectionState.Open Then<br />
admindata.Fill(adminset, "userlevel")<br />
<br />
admlevel = adminset.Tables("userlevel")<br />
<br />
con.Close()<br />
'Catch ex As Exception<br />
' MsgBox(ex.Message)<br />
'End Try<br />
Else<br />
MsgBox("No Connection")<br />
End If<br />
Return admintable<br />
End Function<br />
<br />
<br />
//at form end I have following code to bind combo box cboUser to a databse field.Stepping thru the code line cbouser.displaymember="levelname" returned the error after the code.<br />
<br />
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load<br />
Try<br />
Dim myuserlevel As New Underwriter.Underwriter<br />
Dim load As New DataTable<br />
load = myuserlevel.adminlevel()<br />
cboUser.DataSource = load<br />
cboUser.DisplayMember() = "levelName"<br />
cboUser.ValueMember() = "levelname"<br />
Catch ex As Exception<br />
MsgBox(ex.Message)<br />
End Try<br />
<br />
End Sub<br />
<br />
the error returned is below:<br />
Could not bind to the new display member <br />
Parameter: newDisplayMember
Fikunmi Feyijin
Hicad Systems
Nigeria
|
|
|
|
|
You might want to step through your Form1_Load code and watch the load variable to see what it contains after the load = myuserlevel.adminlevel() line. Make sure it contains a DataTable with the correct column names. Somehow, I doubt it, especially after looking at the code of your adminLevel method. What is admintable and where was it defined? I notices that you're assigning adminLevel a supposedly filled DataTable, but then you go and return a different variable, namely admintable, to the caller. Which is it?
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
Hi dave,
Thanks, the way I referenced the column names was wrong. The System is case sensitive. All I did was to ensure the correct casing of the column names in the database
So my system now works.
Fikunmi Feyijin
Hicad Systems
Nigeria
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
