|
I'm about to rip Microsoft's balls off and shove them down their throat -- except MS doesn't have a pair!
This next symptom has me thru the roof!
If (expression) Then
(statements)
Else
(statements)
End If 'WTF - it breaks EndIF into two words End and If and i can't even save it as 1 word
|
|
|
|
|
john john mackey wrote: 'WTF - it breaks EndIF into two words End and If and i can't even save it as 1 word
That's because in VB syntax the end of an if block is End If not EndIf.
|
|
|
|
|
john john mackey wrote: This next symptom has me thru the roof!
That's because the End keyword works with other stuff, not just If , like End Sub , End Function , End Select , ...
john john mackey wrote: WTF - it breaks EndIF into two words End and If and i can't even save it as 1 word
If a single space character is driving you this nuts, you've got other issues to worry about...
|
|
|
|
|
I still want to feed MS their own body parts!
I guess I'm gonna reinstall. my latest complaint about my Access 2007, VBA is that when i (mistakenly) issued a search for a word while there were no code windows open, the VBA editor got frozen and was unresponsive to Cancel, any menu commands, and the Hour Glass icon just remained persistent.
So reinstall is what I think i will try next. I don't know what updates hosed over my Access, but now i'm just pissed.
the biggest annoyance/problem is:
defining variables, such as
dim bMyVar as Boolean
but having it appear as
dimbMyVar
dimb MyVar asBo
dim
MyVarasBo
|
|
|
|
|
yes, it does, and yet "Endif" (without space) is a reserved keyword and cannot be used as an identifier, e.g. for naming a variable. That is very basic for VB users.
|
|
|
|
|
Yeah, I was wrong on the whole "EndIf" "End" dilema. Sorry.
However, my problem was that Intellisense (or auto-complete, context-sensitive help) was all screwy in my VBA code so much so that I couldn't work
1. if i type to slow, the cursor jumps back to the end of the last character, removing spaces and as you can see, trying to define variables would run type and variable name together. :mad:
2. if i try to look up a property for an object, the list would disappear all too quickly. :confused:
Does this call for a re-install of Access 2007?
|
|
|
|
|
john john mackey wrote: Does this call for a re-install of Access 2007?
if it hinders your work continuously, I would certainly give that a try, without hoping too much.
I only ever did one Access+VBA project, more than 10 years ago; it was a simple application, about 3 forms, simple logic; I stumbled on dozens of bugs, each requiring newer versions, fixes, workarounds. I got it to work after lots of trouble, so I try not to do another one any time soon.
Good luck though.
|
|
|
|
|
how to add super script and subscript in VB and in SQL table?
|
|
|
|
|
with code.
See how much it sucks to get a vague, generic answer?
That's how it feels to see your vague, generic question.
|
|
|
|
|
If you know the answer just tell me. or else just leave it . I didn't beg u to answer my question. While writing code i had problem so only asked. Is there any rule that we should not ask simple questions?
|
|
|
|
|
He would if your question was answerable. Since you're leaving out critical details about what you are doing, it's impossible to answer your question.
|
|
|
|
|
Well.. funny you should ask, the rules[^], specifically number 2, actually kind of say yes, you should not ask vague, unanswerable questions.
|
|
|
|
|
No VB.Net code editors support super/subscript (or VB for that matter, but who cares about extinct languages).
SQL certainly does not support them either.
Maybe you could be more precise here. Are we talking about rendering to HTML? RTF? a Word Doc?
|
|
|
|
|
Hi everyone, I have a matrix and I need to add the money earned this year and past years. However, I must remove the money spent in past years. I must have the separate amount per year and the total of these amounts. This is what gives my matrix:
Year
= Fields!Year.value =formatnumber((sum (Fields!Results.Value)) - (sum (iif (Fields!
Year.value < Parameters!ChoosedYear.Value, fields!Moneyspent.value,
0))), 2) & "$"
However, the subtotal gives me an error. What should I do?
P.S.: I already found that the subtotal gives me an error because it's not in the scope of the rowgroup1, but is there a way to get the scope in the subtotal? or can anybody find another way to do it?
modified on Monday, March 22, 2010 3:33 PM
|
|
|
|
|
Hello to All,
Is it possible to hide Font Bold Propery from FontDialog.
Thanks
If you can think then I Can.
|
|
|
|
|
You can't
If you just want to offer the different fonts without styling and sizing etc. how about just showing a combo box with the list of installed fonts?
e.g.
Dim installedFonts as New System.Drawing.Text.InstalledFontCollection()
For Each family As System.Drawing.FontFamily In installedFonts.Families
me.comboBox1.Items.Add(family.Name)
Next
|
|
|
|
|
Thanks for reply.
I agree with your suggesion. But i want to do with fontdialog.
If you can think then I Can.
|
|
|
|
|
There are no options to turn off any of the controls in the dialog.
|
|
|
|
|
I am trying to insert data into SQL Server 2008 table using vb.net. When I try to insert the data I get the error "OleDbException was unhandled" Incorrect syntax near 'Name'. The code line MyCommand.ExecuteNonQuery is highlighted when the error is thrown. I can't find anything wrong. Can someone please help me out? Here is my code:
Dim myConnection As New OleDb.OleDbConnection<br />
myConnection.ConnectionString = "Provider=SQLNCLI10;Server=S10615-10\SQLEXPRESS;Database=Assessment; Trusted_Connection=yes;"<br />
<br />
Dim myCommand As OleDb.OleDbCommand<br />
Dim strOleDb As String<br />
<br />
myConnection.Open()<br />
<br />
strOleDb = "INSERT INTO AssessmentPage1 (Client Name, DOB, Medical Records #, Medicaid Number, Consumer's Name, Medicaid #, Consumer's ID, Clinicians, Parents/Guardians Name, Address, Clinicians(1), Phone Numbers, Date or Referral, Date of Assessment, School Name/Address/Phone #, Identifying Information, Presenting Problems, Referral Information) VALUES(" & TextBox1.Text & "," & TextBox2.Text & "," & TextBox3.Text & "," & TextBox4.Text & "," & TextBox5.Text & "," & TextBox6.Text & "," & TextBox7.Text & "," & TextBox8.Text & "," & TextBox9.Text & "," & TextBox10.Text & "," & TextBox11.Text & "," & TextBox12.Text & "," & TextBox13.Text & "," & TextBox14.Text & "," & TextBox15.Text & "," & TextBox16.Text & "," & TextBox17.Text & "," & TextBox18.Text & ")"<br />
<br />
<br />
myCommand = New OleDb.OleDbCommand(strOleDb, myConnection)<br />
myCommand.ExecuteNonQuery()<br />
<br />
'Close and clean up objects<br />
myConnection.Close()<br />
myCommand.Dispose()<br />
myConnection.Dispose()
|
|
|
|
|
That looks terrible. You should:
1.
show code in PRE tags (not in CODE tags); better formatting, better readability.
2.
give real names to all your variables and controls; a bunch of numbered textboxes is awful.
3.
not directly stuff user input into an SQL statement. Google "SQL injection" and start using parameterized SQL.
[ADDED]
4.
when you don't use parameterized SQL, then stuff string and datetime literals in appropriate delimiters.
[/ADDED]
Furthermore, I discourage the use of whitespace and special characters in database field names.
|
|
|
|
|
Looks like your field names contain spaces? e.g.
fresh1207 wrote: Client Name
I think you need to enclose these in square brackets to be handled correctly...
[Client Name]
I think it is better to use underscore instead of space or to use no space and use TheLikesOfThis
|
|
|
|
|
Thank you guys for the help. I got rid of the previous error but now I am getting the error "Invalid column name for all of my text fields. But when I enter numbers into all of the textboxes the data inserts into the database perfectly. Any ideas?
|
|
|
|
|
|
I don't think the ' is valid for example Consumer's Name is not a valid column name in your MySQL table
Steve Jowett
-------------------------
Real programmers don't comment their code. If it was hard to write, it should be hard to read.
|
|
|
|
|
Yes I have already removed the ' from the column names. I removed the spaces also. But I am still getting the error "Invalid column name". I only get the error for the fields I put letters in. I don't get the error for the numeric fields. Again, when I enter numbers in all of the fields, the insert works fine. The data type is set to VARCHAR for all of the columns so the field should accept letters also. I don't know wha the problem is. Here is my code as modified from the previous post:
Dim myConnection As New SqlClient.SqlConnection
myConnection.ConnectionString = "Data Source=S10615-10\SQLEXPRESS;InitialCatalog=Assessment;Integrated Security=SSPI;"
Dim myCommand As SqlClient.SqlCommand
Dim strSQL As String
myConnection.Open()
strSQL = "INSERT INTO AssessmentPage1 (ClientName, DOB, MedicalRecords, MedicaidNumber, ConsumersName, MedicaidNumber1, ConsumersID, Clinicians, ParentsName, Address, Clinicians1, PhoneNumbers, DateofReferral, DateofAssessment, SchoolName, IdentifyingInformation, PresentingProblems, ReferralInformation) VALUES(" & TextBox1.Text & "," & TextBox2.Text & "," & TextBox3.Text & "," & TextBox4.Text & "," & TextBox5.Text & "," & TextBox6.Text & "," & TextBox7.Text & "," & TextBox8.Text & "," & TextBox9.Text & "," & TextBox10.Text & "," & TextBox11.Text & "," & TextBox12.Text & "," & TextBox13.Text & "," & TextBox14.Text & "," & TextBox15.Text & "," & TextBox16.Text & "," & TextBox17.Text & "," & TextBox18.Text & ")"
myCommand = New SqlClient.SqlCommand(strSQL, myConnection)
myCommand.ExecuteNonQuery()
myConnection.Close()
myCommand.Dispose()
myConnection.Dispose()
|
|
|
|
|