|
How can we send function keys from VB to a remote terminal server. (F1 - F10 to Telnet server). A general info like key code for function key is also expected.
Thanks, Biju V
-- modified at 2:04 Wednesday 30th November, 2005
|
|
|
|
|
When I used follow codes to do an encrypting/decrypting test in DES,one error occured.Can anyone tell me why?
Imports System.Security.Cryptography
Imports System.IO
Imports System.Text
Dim [Unicode] As New UnicodeEncoding, sKey As String = "12345678"
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim DES As New DESCryptoServiceProvider
DES.Key = ASCIIEncoding.ASCII.GetBytes(sKey)
DES.IV = ASCIIEncoding.ASCII.GetBytes(sKey)
Dim arrbytIn As Byte() = [Unicode].GetBytes(TextBox1.Text)
Dim streamOut As New MemoryStream
Dim desEncrypt As ICryptoTransform = DES.CreateEncryptor
Dim csEncrypt As New CryptoStream(streamOut, desEncrypt, CryptoStreamMode.Write)
csEncrypt.Write(arrbytIn, 0, arrbytIn.Length)
streamOut.Seek(0, SeekOrigin.Begin)
TextBox2.Text = New StreamReader(streamOut, [Unicode]).ReadToEnd
csEncrypt.Close()
streamOut.Close()
'Decrypt code
arrbytIn = [Unicode].GetBytes(TextBox2.Text)
streamOut = New MemoryStream
streamOut.Write(arrbytIn, 0, arrbytIn.Length)
streamOut.Seek(0, SeekOrigin.Begin)
Dim desDecrypt As ICryptoTransform = DES.CreateDecryptor
Dim csDecrypt As New CryptoStream(streamOut, desDecrypt, CryptoStreamMode.Read)
'error occured here
TextBox3.Text = New StreamReader(csDecrypt, [Unicode]).ReadToEnd
csDecrypt.Close()
streamOut.Close()
End Sub
|
|
|
|
|
dyh2222 wrote: error occured here
TextBox3.Text = New StreamReader(csDecrypt, [Unicode]).ReadToEnd
Ok the error occurred here - but what was the error?
If you look up the error message and description in the help files or Google same, it can tell you a lot.
I have not analyzed your code but I'd say that there is something wrong with calling ReadToEnd() during the New operation. Good programming practice would be to create an object of type StreamReader then call its ReadToEnd() method.
...Steve
|
|
|
|
|
Steve Pullan wrote: have not analyzed your code but I'd say that there is something wrong with calling ReadToEnd() during the New operation.
Error message is "Wrong data",but I don't know why.Can you help me analyze the code?Thank you!
|
|
|
|
|
Have you looked this error up in the help files or Google? What does it say, what is the recommended solution? Have you split the code into multiple statements as per my last response?
Obviously something is in the wrong format from that expected. Step through the code and ensure that all parameters are of the correct type for the operation at hand and you get the correct results at each line of code.
...Steve
|
|
|
|
|
I have a window service which have to copy a file from local path to Mapped Drive.
Let say the Map folder is E:\data\ . If i try to create a file to this path with a window form application, everything is working fine. But it can't find the Mapped Drive Folder Path, if i using window service application.
Anyone got any idea on this? Thanks in advance!
|
|
|
|
|
The user under which the service is running does not have the same privileges to the network drive that you are trying to map and hence can't see it.
...Steve
|
|
|
|
|
Hi Steve!
I already grant user everyone, system,service, local service,network service to full control.
Account ServiceProcessInstaller for this service is Local system.
but still can't work , get below error message --Access to the path "E:\" is denied.
Any idea? 
Thanks!
|
|
|
|
|
The Local System account doesn't have rights to see any network drives, even you you grant them. You MUST change the account from Local System to a user account specifically setup to run this service.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Also, there are 2 places for permissions: share permissions, and folder permissions. If the user does not have permissions for the share (set up on the sharing tab when you right click on the shared folder and click properties), they won't be able to access files even if they have security permissions for the folder or files. Although, if Dave is correct (and he usually is) it won't help.
|
|
|
|
|
As far as i remember drive mappings are specific to the user and are stored as part of the users profile. A service generally runs under the system account (so it can still function if no user is logged on). In this case you will need to use the format \\server\sharename to access files on a remote PC.
Jon
|
|
|
|
|
Thanks Dave and Scott. Yes, it's working now with configuration of granted share permission and the service runs under a user account who has the privilege to that mapped folder.
By the way, in what condition, we should assign service's user account to NetworkService, localservice?
Hi Jonathan15! it's still not working if the service runs under local system account, even though using format \\server\sharename.
Thanks, everyone! 
|
|
|
|
|
if the service doesn't runs under DOMAIN user account who has the privilege to that mapped folder, any other ways that we can access to Mapped Folder or Network Drive?
Need guide, Thanks!
|
|
|
|
|
Everyone,
I'm using Crystal Reports that came with VS 2003. I'm using a recordset as the datasource to show for the report. The problem I'm getting is I am getting duplicate records. The data is coming from a PostGres database. What I'm trying to show are transactions for people who prepay to a card. Some people might recharge more than once in a day. When that happens, duplicate records occur. Here is the code to get the recordset.
dim rsReport as New Adodb.Recordset
strSearch = "SELECT c.crd_id, c.membernumber, c.firstname, c.lastname, u.moneyadded, u.dateadded, u.timeadded FROM userbalance u inner join transaction t on u.transid = t.transid inner join card_user c on c.crd_id = t.transcardid WHERE u.dateadded >= '" & dtFrom & "' AND u.dateadded <= '" & dtUntil & "' AND t.transid <> '0' "
strTester = strSearch
With rsReport
.CursorLocation = ADODB.CursorLocationEnum.adUseClientBatch
.Open(strSearch, conConnect, ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockOptimistic)
End With
The code to link recordset to report.
rptMoneyAdded.SetDataSource(rsReport)
rptV1.ReportSource = rptMoneyAdded
rptV1.RefreshReport()
I checked the recordset in a datagrid and it comes out fine. I know about the "SuppressIfDuplicate" but I can't use that because if 2 transactions are back to back by the same person, then the report will supress the second transaction. Any help will be nice. Thanks.
|
|
|
|
|
Try using distinct keyword in the sql query .
abhinav
|
|
|
|
|
Sorry that did not work. Any other ideas?
|
|
|
|
|
Hi
I need to start a connection to a linux box from a VB 6.0 application? Is it possible at all? If yes, how? I tried looking at the Winsock API but couldn't gather how to use it?
Thanks
|
|
|
|
|
You going have to be more specific. What are your tring to connect to? How are you tring to connect? Is it a database, shared folder?
|
|
|
|
|
I just want to start a shell on a linux machine where i can type in commands to do stuff. I should be able to see the results of those commands and any error messages.
Thanks
|
|
|
|
|
I have a DropDownList and a Button on a form. The user selects an item from the DropDownList and clicks the button. I want to check the text value of the DropDownList in the Button_click event with the following code.
If Me.DropDownList1.SelectedItem.Text = "" Then
' do something
End If
But no matter what item I select in the DropDownList Me.DropDownList1.SelectedItem.Text always equals "". How can I get the text value of the item selected?
|
|
|
|
|
Most probable cause - your Page_Load is setting a data source for the drop down, and is doing it every time ( which resets the selection ). You should do this in Page_Prerender anyhow, but either way, it shoud be in a block to make sure it only happens with IsPostback = false
Christian Graus - Microsoft MVP - C++
|
|
|
|
|
|
I need to do an "AND" statment in my selection formula
CrystalReportViewer1.SelectionFormula = "{events.ddate} = " & (moddate) & "" And "{child.name} = '" & (modname) & "'"
each formula works on its own but when I run them togther I get an error about child.name can not be converted to a long
I have also tried
CrystalReportViewer1.SelectionFormula = "{events.ddate} = " & (moddate) & "" & "{child.name} = '" & (modname) & "'"
That gives me an error that say "The rest of the statement does not look apart of the formula"
HELP!
1. Out of clutter, find simplicity.
2. From discord, find harmony.
3. In the middle of difficulty lies opportunity.
Albert Einstein
three rules of work
|
|
|
|
|
Hi all;
I am not expert in vb.net so
I need Tutorial or source code to open
web cam on vb.net form (application)
and capture picture form it and save
it ofcourse as bitmap image.
I searched and I didnt found any thing.
THANKS
AMR-CIS
|
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
