Posts by ashu1990

ashu1990 · Jan 6th 2014

Re: Pickup Values from Cells to Combobox in user form

Hi skamat,

Try this

Code

public sub workbook_open
sheet1.combobox1.additem "Select data"
for i = 1 to 6
sheet1.combobox1.additem range("A" & 6+i).value
next i 
sheet1.combobox1.listindex = 0
end sub

put this code in the workbook code page.

ashu1990 · Jan 6th 2014

Re: Copy Strings in a comment and get subtotal of numbers typed in the comment VBA

hi please try this

Code

Function comments_sum()
Dim Total As Double, ash As Variant
For Each com In ActiveSheet.Comments
ash = com.Text
ash = Split(com.Text, Chr(10))
For j = 1 To UBound(ash) - 1
Total = Total + ash(j)
Next j
Next com


End Function

Display More

Thanks cytop for editing the post for me
@ excelprod its just a dummy code you have to set the total value refrence with your desired cell range

ashu1990 · Oct 1st 2013

Re: Outlook to show as an object in excel

cytop i saw the insert object option but it allows me to embed the workbooks and there is no option for outlook.

i want to show the entire outlook into a excel sheet or a user form

ashu1990 · Oct 1st 2013

Re: Compile Error: Expected: line number or label or statement or end of statement

Is it really necessary to put the values into the variables
you can try putiing the values into a variant on a temp basis unntil you get an answer for this which will be easier if you r stuck and want to procede further with your development

ashu1990 · Sep 27th 2013

Hi Guru's,

Is there any possibility to show outlook as an object in excel or userform?

if yes can anyone explain me or can put me in the right direction.

i tried google the best budy but no Luck!

ashu1990 · Sep 13th 2013

Re: Excel max memory

try putting the calculation method to manual hope it will do your work

ashu1990 · Sep 13th 2013

Re: Autoadjust text for printing

please share your data here so that i can take a look

ashu1990 · Sep 13th 2013

Re: File not attaching to email, can only get it to work with Active Workbook.

can any one mark this post as solved

ashu1990 · Sep 13th 2013

Re: Excel max memory

yes the more rows you lookup the more time it takes to calculate.

ashu1990 · Sep 13th 2013

Re: Problem with Application.ScreenUpdating = False - screen keeps on flickering

glovner the autocalculation method doesnt have to do anything with screen updation these are 2 different things.
his problem is with the system he is using if he uses the same code in other system the .screenupdation will work

ashu1990 · Sep 13th 2013

Re: Autoadjust text for printing

hi set the print area first and then use orientation landscape or potrait this will not allow the rows to cut off

Code

ActiveSheet.PageSetup.PrintArea = "Your Range"

ashu1990 · Sep 13th 2013

Re: File not attaching to email, can only get it to work with Active Workbook.

Hi kelpot,

tried your code and worked fine for me try passing the path through a string i think this will help.

ashu1990 · Sep 13th 2013

Re: Problem with Application.ScreenUpdating = False - screen keeps on flickering

hi drac6ir28,

please use code tags for coading and your problem is with the system you r using not the code.

ashu1990 · Sep 10th 2013

Re: Linking a cell value to a chart.

hi trent4213

there are many values in chart which one do you wanna update

ashu1990 · Sep 10th 2013

Re: Would like to build a VB macro to copy info from one worksheet to a blank one...

thats why you need to be clear to avoid confusions.

just add this 2 lines on the top of the code, this will do your work

Code

Worksheets("Revoked").UsedRange.ClearContents


Worksheets("Revoked").UsedRange.ClearFormats

ashu1990 · Sep 10th 2013

Re: IE Automation Pdf to save from IE

Hi cytop thanks for your great help.

but the code is not useful to me coz it does not saves the pdf inside the ie. it is usefull for those who are generated trough link from ie.
at the end i used sendkeys to save the pdf which i didnt want to do but time is money and doesnt want to waste your valuable time and mine too..

thanks for your valuable time sir and have a pleasent evening.

ashu1990 · Sep 10th 2013

Re: Would like to build a VB macro to copy info from one worksheet to a blank one...

hi tkcatch,

didnt get why you wanna overwrite the data on one another but still if you want it. heres the code replace this code

Code

