473,387 Members | 1,721 Online
Bytes | Software Development & Data Engineering Community
Post Job

Home Posts Topics Members FAQ

Join Bytes to post your question to a community of 473,387 software developers and data experts.

syntax error

56
lilbit27 View profile
More options Mar 29, 11:26 am

Newsgroups: microsoft.public.access.forms
From: "lilbit27" <hholl...@travelers.com>
Date: 29 Mar 2007 08:26:59 -0700
Local: Thurs, Mar 29 2007 11:26 am
Subject: syntax error
Reply | Reply to author | Forward | Print | Individual message | Show original | Remove | Report this message | Find messages by this author
I am trying to start a loop code but I keep getting a syntax error in
my

select statement.:


Dim rsfax As DAO.Recordset
Dim rsPastDues As DAO.Recordset
Dim db As DAO.Database


Set db = CurrentDb
Set rsPastDues =


Forms.FPastDueMainView.FPastDues.Form.RecordsetClo ne
Set rsFax = db.OpenRecordset("SELECT qfaxes.LogInID, qfaxes.OPID,
qfaxes.AsrName, qfaxes.Acct, qfaxes.Rpt, qfaxes.BillEffDte,
qfaxes.PolEffDt, qfaxes.Policy, qfaxes.InsName, qfaxes.ProdCd,
qfaxes.ProdName, qfaxes.State, qfaxes.City, TProdInfo.Zip,
qfaxes.TranType, TProdInfo.[Contact Name], TProdInfo.[Phone Number],
TProdInfo.[Fax Number], qfaxes.Gross, qfaxes.Comm, qfaxes.Net,
qfaxes.Ext, qfaxes.Keep, qfaxes.RptDt, IIf([Team] In
(""AON"",""Marsh"",""Swett"",""Western"",""Willis" "),""(866)
594-4360"",""(866) 594-4361"") AS ReturnToll, IIf([Team] In
(""AON"",""Marsh"",""Swett"",""Western"",""Willis" "),""(877)
867-9495"",""(800) 842-9569"") AS ReturnFax,
IIf([SPCPol]<>"----------",[Policy],"") AS [Ref#], qfaxes.Email", _
FROM qfaxes INNER JOIN TProdInfo ON qfaxes.ProdCd = TProdInfo.ProdCd",
_
WHERE (((qfaxes.Keep)=True) AND ((qfaxes.Email)=fOSUserName()))"


DoCmd.SendObject acSendReport, "RPCDemandFax", acFormatRTF,
strFax, , , "Outstanding Property Casualty Policies", "Please Review
the Following Outstanding Policies", False
Mar 29 '07 #1
9 990
MMcCarthy
14,534 Expert Mod 8TB
Try this ...
Expand|Select|Wrap|Line Numbers
  1. Dim rsfax As DAO.Recordset 
  2. Dim rsPastDues As DAO.Recordset 
  3. Dim db As DAO.Database 
  4.  
  5.  Set db = CurrentDb 
  6.  Set rsPastDues = Forms!FPastDueMainView!FPastDues.RecordsetClone 
  7.  
  8.  Set rsFax = db.OpenRecordset("SELECT qfaxes.LogInID, qfaxes.OPID, " & _
  9. "qfaxes.AsrName, qfaxes.Acct, qfaxes.Rpt, qfaxes.BillEffDte, qfaxes.PolEffDt, " & _
  10. "qfaxes.Policy, qfaxes.InsName, qfaxes.ProdCd, qfaxes.ProdName, qfaxes.State, " & _ 
  11. "qfaxes.City, TProdInfo.Zip, qfaxes.TranType, TProdInfo.[Contact Name], " & _
  12. "TProdInfo.[Phone Number], TProdInfo.[Fax Number], qfaxes.Gross, qfaxes.Comm, " & _ 
  13. "qfaxes.Net, qfaxes.Ext, qfaxes.Keep, qfaxes.RptDt, " & _
  14. "IIf([Team] In ('AON','Marsh','Swett','Western','Willis'), 
  15. '(866) 594-4360','(866) 594-4361') AS ReturnToll, " & _ 
  16. "IIf([Team]  In ('AON','Marsh','Swett','Western','Willis'),
  17. '(877) 867-9495,(800) 842-9569) AS ReturnFax, " & _ 
  18. "IIf([SPCPol]<>"----------",[Policy],"") AS [Ref#], qfaxes.Email, " & _ 
  19. "FROM qfaxes INNER JOIN TProdInfo " & _
  20. "ON qfaxes.ProdCd = TProdInfo.ProdCd  " & _  
  21. "WHERE qfaxes.Keep=True AND qfaxes.Email=fOSUserName()" 
  22.  
  23. DoCmd.SendObject acSendReport, "RPCDemandFax", acFormatRTF, 
  24. strFax, , , "Outstanding Property Casualty Policies", "Please Review 
  25. the Following Outstanding Policies", False
  26.  
Mar 29 '07 #2
favor08
56
i still get an compile syntax error

Dim rsfax As DAO.Recordset
Dim rsPastDues As DAO.Recordset
Dim db As DAO.Database

Set db = CurrentDb
Set rsPastDues = Forms!FPastDueMainView!FPastDues.RecordsetClone

Set rsFax = db.OpenRecordset("SELECT qfaxes.LogInID, qfaxes.OPID, " & _
"qfaxes.AsrName, qfaxes.Acct, qfaxes.Rpt, qfaxes.BillEffDte, qfaxes.PolEffDt, " & _
"qfaxes.Policy, qfaxes.InsName, qfaxes.ProdCd, qfaxes.ProdName, qfaxes.State, " & _
"qfaxes.City, TProdInfo.Zip, qfaxes.TranType, TProdInfo.[Contact Name], " & _
"TProdInfo.[Phone Number], TProdInfo.[Fax Number], qfaxes.Gross, qfaxes.Comm, " & _
"qfaxes.Net, qfaxes.Ext, qfaxes.Keep, qfaxes.RptDt, " & _
"IIf([Team] In ('AON','Marsh','Swett','Western','Willis'),'(866) 594-4360','(866) 594-4361') AS ReturnToll, " & _
"IIf([Team] In ('AON','Marsh','Swett','Western','Willis'),'(877) 867-9495,(800) 842-9569) AS ReturnFax, " & _
"IIf([SPCPol]<>"----------",[Policy],"") AS [Ref#], qfaxes.Email, " & _
"FROM qfaxes INNER JOIN TProdInfo " & _
"ON qfaxes.ProdCd = TProdInfo.ProdCd " & _
"WHERE qfaxes.Keep=True AND qfaxes.Email=fOSUserName()"

DoCmd.SendObject acSendReport, "RPCDemandFax", acFormatRTF, strFax, , , "Outstanding Property Casualty Policies", "Please Review the Following Outstanding Policies", False
End Sub
Mar 29 '07 #3
MMcCarthy
14,534 Expert Mod 8TB
Sorry one too many comma's, try it now.

Expand|Select|Wrap|Line Numbers
  1. Dim rsfax As DAO.Recordset
  2. Dim rsPastDues As DAO.Recordset
  3. Dim db As DAO.Database
  4.  
  5.  Set db = CurrentDb
  6.  Set rsPastDues = Forms!FPastDueMainView!FPastDues.RecordsetClone
  7.  
  8.  Set rsFax = db.OpenRecordset("SELECT qfaxes.LogInID, qfaxes.OPID, " & _
  9. "qfaxes.AsrName, qfaxes.Acct, qfaxes.Rpt, qfaxes.BillEffDte, qfaxes.PolEffDt, " & _
  10. "qfaxes.Policy, qfaxes.InsName, qfaxes.ProdCd, qfaxes.ProdName, qfaxes.State, " & _
  11. "qfaxes.City, TProdInfo.Zip, qfaxes.TranType, TProdInfo.[Contact Name], " & _
  12. "TProdInfo.[Phone Number], TProdInfo.[Fax Number], qfaxes.Gross, qfaxes.Comm, " & _
  13. "qfaxes.Net, qfaxes.Ext, qfaxes.Keep, qfaxes.RptDt, " & _
  14. "IIf([Team] In ('AON','Marsh','Swett','Western','Willis'),'(866) 594-4360','(866) 594-4361') AS ReturnToll, " & _
  15. "IIf([Team]  In ('AON','Marsh','Swett','Western','Willis'),'(877) 867-9495,(800) 842-9569) AS ReturnFax, " & _
  16. "IIf([SPCPol]<>"----------",[Policy],"") AS [Ref#], qfaxes.Email " & _
  17. "FROM qfaxes INNER JOIN TProdInfo " & _
  18. "ON qfaxes.ProdCd = TProdInfo.ProdCd  " & _
  19. "WHERE qfaxes.Keep=True AND qfaxes.Email=fOSUserName()"
  20.  
  21. DoCmd.SendObject acSendReport, "RPCDemandFax", acFormatRTF, strFax, , , "Outstanding Property Casualty Policies", "Please Review the Following Outstanding Policies", False
  22. End Sub
Mar 29 '07 #4
favor08
56
Sorry one too many comma's, try it now.

Expand|Select|Wrap|Line Numbers
  1. Dim rsfax As DAO.Recordset
  2. Dim rsPastDues As DAO.Recordset
  3. Dim db As DAO.Database
  4.  
  5.  Set db = CurrentDb
  6.  Set rsPastDues = Forms!FPastDueMainView!FPastDues.RecordsetClone
  7.  
  8.  Set rsFax = db.OpenRecordset("SELECT qfaxes.LogInID, qfaxes.OPID, " & _
  9. "qfaxes.AsrName, qfaxes.Acct, qfaxes.Rpt, qfaxes.BillEffDte, qfaxes.PolEffDt, " & _
  10. "qfaxes.Policy, qfaxes.InsName, qfaxes.ProdCd, qfaxes.ProdName, qfaxes.State, " & _
  11. "qfaxes.City, TProdInfo.Zip, qfaxes.TranType, TProdInfo.[Contact Name], " & _
  12. "TProdInfo.[Phone Number], TProdInfo.[Fax Number], qfaxes.Gross, qfaxes.Comm, " & _
  13. "qfaxes.Net, qfaxes.Ext, qfaxes.Keep, qfaxes.RptDt, " & _
  14. "IIf([Team] In ('AON','Marsh','Swett','Western','Willis'),'(866) 594-4360','(866) 594-4361') AS ReturnToll, " & _
  15. "IIf([Team]  In ('AON','Marsh','Swett','Western','Willis'),'(877) 867-9495,(800) 842-9569) AS ReturnFax, " & _
  16. "IIf([SPCPol]<>"----------",[Policy],"") AS [Ref#], qfaxes.Email " & _
  17. "FROM qfaxes INNER JOIN TProdInfo " & _
  18. "ON qfaxes.ProdCd = TProdInfo.ProdCd  " & _
  19. "WHERE qfaxes.Keep=True AND qfaxes.Email=fOSUserName()"
  20.  
  21. DoCmd.SendObject acSendReport, "RPCDemandFax", acFormatRTF, strFax, , , "Outstanding Property Casualty Policies", "Please Review the Following Outstanding Policies", False
  22. End Sub
this part turns red and soon as I post it and give me the syntax error:
Set rsFax = db.OpenRecordset("SELECT qfaxes.LogInID, qfaxes.OPID, " & _
"qfaxes.AsrName, qfaxes.Acct, qfaxes.Rpt, qfaxes.BillEffDte, qfaxes.PolEffDt, " & _
"qfaxes.Policy, qfaxes.InsName, qfaxes.ProdCd, qfaxes.ProdName, qfaxes.State, " & _
"qfaxes.City, TProdInfo.Zip, qfaxes.TranType, TProdInfo.[Contact Name], " & _
"TProdInfo.[Phone Number], TProdInfo.[Fax Number], qfaxes.Gross, qfaxes.Comm, " & _
"qfaxes.Net, qfaxes.Ext, qfaxes.Keep, qfaxes.RptDt, " & _
"IIf([Team] In ('AON','Marsh','Swett','Western','Willis'),'(866) 594-4360','(866) 594-4361') AS ReturnToll, " & _
"IIf([Team] In ('AON','Marsh','Swett','Western','Willis'),'(877) 867-9495,(800) 842-9569) AS ReturnFax, " & _
"IIf([SPCPol]<>"----------",[Policy],"") AS [Ref#], qfaxes.Email " & _
"FROM qfaxes INNER JOIN TProdInfo " & _
"ON qfaxes.ProdCd = TProdInfo.ProdCd " & _
"WHERE qfaxes.Keep=True AND qfaxes.Email=fOSUserName()"
Mar 29 '07 #5
MMcCarthy
14,534 Expert Mod 8TB
OK try this one ...
Expand|Select|Wrap|Line Numbers
  1. Set rsFax = db.OpenRecordset(
  2. "SELECT qfaxes.LogInID, qfaxes.OPID, " & _
  3. "qfaxes.AsrName, qfaxes.Acct, qfaxes.Rpt, qfaxes.BillEffDte, qfaxes.PolEffDt, " & _
  4. "qfaxes.Policy, qfaxes.InsName, qfaxes.ProdCd, qfaxes.ProdName, qfaxes.State, " & _
  5. "qfaxes.City, TProdInfo.Zip, qfaxes.TranType, TProdInfo.[Contact Name], " & _
  6. "TProdInfo.[Phone Number], TProdInfo.[Fax Number], qfaxes.Gross, qfaxes.Comm, " & _
  7. "qfaxes.Net, qfaxes.Ext, qfaxes.Keep, qfaxes.RptDt, " & _
  8. "IIf([Team] In ('AON','Marsh','Swett','Western','Willis'),'(866) 594-4360','(866) 594-4361') AS ReturnToll, " & _
  9. "IIf([Team] In ('AON','Marsh','Swett','Western','Willis'),'(877) 867-9495','(800) 842-9569') AS ReturnFax, " & _
  10. "IIf([SPCPol]<>"----------",[Policy],"") AS [Ref#], qfaxes.Email " & _
  11. "FROM qfaxes INNER JOIN TProdInfo " & _
  12. "ON qfaxes.ProdCd = TProdInfo.ProdCd " & _
  13. "WHERE qfaxes.Keep=True AND qfaxes.Email=fOSUserName()"
  14.  
Mar 29 '07 #6
favor08
56
OK try this one ...
Expand|Select|Wrap|Line Numbers
  1. Set rsFax = db.OpenRecordset(
  2. "SELECT qfaxes.LogInID, qfaxes.OPID, " & _
  3. "qfaxes.AsrName, qfaxes.Acct, qfaxes.Rpt, qfaxes.BillEffDte, qfaxes.PolEffDt, " & _
  4. "qfaxes.Policy, qfaxes.InsName, qfaxes.ProdCd, qfaxes.ProdName, qfaxes.State, " & _
  5. "qfaxes.City, TProdInfo.Zip, qfaxes.TranType, TProdInfo.[Contact Name], " & _
  6. "TProdInfo.[Phone Number], TProdInfo.[Fax Number], qfaxes.Gross, qfaxes.Comm, " & _
  7. "qfaxes.Net, qfaxes.Ext, qfaxes.Keep, qfaxes.RptDt, " & _
  8. "IIf([Team] In ('AON','Marsh','Swett','Western','Willis'),'(866) 594-4360','(866) 594-4361') AS ReturnToll, " & _
  9. "IIf([Team] In ('AON','Marsh','Swett','Western','Willis'),'(877) 867-9495','(800) 842-9569') AS ReturnFax, " & _
  10. "IIf([SPCPol]<>"----------",[Policy],"") AS [Ref#], qfaxes.Email " & _
  11. "FROM qfaxes INNER JOIN TProdInfo " & _
  12. "ON qfaxes.ProdCd = TProdInfo.ProdCd " & _
  13. "WHERE qfaxes.Keep=True AND qfaxes.Email=fOSUserName()"
  14.  

I changed the code, now how do I get the code to loop through and recognize a new fax #.
Dim rst As DAO.Recordset
Dim rsPastDues As DAO.Recordset
Dim db As DAO.Database
Dim strName As String
Dim strFaxNo As String
Dim strFax As String

Set db = CurrentDb


strSQL = "SELECT QFaxes.LogInID, QFaxes.OPID, QFaxes.AsrName, QFaxes.Acct, QFaxes.Rpt, QFaxes.BillEffDte, " & _
" QFaxes.PolEffDt, QFaxes.Policy, QFaxes.InsName, QFaxes.ProdCd, QFaxes.ProdName, QFaxes.State, QFaxes.City, " & _
" TP.Zip, QF.TranType, TP.[Contact Name], TP.[Phone Number], TP.[Fax Number], " & _
" QFaxes.Gross, QFaxes.Comm, QFaxes.Net, QFaxes.Ext, QFaxes.Keep, QFaxes.RptDt, " & _
" IIf([Team] In ('AON','Marsh','Swett','Western','Willis'), '(866) 594-4360', '(866) 594-4361') AS ReturnToll, " & _
" IIf([Team] In ('AON','Marsh','Swett','Western','Willis'), '(877) 867-9495', '(800) 842-9569') AS ReturnFax, " & _
" IIf([SPCPol]<>'----------', QFaxes.[Policy], ' ') AS [Ref#] " & _
" FROM qfaxes AS QF INNER JOIN " & _
" TProdInfo AS TP ON QFaxes.ProdCd = TP.ProdCd " & _
" WHERE (QFaxes.Keep=True)"


strFax = strName & strFaxNo & "/<fax@faxit.travp.net>"

DoCmd.SendObject acSendReport, "RPCDemandFax", acFormatRTF, strFax, , , "Outstanding Property Casualty Policies", "Please Review the Following Outstanding Policies", False
Mar 30 '07 #7
MMcCarthy
14,534 Expert Mod 8TB
The loop would be something like this...

Expand|Select|Wrap|Line Numbers
  1. Dim db As DAO.Database
  2. Dim rst As DAO.Recordset
  3. Dim strName As String
  4. Dim strFaxNo As String
  5. Dim strFax As String
  6.  
  7.  Set db = CurrentDb
  8.  
  9.  strSQL = "SELECT QFaxes.LogInID, QFaxes.OPID, QFaxes.AsrName, QFaxes.Acct, QFaxes.Rpt, QFaxes.BillEffDte, " & _
  10.  " QFaxes.PolEffDt, QFaxes.Policy, QFaxes.InsName, QFaxes.ProdCd, QFaxes.ProdName, QFaxes.State, QFaxes.City, " & _
  11.  " TP.Zip, QF.TranType, TP.[Contact Name], TP.[Phone Number], TP.[Fax Number], " & _
  12.  " QFaxes.Gross, QFaxes.Comm, QFaxes.Net, QFaxes.Ext, QFaxes.Keep, QFaxes.RptDt, " & _
  13.  " IIf([Team] In ('AON','Marsh','Swett','Western','Willis'), '(866) 594-4360', '(866) 594-4361') AS ReturnToll, " & _
  14.  " IIf([Team] In ('AON','Marsh','Swett','Western','Willis'), '(877) 867-9495', '(800) 842-9569') AS ReturnFax, " & _
  15.  " IIf([SPCPol]<>'----------', QFaxes.[Policy], ' ') AS [Ref#] " & _
  16.  " FROM qfaxes AS QF INNER JOIN " & _
  17.  "   TProdInfo AS TP ON QFaxes.ProdCd = TP.ProdCd " & _
  18.  " WHERE (QFaxes.Keep=True)"
  19.  
  20. Set rst = db.OpenRecordset(strSQL)
  21.  
  22. rst.MoveFirst
  23. Do Until rst.EOF
  24. strName = rst![Contact Name]
  25. strFaxNo = rst![Fax Number]
  26. strFax = strName & strFaxNo & "/<fax@faxit.travp.net>"
  27.  
  28. DoCmd.SendObject acSendReport, "RPCDemandFax", acFormatRTF, strFax, , , "Outstanding Property Casualty Policies", "Please Review the Following Outstanding Policies", False
  29. rst.MoveNext
  30. Loop
  31.  
Apr 1 '07 #8
favor08
56
The loop would be something like this...

Expand|Select|Wrap|Line Numbers
  1. Dim db As DAO.Database
  2. Dim rst As DAO.Recordset
  3. Dim strName As String
  4. Dim strFaxNo As String
  5. Dim strFax As String
  6.  
  7.  Set db = CurrentDb
  8.  
  9.  strSQL = "SELECT QFaxes.LogInID, QFaxes.OPID, QFaxes.AsrName, QFaxes.Acct, QFaxes.Rpt, QFaxes.BillEffDte, " & _
  10.  " QFaxes.PolEffDt, QFaxes.Policy, QFaxes.InsName, QFaxes.ProdCd, QFaxes.ProdName, QFaxes.State, QFaxes.City, " & _
  11.  " TP.Zip, QF.TranType, TP.[Contact Name], TP.[Phone Number], TP.[Fax Number], " & _
  12.  " QFaxes.Gross, QFaxes.Comm, QFaxes.Net, QFaxes.Ext, QFaxes.Keep, QFaxes.RptDt, " & _
  13.  " IIf([Team] In ('AON','Marsh','Swett','Western','Willis'), '(866) 594-4360', '(866) 594-4361') AS ReturnToll, " & _
  14.  " IIf([Team] In ('AON','Marsh','Swett','Western','Willis'), '(877) 867-9495', '(800) 842-9569') AS ReturnFax, " & _
  15.  " IIf([SPCPol]<>'----------', QFaxes.[Policy], ' ') AS [Ref#] " & _
  16.  " FROM qfaxes AS QF INNER JOIN " & _
  17.  "   TProdInfo AS TP ON QFaxes.ProdCd = TP.ProdCd " & _
  18.  " WHERE (QFaxes.Keep=True)"
  19.  
  20. Set rst = db.OpenRecordset(strSQL)
  21.  
  22. rst.MoveFirst
  23. Do Until rst.EOF
  24. strName = rst![Contact Name]
  25. strFaxNo = rst![Fax Number]
  26. strFax = strName & strFaxNo & "/<fax@faxit.travp.net>"
  27.  
  28. DoCmd.SendObject acSendReport, "RPCDemandFax", acFormatRTF, strFax, , , "Outstanding Property Casualty Policies", "Please Review the Following Outstanding Policies", False
  29. rst.MoveNext
  30. Loop
  31.  
My error message says

I syntax error inner Join operation
Apr 1 '07 #9
favor08
56
The loop would be something like this...

Expand|Select|Wrap|Line Numbers
  1. Dim db As DAO.Database
  2. Dim rst As DAO.Recordset
  3. Dim strName As String
  4. Dim strFaxNo As String
  5. Dim strFax As String
  6.  
  7.  Set db = CurrentDb
  8.  
  9.  strSQL = "SELECT QFaxes.LogInID, QFaxes.OPID, QFaxes.AsrName, QFaxes.Acct, QFaxes.Rpt, QFaxes.BillEffDte, " & _
  10.  " QFaxes.PolEffDt, QFaxes.Policy, QFaxes.InsName, QFaxes.ProdCd, QFaxes.ProdName, QFaxes.State, QFaxes.City, " & _
  11.  " TP.Zip, QF.TranType, TP.[Contact Name], TP.[Phone Number], TP.[Fax Number], " & _
  12.  " QFaxes.Gross, QFaxes.Comm, QFaxes.Net, QFaxes.Ext, QFaxes.Keep, QFaxes.RptDt, " & _
  13.  " IIf([Team] In ('AON','Marsh','Swett','Western','Willis'), '(866) 594-4360', '(866) 594-4361') AS ReturnToll, " & _
  14.  " IIf([Team] In ('AON','Marsh','Swett','Western','Willis'), '(877) 867-9495', '(800) 842-9569') AS ReturnFax, " & _
  15.  " IIf([SPCPol]<>'----------', QFaxes.[Policy], ' ') AS [Ref#] " & _
  16.  " FROM qfaxes AS QF INNER JOIN " & _
  17.  "   TProdInfo AS TP ON QFaxes.ProdCd = TP.ProdCd " & _
  18.  " WHERE (QFaxes.Keep=True)"
  19.  
  20. Set rst = db.OpenRecordset(strSQL)
  21.  
  22. rst.MoveFirst
  23. Do Until rst.EOF
  24. strName = rst![Contact Name]
  25. strFaxNo = rst![Fax Number]
  26. strFax = strName & strFaxNo & "/<fax@faxit.travp.net>"
  27.  
  28. DoCmd.SendObject acSendReport, "RPCDemandFax", acFormatRTF, strFax, , , "Outstanding Property Casualty Policies", "Please Review the Following Outstanding Policies", False
  29. rst.MoveNext
  30. Loop
  31.  
I fixed the syntax error and the code works but it sends all three reports to different fax #'s. example I have three reports. each with a different fax number so each fax # should receive one report; but all three reports are going to all three fax numbers.
Apr 1 '07 #10

Sign in to post your reply or Sign up for a free account.

Similar topics

1
by: Steve | last post by:
I just spent waaaaaaaaaaaayy too much time trying to track down an error that was incorrectly reported just now, and I would like to see if someone can explain to me why it was reported that way. ...
1
by: Donald Canton | last post by:
Hi, I'm using Bjarne's book to learn C++ and am stuck on the Calc program in Section 6. Everything works fine except when I try to use istringstream to parse a token from the command line. I...
5
by: r.nikhilk | last post by:
Hi, Currently, we are porting C++ applications from 32 bit to 64 bit on AIX platform. (The current version of AIX is 5.3 and xlC verison is 8.0). We are able to compile the applications by...
2
by: david | last post by:
Anyone could give me a hand about this syntax error? Thank you. David Source Code: Dim conn As New SqlConnection(strConn) Dim daAngio As New SqlDataAdapter(strSelectStatement, conn) 'Create a...
3
by: Manuel | last post by:
I'm trying to compile glut 3.7.6 (dowbloaded from official site)using devc++. So I've imported the glut32.dsp into devc++, included manually some headers, and start to compile. It return a very...
1
by: Hari Sekhon | last post by:
I've written an except hook into a script as shown below which works well for the most part and catches exceptions. import sys def myexcepthook(type,value,tb): do something ...
7
by: Josh | last post by:
I have a lot of except Exception, e statements in my code, which poses some problems. One of the biggest is whenever I refactor even the triviallest thing in my code. I would like python to...
7
by: bryant | last post by:
Hi all. I am new to ASP and working in Expression Web. The following query displays the information I need in the gridview for a single record. SELECT "OE_HDR"."ORD_NO", "OE_HDR"."CUST_NAM",...
6
by: muby | last post by:
Hi everybody :) I'm modifying a C++ code in VC++ 2005 my code snippet void BandwidthAllocationScheduler::insert( Message* msg, BOOL* QueueIsFull,
5
Banfa
by: Banfa | last post by:
So I have a little problem, I have a template class and that class contains a template function; now what I want to do is declare that function in the class (or indeed the entire class) as a friend...
0
by: Charles Arthur | last post by:
How do i turn on java script on a villaon, callus and itel keypad mobile phone
0
by: aa123db | last post by:
Variable and constants Use var or let for variables and const fror constants. Var foo ='bar'; Let foo ='bar';const baz ='bar'; Functions function $name$ ($parameters$) { } ...
0
by: ryjfgjl | last post by:
If we have dozens or hundreds of excel to import into the database, if we use the excel import function provided by database editors such as navicat, it will be extremely tedious and time-consuming...
0
by: ryjfgjl | last post by:
In our work, we often receive Excel tables with data in the same format. If we want to analyze these data, it can be difficult to analyze them because the data is spread across multiple Excel files...
1
by: Sonnysonu | last post by:
This is the data of csv file 1 2 3 1 2 3 1 2 3 1 2 3 2 3 2 3 3 the lengths should be different i have to store the data by column-wise with in the specific length. suppose the i have to...
0
marktang
by: marktang | last post by:
ONU (Optical Network Unit) is one of the key components for providing high-speed Internet services. Its primary function is to act as an endpoint device located at the user's premises. However,...
0
by: Hystou | last post by:
Most computers default to English, but sometimes we require a different language, especially when relocating. Forgot to request a specific language before your computer shipped? No problem! You can...
0
Oralloy
by: Oralloy | last post by:
Hello folks, I am unable to find appropriate documentation on the type promotion of bit-fields when using the generalised comparison operator "<=>". The problem is that using the GNU compilers,...
0
jinu1996
by: jinu1996 | last post by:
In today's digital age, having a compelling online presence is paramount for businesses aiming to thrive in a competitive landscape. At the heart of this digital strategy lies an intricately woven...

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.