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 Wanet Telecoms Ltd 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: *

  1. Meleagant

    Mutiple Databases & one set of Stored Procs

    ...I was trying to think of a way I could alleviate their maintenance fears by saying we have one copy of the SPs going forward. I know how to do simple cross server queries and such but have never been presented with a problem like this before. * Sine scientia ars nihil est * Respondeat...
  2. Meleagant

    Mutiple Databases & one set of Stored Procs

    ...thinking it would be nice to have one set of stored procs that could execute against any one of these databases instead of having 15+ copies of each and every SP or function. Is this even possible? Can someone point me in the right direction? * Sine scientia ars nihil est * Respondeat superior
  3. Meleagant

    combining (using a union) on two data sets

    ...Join would work.) If you want ALL of the records look into the Merge Method of the DataSet object. Dim retVal As New StringBuilder '* ** Oracle Connection String Dim ConnStr As String = String.Format("Data Source={0};Persist Security Info=True;User...
  4. Meleagant

    combining (using a union) on two data sets

    ...As DataRow In ds.Tables("DS1").Rows drChildren = dr.GetChildRows(dRel) If drChildren.Length > 0 Then myValue = drChildren(0).Item(1).ToString.Trim Else myValue = "" End If ' ... Add'l Statements Next * Sine scientia ars nihil est * Respondeat...
  5. Meleagant

    combining (using a union) on two data sets

    ...= "" For Each dr As DataRow In ds.Tables("DS1").Rows dr = dr.GetChildRows(dRel) If dr.Length > 0 Then myValue = dr(0).Item(1).ToString.Trim Else myValue = "" End If ' ... Add'l Statements Next * Sine scientia ars nihil est * Respondeat superior
  6. Meleagant

    Managing Multiple Threads

    ...If DateTimeNow.Millisecond > 500 Then DoubleOutputValue = System.Math.IEEERemainder(System.Math.Exp(rndNumberGenerator.Next * (InputValue + 5000) * System.Math.E), rndNumberGenerator.Next) Else DoubleOutputValue = rndNumberGenerator.Next(InputValue)...
  7. Meleagant

    Managing Multiple Threads

    ...is how do I control the number of running threads and when one completes how to loop around and execute the next executable with a new set of arguments. Can someone point me in the right direction or give me an example on how to do this? * Sine scientia ars nihil est * Respondeat superior
  8. Meleagant

    Changing ColGroup Class

    ...col = document.createElement('Col'); col.width = oHdrTbl.rows[0].cells[h].style.width; colGrp.appendChild(col); } /* ** Add ColGroup Tag before TBody tag ** */ if (oDtlTbl.firstChild && (!oDtlTbl.firstChild.tagName !== 'COLGROUP')) oDtlTbl.insertBefore(colGrp...
  9. Meleagant

    Attempted to Access an Unloaded AppDomain

    ...= False psi.CreateNoWindow = True psi.WorkingDirectory = Me.WorkingDir Dim proc As New System.Diagnostics.Process proc = System.Diagnostics.Process.Start(psi) proc.WaitForExit() proc.Close() End Sub * Sine scientia ars nihil est * Respondeat superior
  10. Meleagant

    Variation on String.Split()

    ...use (|-). Using this as a starting point I was able to get what I needed. I'm not sure how this works but it does: Dim myString As String = "Charges + Allowances - Bad Debt" Dim parts As String() = Regex.Split(myString, "(\+|\-|\*|\/)") * Sine scientia ars nihil est * Respondeat superior
  11. Meleagant

    Variation on String.Split()

    ...delimiter as part of the array? For example: Dim myString as String = "Charges + Allowances - Bad Debt" Dim parts as String() = myString.Split("/*-+".ToCharArray) Parts would then yield: parts(0) = "Charges" parts(1) = "+" parts(2) = "Allowances" parts(3) = "-"...
  12. Meleagant

    Can't find DLL when debugging

    ...is denied. If I copy my solution to my local hard drive, open it and then debug it, it works fine. I've thought it might be related to that Trusted Location issue and I tried this MSDN article but it didn't work. Can anyone help on this one? * Sine scientia ars nihil est * Respondeat...
  13. Meleagant

    Email Zip Archive Corrupts File

    ...less than 3MB extract fine when emailed. It seems that the Zips that are over 3MB will give me the bad CRC, file corrupt messages. I'll try removing the Transfer Encoding, and playing with some of the other properties. Thanks for the help!! * Sine scientia ars nihil est * Respondeat superior
  14. Meleagant

    Email Zip Archive Corrupts File

    ...when I get the zip in my email, then try to unzip it, I get a message saying that the CRC is bad and the file is corrupt. Interestingly enough, *.Rar files come through fine. But I can't use these as I cannot guarantee our clients use WinRar. Anyone ever have any success sending an email...
  15. Meleagant

    Postback - How to get javascript do button.click() & postback form dat

    ..._eventTarget As String = Request.Form("__EVENTTARGET") If _eventTarget = "SetNodeDblClick" AndAlso _eventArgument <> "" Then '* ** Update the Report Set ShowReportSetSchedule(_eventArgument) ElseIf _eventTarget = "RptNodeDblClick" AndAlso...
  16. Meleagant

    Postback - How to get javascript do button.click() &amp; postback form dat

    As I was reading your post again, I was thinking is the ViewState enabled for the page or control? If not that could be why you cannot get the value on the server side. * Sine scientia ars nihil est * Respondeat superior
  17. Meleagant

    Postback - How to get javascript do button.click() &amp; postback form dat

    ...load: Dim eventArgument As String = Request.Form("__EVENTARGUMENT") Dim eventTarget As String = Request.Form("__EVENTTARGET") So now on the server side those two values have been passed from JS and you can do whatever you want * Sine scientia ars nihil est * Respondeat superior
  18. Meleagant

    Read Data From Excel... Not finding Sheet Name

    ...to be less than 30 characters not less than 31. I just wish some other type of exception was thrown. I think I will need to check: If Me.SheetName.Length >= 31 Then 'Somehow get a message back to the user to shorten the worksheet name.' * Sine scientia ars nihil est * Respondeat superior
  19. Meleagant

    Read Data From Excel... Not finding Sheet Name

    ...= "IV" ' Create OleDbCommand object and select data from worksheet Sheet1 Dim SqlStr As String = String.Format("SELECT * FROM [{0}$A:{1}]", SheetName, A1Ref) Dim oCmd As OleDbCommand = New OleDbCommand(SqlStr, oledbConn) ' Create new...
  20. Meleagant

    Bit to Boolean Grouping Function

    ...dbo.IsTrue(@PolicyId Int) Returns Bit As Begin Return (Select Case When Count(Distinct PolicyId) = 1 Then Case When Count(*) = Count(Case When RetStatus = 1 Then 1 End) Then 1 Else 0 End Else Case When Count(Case When RetStatus = 1 and Priority...

Part and Inventory Search

Back
Top