Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations TouchToneTommy on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  • Users: VICKEL1
  • Order by date
  1. VICKEL1

    display member

    What do you mean strCode is in the combo (do you mean it is a property that you want to display)? DisplayMember isn't how you get the SelectedItem of the combobox if that is what you are trying to do. It is a value in the combo box that I want to be highlighted on the combo?
  2. VICKEL1

    display member

    strCode = "RR" Me.ComboEvent.DisplayMember = strCode Where strCode is in the combo. Why is this value not being displayed in my combo box?
  3. VICKEL1

    format issue

    I have a string "01/12/2006" and i need to format it to dd-mmm-yyyy (01-Dec-2006).
  4. VICKEL1

    dbisnull

    Dim cmdText As String Dim con As New ADODB.Connection Dim rs As New ADODB.Recordset Dim i As Integer Dim strTest As String con.Open("Driver={SQL Server};Server=..........") cmdText = "Select * from ........." rs.Open(cmdText, con) i = 0 While Not rs.EOF...
  5. VICKEL1

    dbisnull

    It is in a with block and the error message is: An unhandled exception of type 'System.Runtime.InteropServices.COMException' occurred in adodb.dll Additional information: Item cannot be found in the collection corresponding to the requested name or ordinal.
  6. VICKEL1

    dbisnull

    I am receiveing an error on this line of my code, If Not IsDBNull(CStr(rs.Fields("a_date").Value)) Then .Items(i).SubItems.Add(CStr(rs.Fields("a_date").Value)) End If Any ideas?
  7. VICKEL1

    Business Objects Infoviewer

    I have had the same problem and I used a formula such as: If Instr(1,cstr({field1}),".") > 0 Then formula = left(Totext({field1}),len(Totext({field1})) - 3) End if to get rid of the decimal places. However, when you have more numbers (grouped) e.g. 101, 6 the numbers do not sort properly...
  8. VICKEL1

    Connecting to Oracle

    I am connecting to an Oracle database using a connebction string. However, I am getting the error Run time error '-2147217871 (80040e31)' [Oracle][ODBC][Ora]ORA-01013: user requested cancel of current operation. My connection string is Set con = CreateObject("ADODB.Connection") Set rs =...
  9. VICKEL1

    Calendar Control

    I would use the mouse down event
  10. VICKEL1

    Calendar Control

    You cannot use the lost focus event on a text box!!
  11. VICKEL1

    Text in Excel from SQL

    This doesn't work due to For rowIndex = 1 To rs.RecordCount, is equal to 1 to -1. Any ideas?
  12. VICKEL1

    DB variable Name

    I have a 3 part DB naming convention such as DB1.dbo.client Is there any way to make the first part into a variable such as; DECLARE @DB as varchar(20) SET @DB = 'DB1' SELECT * FROM @DB + '.dbo.client' Any help would be appreciated
  13. VICKEL1

    SQL with Excel

    rs.open is before 'cmdText = "Execute sp_test 116,'16-May-2005',30,60,90,120" 'Open connection rs.Open cmdText, con
  14. VICKEL1

    SQL with Excel

    Missing the Columns Set con = CreateObject("ADODB.Connection") Set rs = CreateObject("ADODB.Recordset") con.Open "Driver={SQL Server};Server=Server;Database=Database;Uid=USERID;Pwd=Password;" If rs.EOF = False Then 'get field headings from db For i = 0 To...
  15. VICKEL1

    SQL with Excel

    I have created an ADODB connection to a sql server 2000 database. However, when I use the copyfromrecordset command I don't get all the data back. The field which the command doesn't like is a field declared as text with a length of 16. Is there any other way I could get the data?

Part and Inventory Search

Back
Top