I've created a script to toggle user access to Group Policies on and off. Keeps giving me an "Expected IF" error on line 107. I've played around with all kinds of stuff. Still confused.
[Code]...
I am setting a value in the registry like this[code]...
Problem is, if opensubkey would return nothing. Then .GetValue will throw an exception, obivously.[code]...
I'm getting this error from Moq via NUnit, and it doesn't make much in the way of sense to me. "Expected invocation on the mock at least once, but was never performed: x => x.DeleteItem(.$VB$Local_item)"
[Code]...
Error is coming Registry Access is not allowed.While Opening a Key.
Code:
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
NewDelete("HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionRun", "Sonia")
End Sub
[CODE]...
im trying to make a vb 2010 program to startup with windows with that is the user choice and i have got this code from the net:
[Code]...
i havent got a clue on why its opening on the wrong path at startup, but if i close the app and i open it manually by its desktop icon everything is fine again :S
I want to change this registry setting in windows vista and 7 ("HKEY_LOCAL_MACHINESYSTEMCurrentControlSetservicesUSBSTOR","Start",4) by clicking a button.[code]how do i change ("HKEY_LOCAL_MACHINESYSTEMCurrentControlSetservicesUSBSTOR","Start") value to 4..How do i request administrative privilages for my aplication to change registry setting when it starts?
View 6 RepliesIn Windows 7 you can pin a program to the taskbar so it appears like a quicklaunch item. In my program I need to get a list of all the programs that are pinned to the taskbar. Does anyone know how I can do this programatically, either through an API call or through a registry setting?
View 3 RepliesVB.net code for .aspx page
Dim header As String
Dim footer As String
Dim margin_left As String
[code].....
I have setup in the registry editor in VS 2008 to create a key and string value.. I see the property for a condition. I want to have a setup screen that asks what location the client will be installed in and create registry value based on that..
on setup i have a dialog for 2 radio buttons..
button1 & button2
value 1 = Houston value 2 = New Orleans
Select location. * New Orleans * Houston
I am a newbie so please forgive me if my terminology is incorrect.I am trying to Update a Registry sub key value. I have done this a few times before with success. But this time is kinda different. I noticed a few things,like the sub key value is in HEX when I export the key (The value that I want to input is from a sub key that I exported) I can only get the registry to accept the command if I do not specify the registry value kind, but that doesn't do me any good if its not the correct value kind.
[Code]...
I have a statement 'ptr.Line((xmin, ymin) - (xmax, ymax), B)' which was originally coded in VB 6.0. Could anyone tell me why this code is now throwing an error in VB.NET?
View 6 RepliesI keep getting that error with this code
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Mail As New MailMessage
Mail.Subject = ""
Error occurs at the line above.
Dim SMTP As New SmtpClient("smtp.gmail.com")
SMTP.EnableSsl = True
[code].....
ODBC_COM = New OdbcCommand("UPDATE President SET '" & President_UPDATE_field.Text & "'='" & President_UPDATE_text.Text + "'", ODBC_CON)
ODBC_COM.ExecuteNonQuery()
i dont know why im having error like this, what i know is my syntax for UPDATE command is correct and im using correct number of single quotes and double quotes?
I'm simply trying to create an array of integers:
Dim amenities() as Integer
amenities=New Integer(){1,2,3,4,5}
And I'm getting this error:
Expected end of statement
Dim amenities() as Integer
It says the error is happening on "as", but I have no idea what I'm doing wrong.
Everywhere text is in Black i get the error "Type Expected"
Private Sub Done(ByVal sender As Object, ByVal e As Windows.Forms.WebBrowserDocumentCompletedEventArgs)
TabControl1.SelectedTab.Text = CType(TabControl1.SelectedTab.Controls.Item(0),
[code]....
Have not used JavaScript for a while. Just started to review JavaScript in order to learnASP.net Ajax. The coding below showed the underline errors over the first showclock() and the following { -- Expected ';'After adding all the ';' the underline errors were still there The webpage just showed an empty form and an '>'What's wrong with the JavaScript coding?
<html xmlns="http://www.w3.org/1999/xhtml"><head><title>2-1</title><script type="text/javascript">var hour, min, secfuction showclock() {now=new Date(); hour=now.getHours();if(hour<=9) hour="0"+hour; min=now.getMinutes();if(min<=9) min="0"+min;s
[code].....
i am getting this error
Error1')' expected.I:\Documents and Settings\nick\Local Settings\Application Data\Temporary Projects\web brower\Form1.vb27112web brower
error is on this line
Private Sub browse_done(ByVal Sender As Object, ByVal e As Windows.Forms.WebBrowserDocumentCompletedEventArgs
i have close it so its like
Private Sub browse_done(ByVal Sender As Object, ByVal e As Windows.Forms.WebBrowserDocumentCompletedEventArgs)
but then it says the code under it is wrong here it all my code
Public Class Form1
Dim i As Integer = 0
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles
[code].....
I set the font size and style using Vb code as i'm designing a Notepad like application, and when i start a new form i want to reset all the settings. Everything else is working, i'm just having a hard time working these out.
View 4 RepliesIm getting a build error with the following code...
Private Property GridViewSortDirection() As String
Get
Return If(TryCast(ViewState("SortDirection"), String), "ASC")
End Get
[CODE]...
It is happening on the following line...Return If(TryCast(ViewState("SortDirection"), String), "ASC")
Error returns...Error 11 C:inetpubwwwrootTPSupportmainUserControlsgrid.ascx.vb(192): error BC30201: Expression expected.
Its a convert from c#
private string GridViewSortDirection
{
get { return ViewState["SortDirection"] as string ?? "ASC"; }
set { ViewState["SortDirection"] = value; }
}
I have a new application that i am trying to release on my desktop but after it installs it pops up the Cannot Start application dialog window with application cannot be started. contact the application vendor inside the msgbox. Details...> ERROR SUMMARY Below is a summary of the errors, details of these errors are listed later in the log.
* Activation of C:Usersus0TB732DesktopTE2.0_DebugTEAuto.application resulted in exception. Following failure messages were detected:+ Value does not fall within the expected range.
But the crazy part is if i release the same program no changes to the code on my laptop i have no problems with it what so ever. Before you say it i cant just keep using my laptop because i dont like having my personal laptop at work.
i'm using VB.Net 2005 application program.i'm trying to convert VB6 code to VB.Net 2005. QSockB is DLL file.this is the code i used for VB6. This is code i'm using to create socket, when program runs... and when i hit start button it calls Q_SendHeader function.[code]This works fine in VB6... but Q_SendHeader is not working in VB.Net 2005.
View 7 RepliesI have just made a few changes to an old project I was working on, and now when I try to view the designer, I obtain this error: Value does not fall within the expected range.
Call Stack:
at EnvDTE80.CodeModel2.DotNetNameFromLanguageSpecific(String LanguageName)
at Microsoft.VisualStudio.Design.Serialization.CodeDom.VSCodeDomParser.CodeTypeDeclarationFromCodeClass(CodeClass vsClass)
at Microsoft.VisualStudio.Design.Serialization.CodeDom.VSCodeDomParser.Parse(TextReader codeStream)
[code]....
Instances of the error are 1.
I get the following error at run time Lab_Sz_Desktopt ',' expected.Her's my code:
Public Class Calculate
Dim Label1, Label2, Label3, Label4, Label5, Label6, Label7, Label8, Label9, Label10, Label11, Label_Total _
As String
[code]....
In this line of code ".lim" is underlined and the error is that an End Of statement is expected,i wrote End Of at the end of teh code and the error did not dissappear.
Dim FileName As String = lsp ".lim" 'string containing the file name.
If you're not living on the edge, you're taking up too much room
[Code]....
This is the compiler error BC30201: Expression expected. The line that caused it is the Dim sw line.
I keep getting the 'Object Expected' error within my page script when I click the button.I've debugged using fire-bug and the id passed to the JavaScript method is the correct id and document.getElementById(a) finds the button. The error keeps occurring in the _doPostBack. Can this be caused because the button is inside a modal popup in a gridview cell, and the gridview is inside a update panel. The reason I'm still using the JavaScript is the Post-Back event in the GridView.RowCommand did not occur without this.
The code:
function addAcc(a) {
var btn = document.getElementById(a); //get the button, not necessary but safer
alert(a); //To see the button id
[code]....
Having problem understanding Delegate error. Error says expression expected, How do I fix?Here is the offending line (#259)....
mylist.ForEach(Delegate Function(P As linkItem) As System.Char[] )
Here is the entire code.
<script language="VB" runat="server">
Function sectionTitle(ByRef f As String)
'Open a file for reading
[code]....
I've made some function that generates an email template. Code it generates is pure HTML with CSS. Problem is compiler does this odd error and highlights each time '#' sign appears which is needed to define colors in CSS. I did try to change '#' to '/pound/' and then string.Replace() on RETURN but no luck. I'm more into C# so there i can escape special characters by using '' before them but something f$#$ed up there... Once i remove '#' all back to normal and compiles well.
View 2 RepliesI got an error "Expression expected". The error occurred in ThreadID1 = GetWindowThreadProcessId(GetForegroundWindow, ByVal 0&) ThreadID2 = GetWindowThreadProcessId(hWnd, ByVal 0&) I am using vb.net 2008 express.
[Code]...
I was wondering if you could assist me with this line of code when am entering the under scroll it says identifier expected.Private Sub btnSearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSearch.Click
Dim record = (From line In IO.File.ReadAllLines("test.txt") _ Let fields = line.Split(","c) _ Select New With { _
.drawer = fields(0), _ .number = fields(1), _ .title = fields(2) _ }).Where(Function(r) r.title = TextBox3.Text).FirstOrDefault