|
Yes the TSQL is malformed. Lookup the DATEDIFF() and GETDATE() functions in the SQL Books Online (or Google them - it'll be faster).
BTW, is this 'online dating' service you are writing a commercial venture or just something you are playing around with?
...Steve
1. quod erat demonstrandum
2. "Give a man a fish and you've fed him for a day. Teach him how to fish and you've fed him for life." I read that somewhere once 
(Translation: I'll show you the way, but not write the code for you.)
|
|
|
|
|
Yeah i am building one but not to play around. once the site is fully functional i might deploy it and show them to potential buyers can you please tell me why u asking me? happy to answer honestly.
|
|
|
|
|
I'm asking because quite frankly the type and number of questions you are asking about programming indicate that you have little experience doing so.
This in itself is not a problem as we all had to start somewhere, but if you are building an app for commercial use - whether for an employer or for sale to potential customers - you really should be reading up more on the tools you use to construct it. BTW are there not too many 'dating websites' out there already (i.e. what makes your application more attractive to potential clients than those already on the market)?
Many of the questions so far would have quite easily been solved with a brief reading of the relevant parts of said manuals - which are provided with Visual Studio and are freely searchable online.
This is the reason that I have been a bit short in my answers to your questions. I firmly believe that one should exhaust all other avenues for resolution before posting on this board. You are by no means "Robinson Crusoe" and others have also trod this same line. If I, or anyone else, simply posts the answer, you'll never get the experience of researching it for yourself.
My aim is to help people help themselves wrt programming - hence my signature lines.
All the best in your venture.
...Steve
1. quod erat demonstrandum
2. "Give a man a fish and you've fed him for a day. Teach him how to fish and you've fed him for life." I read that somewhere once
(Translation: I'll show you the way, but not write the code for you.)
|
|
|
|
|
I am new to using delegates and am getting "Error Binding To Target Method" error on the CreateDelegate line. What am I doing wrong? Thanks in Advance.
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim sTest As String = "MyTest"
Dim test As ToolStripMenuItem
Dim currentType As Type = Me.GetType
Dim method As MethodInfo
Dim delTest As [Delegate]
method = currentType.GetMethod(sTest)
If Not method Is Nothing Then
MsgBox(method.Name)
delTest = CreateDelegate(GetType(EventHandler), method)
test = New ToolStripMenuItem("Testing", Nothing, delTest)
Else
test = New ToolStripMenuItem("Testing")
End If
MyBase.mnuMain.Items.Add(test)
End Sub
Public Sub MyTest(ByVal sender As Object, ByVal e As EventArgs)
MsgBox("testing")
End Sub
|
|
|
|
|
This isn't working because, for some reason, MyTest's signature doesn't match the signature of EventHandler.
You'll run into another problem after that one's fixed. The method you're binding the delegate to must be a Shared method (Static in C#).
Imports System.Reflection
Imports System.Delegate
.
.
.
Public Shared Sub MyTest(ByVal sender As Object, ByVal e As EventArgs)
MsgBox("Testing...")
End Sub
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
|
Hi Below is my query that i am trying to run
-------
SELECT ProfileID FROM profiles WHERE ProfileStatusID=2 ORDER BY ProfileID DESC LIMIT 0, 3;
-------
ms sql server doesnt understand limit so i dont know how can i modify my query which gives me same result. many thanks in forward.
robin
|
|
|
|
|
The amount of questions you are posting on this board show that you really should RTFM a whole lot more.
Simple really - use the SELECT TOP function. You'll find a reference to it in the SQL Books Online (you ahve installed them havn't you) 
...Steve
1. quod erat demonstrandum
2. "Give a man a fish and you've fed him for a day. Teach him how to fish and you've fed him for life." I read that somewhere once
(Translation: I'll show you the way, but not write the code for you.)
|
|
|
|
|
what is RTFM? i know selecting top rows but i was just confused whether it produces the same effect as it did by mysql.
|
|
|
|
|
RTFM[^] on Wikipedia...Enjoy! 
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
HOW TO INSERT A THUMBNAIL INTO DATAGRID OF PICTURE FROM A PICTURE BOX IN WINDOWS APPLICATION
VIJAYKUMAR.N.S
|
|
|
|
|
First, STOP YELLING!
Second, you haven't specified anything about your datasource or how you're populating this DataGrid.
You might want to look at this[^] to see if it fits your needs. The code is in C#, but is easily convertible to VB.NET.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
This code always results in a file in use error (error 57):
Sub DelPic(ByVal filename As String)<br />
<br />
Dim fi As New FileInfo(filename)<br />
If Not fi.Exists Then Exit Sub<br />
Try<br />
fi.Delete()<br />
Catch ex As Exception<br />
MsgBox(Err.Source & " caused an error of type " & Err.Number)<br />
End Try<br />
<br />
End Sub
No other programs are running, all files are closed and file.attributes shows normal.
What am I doing wrong?
|
|
|
|
|
See this[^] post for what's causing your problem and the solution...
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
application.exit does not appear to do anything - is there another way to cancel a running process and kill the application?
|
|
|
|
|
If you spawn other threads to do work in your app, you have to shut them down before your app will actually exit.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Hello everyone
i'm working on a project where i want to get a file from a remote Pc via telephone network.
my way to transfare the file is the remote pc to open the file as binary and reads a number of bytes and then send them.
the problem i'm facing is the number of bytes to read from the file.
i'm using currancy type in reading from the file because it can hold 8 bytes
i need to know how can i declare a variable that can hold mor than 8 bytes (50 bytes for example)i also want to know how can i make a processing on these bytes like making an error check procedure or adding sum bits to them.
note: the strig type didnit work with me
|
|
|
|
|
You need to create a byte array.
Christian Graus - Microsoft MVP - C++
|
|
|
|
|
Hi,
I run a query below, but I don't know what the data is. How canI show the result of the query into a textbox?
Thanks a lot.
MyQuery7 = "SELECT Top 1 JOBACTIV.[STARTDATE] FROM [JOBACTIV] WHERE [MFRNAME] LIKE ('" & txtManufacturer.Text & "*') AND [SUPADDR3] LIKE ('" & txtAddress2.Text & "*') UNION ALL SELECT Top 1 JOBARC.[STARTDATE] FROM [JOBARC] WHERE [MFRNAME] LIKE ('" & txtManufacturer.Text & "*') AND [SUPADDR3] LIKE ('" & txtAddress2.Text & "*') ORDER BY 1"
|
|
|
|
|
All you've done here is define a query as a string. This does not give you any data, or even call the database.
Christian Graus - Microsoft MVP - C++
|
|
|
|
|
Don't start a new thread for follow-ups.
---
b { font-weight: normal; }
|
|
|
|
|
Hi,
I'm trying to query 2 data (in forms of date) from 2 tables in MS Access. Then from those 2 date, I will compare and get the earliest date.
I tried the code below, but the problem is that if one of the query doesn't have the data, they couldn't make the comparison and could not display the other data. How can I fix this?
Thank you very much.
MyQuery7 = "SELECT Top 1 JOBACTIV.[STARTDATE] as strdt FROM [JOBACTIV] WHERE [MFRNAME] LIKE ('" & txtManufacturer.Text & "*') AND [SUPADDR3] LIKE ('" & txtAddress2.Text & "*') ORDER BY JOBACTIV.[STARTDATE]" <br />
<br />
MyQuery8 = "SELECT Top 1 JOBARC.[STARTDATE] as strdta FROM [JOBARC] WHERE [MFRNAME] LIKE ('" & txtManufacturer.Text & "*') AND [SUPADDR3] LIKE ('" & txtAddress2.Text & "*') ORDER BY JOBARC.[STARTDATE]" <br />
<br />
Set rs7 = db2.OpenRecordset(MyQuery7) <br />
Set rs8 = db2.OpenRecordset(MyQuery8) <br />
<br />
If rs8.Fields("strdta") < rs7.Fields("strdt") Then <br />
txtSupStartDate.Text = rs8.Fields("strdta") <br />
Else <br />
txtSupStartDate.Text = rs7.Fields("strdt") <br />
End If <br />
<br />
rs7.Close <br />
rs8.Close
|
|
|
|
|
Use UNION ALL to put the queries together, then sort by date so that you will get the earliest date first.
SELECT TOP 1 STARTDATE FROM JOBACTIV WHERE ...<br />
UNION ALL<br />
SELECT TOP 1 STARTDATE FROM JOBARC WHERE ...<br />
ORDER BY 1
---
b { font-weight: normal; }
|
|
|
|
|
I try this query, but I don't know how to see the result. How can I display the result to a textbox?
is it something like "txtdate.text = rs7.fields"?
Thanks.
MyQuery7 = "SELECT Top 1 JOBACTIV.[STARTDATE] FROM [JOBACTIV] WHERE [MFRNAME] LIKE ('" & txtManufacturer.Text & "*') AND [SUPADDR3] LIKE ('" & txtAddress2.Text & "*') UNION ALL SELECT Top 1 JOBARC.[STARTDATE] FROM [JOBARC] WHERE [MFRNAME] LIKE ('" & txtManufacturer.Text & "*') AND [SUPADDR3] LIKE ('" & txtAddress2.Text & "*') ORDER BY 1"
|
|
|
|
|
Just get the value like you did before. The name of the field is "STARTDATE".
---
b { font-weight: normal; }
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
