I Think into Statement Does Not Allow Order By Class
So please remove Order by policyNumber statement
STR = " SELECT * INTO PolicyCopy FROM Policy "
Dim db As Database
Dim PolicyRecordset As Recordset
Set db = CurrentDb
Set PolicyRecordset = db.OpenRecordse t("select * from policycopy order by policynumber")
Thanking U
...
User Profile
Collapse
-
1.Ist Invoke Microsoft Scripting Runtime Reference in Our Project(in Code)
2.In Declaration Part
ex : dim fs as new FileSystem
3.
' ex: FilePath and name app.path & "Filename"
if fs.fileexists(a pp.path & "1.jas") then
msgbox("File Found")
else
msgbox("File Not Found")
endif
...Leave a comment:
-
Plz Help Me(Drop Table Problem in SqlServer)
If Iam drop one Table in Sqlserver the Table Name is an zzzz
Fllowing Error Has Been Raised on My Sql Server
Server: Msg 644, Level 21, State 5, Line 1
Could not find the index entry for RID '167e82d3331000 300' in index page (1:236), index ID 2, database 'TESMASTER'Connection Broken
SqlQuery: drop table zzzz
Database Name : TESMASTER
Plz Help Me
... -
Need Stored Procedure Example program
I Need Stored Procedure Example Program (Vb) Plz Send me
(Insert,Delete, Update)
Thanking U(For u'r Reply) -
Need User Control Example Program
I Need User Control Example Programe Plz Help Me.
Thanking U (For U'r Reply) -
Use VbnewLine (Add New Line String)
"TextArea" = "FullName: " & txtFirstName.Te xt & " " &_
txtLastName.Tex t & VbnewLine & Course: " & strCourse &_
VbnewLine & " Expiry: " & ddlExpireDay.Se lectedValue & VbnewLine
----
Thanking U(For U'r Reply)Leave a comment:
-
Private Sub cmdNext_Click()
''First If U Find Record Set is End Of line After If U Use Move Next Command
If rstInvoices.EOF Then
MsgBox ("At the last record")
rstInvoices.Mov eLast
exit sub
End If
rstInvoices.Mov eNext
'display the record details
Call showData
End Sub
Thanking U(For U'r Reply)Leave a comment:
-
Are you sure that the fields ConditionCode, ConditionDesc aren't null? Have you created a proper connection?
What is the Propose of this Code(I don't Know This One)
=============== =============== =
cboCondition.Te xt = "Select..."
=============== =============== ==
if U Check Null Values In Do Loop
-------------------------------------------------
cboCondition.Ad dItem...Leave a comment:
-
Need Chart Example Program
Hello Friends & My Brothers
I Need Chart Example Program In Vb Plz Send Me
- Jpezhil
Thanking U(For U'r Reply)
No activity results to display
Show More
Leave a comment: