Select from freelancers specializing in everything from database administration to programming, who have proven themselves as experts in their field. Hire the best, collaborate easily, pay securely and get projects done right.
Dim oCatalog, oApplications, oApp, oComps, oComponent, i Set oCatalog = CreateObject("ComAdmin.COMAdminCatalog") Set oApplications = oCatalog.GetCollection("Applications") oApplications.Populate For Each oApp In oApplications If oApp.Name = WScript.Arguments.Item(0) Then Set oComps = oApplications.GetCollection("Components", oApp.value("ID")) oComps.Populate For i = oComps.Count -1 To 0 Step -1 Set oComponent = oComps.Item(i) oComponent.Value("TXIsolationLevel") = COMAdminTxIsolationLevelReadCommitted Next oComps.SaveChanges End If Next oApplications.SaveChanges
|"J" column have the (Q) original color on top of row given color when being refresh.||30||42|
|Problem to open text file||11||105|
|Looking for a program that deletes all files of same size||18||59|
|How can I run a vbs script to all members servers in a domain?||9||19|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
8 Experts available now in Live!