[COLOR=#0000ff]
If[/COLOR] Worksheets("Revoked").Range("A4").Value = "" [COLOR=#0000ff]Then[/COLOR] 
                Worksheets("Revoked").Range("A4").PasteSpecial (xlAll) 
            [COLOR=#0000ff]Else[/COLOR] 
                Worksheets("Revoked").Range("A65536").End(xlUp).Offset(1, 0).PasteSpecial (xlAll) 
            [COLOR=#0000ff]End[/COLOR] [COLOR=#0000ff]If[/COLOR]

with this one, it will paste the data only one row 4.

Code

Worksheets("Revoked").Range("A4").PasteSpecial (xlAll)

ashu1990 · Sep 10th 2013

Re: Would like to build a VB macro to copy info from one worksheet to a blank one...

you must go through some macro tutorial for better understanding
i think you want something like this.

Code

Sub test()
dim rw as long,ran as range
rw = worksheets("Combined").Range("A:A").SpecialCells(xlCellTypeLastCell).Row
Set ran = worksheets("Combined").Range("A2:A" & rw)
For Each shw In ran
If shw.Interior.Color = 255 Then '''red
shw.EntireRow.Copy
If Worksheets("Revoked").Range("A4").Value = "" Then
Worksheets("Revoked").Range("A4").PasteSpecial (xlAll)
Else
Worksheets("Revoked").Range("A65536").End(xlUp).Offset(1, 0).PasteSpecial (xlAll)
End If
Application.CutCopyMode = False
End If
Next shw
End Sub

Display More

ashu1990 · Sep 10th 2013

Re: Export pre-defined range to .csv, with name from originating worksheet cell

i think you want to give filename from a range if i am right try this!

Code

[COLOR=#006400]'Get file name and location from user
''thisworkbook.path will give the macro file directory path[/COLOR]
    fName = thisworkbook.path & "\" & range("your range").value & ".xls"
    wbDest.SaveAs fName, xlText

ashu1990 · Sep 10th 2013

Re: IE Automation Pdf to save from IE

:thanx: thanks cytop.
But i have to first click on a search button first after that this page appears where there is no other link or url option where i can use this.
i have given this link for an example what i have to do is to click on the save button of the pdf or any other possible way to download.

below is the source code of the page

HTML

<!-- Include files -->
 <!--TODO - TRY TO CENTRALIZE-->
<!-- Include files -->
<!-- NOTE: Clients including this file should also include the file: -->
<!-- CabFiles/ds32NetSessionObject.XML-->


<script src="ErrorDisplayFunctions.js"></script>
<script src="ClientConstants.js"></script>
<script src="../Lang/Lang.js"></script>
<script language=javascript>
function querySt(ji)
{
  hu = window.location.search.substring(1);
  gy = hu.split("&");
  for (i=0;i<gy.length;i++)
   {
  var pos = gy[i].indexOf("="); 
  if (pos == -1) 
  continue;
  if (gy[i].substring(0,pos) == ji) 
  {
  return gy[i].substring(pos+1).replace(/%20/g,' ').replace(/\\\"/g,'\'');
  }
   }
}
var m_objNetSession;       // Global session object
var customSessionToken = querySt("sessionToken");
// Routine called to retrieve a valid session object from the store cookie
function GetCurrentSessionObject(bCreateNew, sSessionToken)
{
 // Session identification variables
 var sEntryName     = DS32_COOKIE_SECTION_SESSION_TOKEN;
 var localSessionURL        = DS32_LOCAL_SESSION_LOCATION;
 var localSessionSchemaLoc = DS32_LOCAL_SCHEMA_LOCATION;
 // Error string
 var sErrorString = "";
 try 
 { 
  if (m_objNetSession == null)
  {   
   // Create the main session object
   m_objNetSession = new ActiveXObject("ds32net.session");
  
   // Configure the session object
   m_objNetSession.url = localSessionURL;
   m_objNetSession.schemaLocation = localSessionSchemaLoc;
   if(customSessionToken != "" && customSessionToken != null)
   {
   m_objNetSession.XMLToken = customSessionToken;
   
   frmSessionToken.fldSessionToken.value = customSessionToken;
   }
   else  // Do we already have a valid session object?
   {   
   // Do we need to retrieve the existing session object
   if (bCreateNew == false)
   {
    m_objNetSession.XMLToken = sSessionToken;
   }
  }
   }
  // return our session object
  return m_objNetSession;
 }
 catch (e) 
 {  
  // Process the errors
  ProcessErrorObjects(DS32NET_ERR_SFIELDS_RETRIEVING_SESSION, e, m_objNetSession);
 }  
 
 // Return a null instead of the session object
 return null;
}
</script>


<!-- hidden form that holds the session token -->
<form id="frmSessionToken" method="post" action="resultspage.asp">
<input type=hidden id=fldSessionToken name=fldSessionToken value='<?xml version="1.0"?>
<ds32net><sessionToken GUID="{3C71B5FD-8F9F-4137-AAF9-B65584CF38DA}">6A67E1F8-85DD-445B-BE4F-6D8505234AA2</sessionToken></ds32net>
'>
<input type=hidden id=fldSearchToken name=fldSearchToken value=''>
</form>


  
 
<html>
<head>
<title>ds32.net - 4.03.00</title>
<META HTTP-EQUIV="Cache-Control" CONTENT="no-store">
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-8859-1">
<script src="./ClientCode/javacomm.js"></script>
<script src="./ClientCode/cookie.js"></script>
<script src="./ClientCode/layer.js"></script>
<script src="./ClientCode/ErrorHandler.js"></script>
<script src="./ClientCode/ActiveXObjectCreator.js"></script>
<script src="./ClientCode/yCode_combo_box.js"> </script>
<script src="./ClientCode/yCodelib.js"> </script>
<script src="./Lang/Lang.js"></script>
<script src="./Shared/SessionFunctions.js"></script>
<script src="./Shared/CacheManagerFunctions.js"></script>
<script src="./Shared/SearchFunctions.js"></script>
<script src="./Shared/ResultsFunctions.js"></script>
<script src="./Shared/PrintFunctions.js"></script>
<script src="./Shared/ExportFunctions.js"></script>
<script src="./Shared/EmailFunctions.js"></script>
<script src="./Shared/ClipbookFunctions.js"></script>
<script src="./Shared/IndexValuesExportFunctions.js"></script>
<script src="./Shared/XMLFunctions.js"></script>
<script src="./Shared/ClientConstants.js"></script>
<script src="./Shared/ErrorDisplayFunctions.js"></script>
<script src="./Shared/DisplayControlMenuIds.js"></script>
<script src="./Shared/ToolbarMenuConstants.js"></script>
<script src="./Shared/HelpFunctions.js"></script>
<script src="./Shared/UserFunctions.js"></script>
<script src="./ClientCode/ResultsPage.js"></script>
 
 
<!-- Stylesheet to be used -->
<link rel="stylesheet" href="./StyleSheets/StandardStyleSheet.css" type="text/css">
</head>
<BODY class="PageBackgroundColor" onresize="window_resize()" onbeforeunload="checkForWindowClosure();" onunload="stopSearchIfNeeded();"><!-- Insert the results table-->
<P class="ResultsGridHeader" id="usernameLabel" style="position:absolute; left:0px; top:0px; width:500px; height:10px; z-index:1"> 
</P>
<!-- Add the display control to the form -->
<DIV id="ToolbarSection">
</DIV>
<script type="text/javascript" language="javascript">
var searchToken = '';
 if(searchToken!=null)
 {
  PassSearchToken(searchToken);
 }
 
 PageStartUp();
 CreateToolbarControl();
</script>
<script language=javascript for="DS32NetToolbar" Event="OnMenuItemClicked(nMenuID)">
 MenuHandlers(nMenuID);
</script>


<script language=javascript for="ds32NetDisplayControl" Event="OnClipbookInitFailure(ResultCode)">
 OnClipbookInitFailure(ResultCode);
</script>
<script language=javascript for="ds32NetDisplayControl" Event="OnClipbookCopyToClipboard(clipbookSetting, pageRange, fieldDelimiter, pageBreaks)">
 OnClipbookCopyToClipboard(clipbookSetting, pageRange, fieldDelimiter, pageBreaks);
</script>
 
<script language=javascript for="ds32NetDisplayControl" Event="OnClipbookSaveToFile(clipbookSetting, pageRange, fieldDelimiter, pageBreaks, UnicodeFormat)">
  OnClipbookSaveToFile(clipbookSetting, pageRange, fieldDelimiter, pageBreaks, UnicodeFormat);
</script>
<script language=javascript for="ds32NetDisplayControl" Event="OnAttemptToAddAttach(displayControlID)">
 OnAttemptToAddAttach(displayControlID);
</script>
<script language=javascript for="ds32NetDisplayControl" Event="OnAttemptToEditAttach(displayControlID)">
 OnAttemptToEditAttach(displayControlID);
</script>
<script language=javascript for="ds32NetDisplayControl" Event="OnAttachmentLimitReached(displayControlID)">
 // Warn the user that the maximum number of attachments has already been added to the page
 alert(DS32NET_RESULTSGRID_ATTACHMENT_MAXIMUM_REACHED);
 
</script>
<script language=javascript for="ds32NetDisplayControl" Event="OnAttachActionNotPermitted(displayControlID)">
 // Tell the user that the attachment action was not permitted
 alert(DS32NET_RESULTSGRID_ATTACHMENT_OP_NOT_PERMITTED);
 
</script>
 <!-- Add the display control to the form -->
 <DIV id="DisplayPageSection">
 </DIV>
 <script type="text/javascript" language="javascript">
  
  // Create the display control
  CreateDisplayControl();
 </script>
 <DIV id="OfficeDisplayPageSection">
 </DIV>
 <DIV id="divXRefCombo">
 </DIV>
 <!-- Insert the section navigation buttons -->  
 <TABLE style="position:absolute; left:0px;" class="ResultsGridNavigationButtonsBackground"  nowrap="true" ID="tablesectionnavigation" width="100%" border="0">
  <TBODY><!-- Display the button to navigate to another part of the results set --> 
   <TR>
    <TD id="tableDataMovePreviousSection" width="104px" align="center">
    <!-- Display the part of the results set that is being viewed at present -->
     <IMG  id="moveprevioussection" language=javascript 
      onclick="return moveprevioussection_onclick()" 
      src=".\Images\Buttons\PreviousHits_Off.gif" 
      onMouseOver = "Javascript:style.cursor='hand'"
      alt=''>
     </IMG>      
    </TD>
    <TD nowrap="true" cellpadding="20" CLASS="StandardBodyText" ID="currentresultslabel" width="100px" align="center"> <B></B>
    </TD>
    <TD ID="searchAnimation">
    <IMG src=".\Images\Animations\SearchProgress.gif">
    </TD>
    <TD id="tableDataMoveNextSection"  width="104px" align="center">      
     <!--<IMG id=movenextsection language=javascript onclick="return movenextsection_onclick()" src=".\Images\Buttons\movenext_Off.gif" >    -->
     <IMG id="movenextsection" language=javascript 
      onclick="return movenextsection_onclick()" 
      src=".\Images\Buttons\NextHits_Off.gif" 
      onMouseOver = "Javascript:style.cursor='hand'"
      alt=''> 
     </IMG>
    </TD>
    
    <td id="cellStop">
     <IMG id="imgStopSearch" language=javascript onclick="stopSearch();" 
      src=".\Images\Buttons\MainStopSearch_off.gif" 
      onMouseOver = "Javascript:style.cursor='hand'"
      alt="Stop the search">
     </IMG>      
    </td>
    
    <!-- progress information goes in this cell -->
    <td CLASS="StandardBodyText"align="center" id="cellProgress">
     
    </td>
    <!-- end of progress information -->
    <TD id="tableDataMoveSpecificPage" align="right" width="250px" NOWRAP="true">
     <IMG  id="movespecific" name="movespecific"
      src=".\Images\Buttons\Specific Hit_Disabled.gif" 
      alt=''>
     </IMG>
     <INPUT id="movespecificpage" style="position:relative; top:-3px; HEIGHT: 20px; WIDTH: 55px" LANGUAGE=javascript disabled="DISABLED"></INPUT>
    </TD> 
   </TR> 
  </TBODY>
 </TABLE>        
 
 <!-- division to hold the Results Grid -->   
 <DIV style="position:absolute; overflow:auto; left:0px; top:160px; height:195px; width:200px;" id="ResultsGridTableDIV">   
 <TABLE oncontextmenu="return false" ID="ResultsGridTable" onkeydown="return ResultsGridTable_onkeydown()"  STYLE="position:absolute; left:0px; WIDTH=100%" border="1" cellPadding="0" cellSpacing="0" valign="TOP">
  <TR CLASS="ResultsGridTableHeader">
  <TD>&nbsp;&nbsp</TD>
  </TR>
   
  <TR CLASS="ResultsGridTableBackground" id="1"  onclick="return rowSelected(1)" onMouseover="changeto('ResultsGridTableRowHighlight')" onMouseout="changeback('ResultsGridTableBackground')">
  <TD>&nbsp;&nbsp</TD>
  </TR>
   
  <TR CLASS="ResultsGridTableBackground" id="2"  onclick="return rowSelected(2)" onMouseover="changeto('ResultsGridTableRowHighlight')" onMouseout="changeback('ResultsGridTableBackground')">
  <TD>&nbsp;&nbsp</TD>
  </TR>
   
  <TR CLASS="ResultsGridTableBackground" id="3"  onclick="return rowSelected(3)" onMouseover="changeto('ResultsGridTableRowHighlight')" onMouseout="changeback('ResultsGridTableBackground')">
  <TD>&nbsp;&nbsp</TD>
  </TR>
   
  <TR CLASS="ResultsGridTableBackground" id="4"  onclick="return rowSelected(4)" onMouseover="changeto('ResultsGridTableRowHighlight')" onMouseout="changeback('ResultsGridTableBackground')">        
  <TD>&nbsp;&nbsp</TD>
  </TR>   
   
  <TR CLASS="ResultsGridTableBackground" id="5"  onclick="return rowSelected(5)" onMouseover="changeto('ResultsGridTableRowHighlight')" onMouseout="changeback('ResultsGridTableBackground')">
  <TD>&nbsp;&nbsp</TD>
  </TR>
   
  <TR CLASS="ResultsGridTableBackground" id="6"  onclick="return rowSelected(6)" onMouseover="changeto('ResultsGridTableRowHighlight')" onMouseout="changeback('ResultsGridTableBackground')">
  <TD>&nbsp;&nbsp</TD>
  </TR>
   
  <TR CLASS="ResultsGridTableBackground" id="7"  onclick="return rowSelected(7)" onMouseover="changeto('ResultsGridTableRowHighlight')" onMouseout="changeback('ResultsGridTableBackground')">
  <TD>&nbsp;&nbsp</TD>
  </TR>
   
  <TR CLASS="ResultsGridTableBackground" id="8"  onclick="return rowSelected(8)" onMouseover="changeto('ResultsGridTableRowHighlight')" onMouseout="changeback('ResultsGridTableBackground')">      
  <TD>&nbsp;&nbsp</TD>
  </TR>
   
  <TR CLASS="ResultsGridTableBackground" id="9"  onclick="return rowSelected(9)" onMouseover="changeto('ResultsGridTableRowHighlight')" onMouseout="changeback('ResultsGridTableBackground')">
  <TD>&nbsp;&nbsp</TD>
  </TR>
   
  <TR CLASS="ResultsGridTableBackground" id="10"  onclick="return rowSelected(10)" onMouseover="changeto('ResultsGridTableRowHighlight')" onMouseout="changeback('ResultsGridTableBackground')">
  <TD>&nbsp;&nbsp </TD>
  </TR>  
 </TABLE>
 </DIV>
 <!-- hidden form that gets used to redo the search with sub search criteria -->
 <form id="frmRedoSearch" name="frmRedoSearch" method="post" action="resultspage.asp">
 </form>
<!-- CABINET FILES -->
<OBJECT ID="ErrorObjectCAB" CLASSID="CLSID:B1D448E9-C9D1-4396-BBA8-1226527E8C3E" STYLE="visibility = hidden"
 codebase="./cabFiles/ds32NetErrorObject.cab#version=4,3,0,0">
</OBJECT>
<OBJECT ID="UserObjectCAB" CLASSID="CLSID:64ED07CF-3A34-4DE9-8638-5EBAFB81457C" STYLE="visibility = hidden"
 codebase="./cabFiles/ds32NetUserObject.cab#version=4,3,0,0">
</OBJECT>
<OBJECT ID="IndexTemplateObjectCAB" CLASSID="CLSID:B4ABA1F1-6E96-4d98-9AB2-76389BAF6B21" STYLE="visibility = hidden"
 codebase="./cabFiles/ds32NetIndexTemplateObject.cab#version=4,3,0,0">
</OBJECT>
<OBJECT ID="SessionObjectCAB" CLASSID="CLSID:AB602C39-FDBA-49FA-A2BF-074B910C65EC" STYLE="visibility = hidden"
 codebase="./cabFiles/ds32NetSessionObject.cab#version=4,3,0,0">
</OBJECT>
<OBJECT ID="CacheManagerObjectCAB" CLASSID="CLSID:CF15D4C4-A73F-4A7C-9F94-B9DCFB4222E3" STYLE="visibility = hidden"
 codebase="./cabFiles/ds32NetCacheManagerObject.cab#version=4,3,0,0">
</OBJECT>
<OBJECT ID="SearchObjectCAB" CLASSID="CLSID:0D2967CF-ADCE-4933-BDA1-1E4360449282" STYLE="visibility = hidden"
 codebase="./cabFiles/ds32NetSearchObject.cab#version=4,3,0,0">
</OBJECT>
<OBJECT ID="SearchResultsObjectCAB" CLASSID="CLSID:500A8EA3-6FD2-405A-9670-B275AE0E4EBA" STYLE="visibility=hidden"
 codebase="./cabFiles/ds32NetSearchResultsObject.cab#version=4,3,0,0">
</OBJECT>
<OBJECT ID="DisplayManagerObjectCAB" CLASSID="CLSID:06216BF1-BD62-11D5-836B-0080C8D49226" STYLE="visibility = hidden"
 codebase="./cabFiles/ds32NetDisplayManagerObject.cab#version=4,3,0,0">
</OBJECT>
<OBJECT ID="ResultHitObjectCAB" CLASSID="CLSID:CC700902-EED8-4511-8B64-139CFC9C5818" STYLE="visibility = hidden"
 codebase="./cabFiles/ds32NetResultHitObject.cab#version=4,3,0,0">
</OBJECT>
<OBJECT ID="ResultsHitIndexInformationObjectCAB" CLASSID="CLSID:FE57655A-8B70-4E56-A95E-4423CE772FF7" STYLE="visibility = hidden"
 codebase="./cabFiles/ds32NetResultHitIndexInformationObject.cab#version=4,3,0,0">
</OBJECT>
<OBJECT ID="PrintObjectCAB" CLASSID="CLSID:5358CDD0-D788-11D5-8383-0080C8D49226" STYLE="visibility = hidden"
 codebase="./cabFiles/ds32NetPrintObject.cab#version=4,3,0,0">
</OBJECT>
<OBJECT ID="ExportObjectCAB" CLASSID="CLSID:DAE040E0-DD9F-11D5-838B-0080C8D49226" STYLE="visibility = hidden"
 codebase="./cabFiles/ds32NetExportObject.cab#version=4,3,0,0">
</OBJECT>
<OBJECT ID="EmailObjectCAB" CLASSID="CLSID:D0DE8751-0383-11D6-83A6-0080C8D49226" STYLE="visibility = hidden"
 codebase="./cabFiles/ds32NetEmailObject.cab#version=4,3,0,0">
</OBJECT>
<OBJECT ID="ClipbookObjectCAB" CLASSID="CLSID:80227163-73A4-4F70-935E-111889604407" STYLE="visibility = hidden"
 codebase="./cabFiles/ds32NetClipbookObject.cab#version=4,3,0,0">
</OBJECT>
<OBJECT ID="AttachmentObjectCAB" CLASSID="CLSID:C6BFA707-6312-4524-A41A-84545E5BC863" STYLE="visibility = hidden"
 codebase="./cabFiles/ds32NetAttachmentObject.cab#version=4,3,0,0">
</OBJECT>
<OBJECT ID="overlayObjectCAB" CLASSID="CLSID:E1C2FF0B-669D-46E5-90CF-3398D8311ECA" STYLE="visibility = hidden"
 codebase="./cabFiles/ds32NetOverlayObject.cab#version=4,3,0,0">
</OBJECT>
<OBJECT ID="ds32NetResultsExpControlObjectCAB" CLASSID="CLSID:E9C86015-D106-4C57-8686-F1D2DC30A83F" STYLE="visibility = hidden"
 codebase="./cabFiles/ds32NetResultsExpControlObject.cab#version=4,3,0,0">
</OBJECT>
<OBJECT ID="ApplicationLauncherObjectCAB" CLASSID="CLSID:4378CD89-59F5-49EB-8A2D-E67FD559F738" STYLE="visibility = hidden"
 codebase="./cabFiles/ds32NetApplicationLauncherObject.cab#version=4,3,0,0">
</OBJECT>
<OBJECT ID="IndexObjectCAB" CLASSID="CLSID:237EF846-1D0A-40CF-BD37-DA5BECDB59EA" STYLE="visibility = hidden"
 codebase="./cabFiles/ds32NetIndexObject.cab#version=4,3,0,0">
</OBJECT>
<OBJECT ID="ModifyIndexValuesControlCAB" CLASSID="CLSID:9C8BA9F2-6ADC-4BA0-B5DB-705DACA0AFD3" STYLE="visibility = hidden"
 codebase="./cabFiles/ds32NetModifyIndexValuesControlObject.cab#version=4,3,0,0">
</OBJECT>
 
</BODY>
<!-- now display the current page (if there is one) -->
<script type="text/javascript" language="javascript">
 
 CurrentPage();
</script>


</HTML>

Display More

Please help!