Improve company productivity with a Business Account.Sign Up

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 617
  • Last Modified:

ANSI LISP - recusive automation with IBM DB2 - fortan front end..

I need to perform a recusive automation routine...
0
GlobaLevel
Asked:
GlobaLevel
1 Solution
 
GlobaLevelProgrammerAuthor Commented:
Pass parameters

http://msdn.microsoft.com/en-us/library/6c3yckfw.aspx

ws
http://www.experts-exchange.com/Programming/Languages/Visual_Basic/Q_21733451.html?sfQueryTermInfo=1+10+30+program+servic+start+window


<StructLayout(LayoutKind.Sequential)> _
     Class NetResource
         Public dwScope As Integer
         Public dwType As Integer
         Public dwDisplayType As Integer
         Public dwUsage As Integer
         Public LocalName As String
         Public RemoteName As String
         Public Comment As String
         Public Provider As String
     End Class
 

' luanch app remotely
'
<DllImport("mpr.dll",CharSet = CharSet.Ansi)> _
Public Shared extern Integer WNetAddConnection2(Property netResource,() As NetResource
End Property
String password, String Username, Integer Flag)
 
Shared  Sub Main(ByVal args() As String)
              Dim myNetResource As NetResource =  New NetResource()
              myNetResource.dwScope = 2'RESOURCE_GLOBALNET
              myNetResource.dwType = 1 'RESOURCETYPE_DISK
              myNetResource.dwDisplayType = 3'RESOURCEDISPLAYTYPE_SHARE
              myNetResource.dwUsage = 1'RESOURCEUSAGE_CONNECTABLE
              myNetResource.LocalName = "w:"
              myNetResource.RemoteName = "\\\\RemoteMachineName\\c$"
              myNetResource.Provider = Nothing
              Dim ret As Integer =  WNetAddConnection2(myNetResource,Nothing,Nothing,0)
End Sub


'-----call vbscript from asp.net
Try omitting the runat for vbscript, because as far as I know, vbscript is only a client side script anyway.
Also try using:
<asp:Button ID="btnEditSave" Text="Edit" OnClick="vbs:btnEditSave_Click" />

code behind..

------------------------------Code Behind-------------------------------------------------------
protected void Page_Load(object sender, EventArgs e)
    {
        if (!IsPostBack)
            Page.ClientScript.RegisterClientScriptBlock(this.GetType(), "MyScript", "<script language='VBScript' type='text/vbscript' src='../MyVBScript.vbs'></script>");            
    }

    protected void GridView1_RowCreated(object sender, GridViewRowEventArgs e)
    {
        if (e.Row.RowType == DataControlRowType.DataRow && e.Row.DataItem != null)
            ((Button)e.Row.FindControl("UnMatchButton")).Attributes.Add("OnClick", "fClick()");            
    }

    protected void GridView1_RowCommand(object sender, GridViewCommandEventArgs e)
    {
            if (e.CommandName == "UnMatch")
                //Call Code for Unmatching.
    }
----------------------------------------------------------------------------------------------
http://www.experts-exchange.com/Programming/Languages/.NET/ASP.NET/Q_22623964.html?sfQueryTermInfo=1+10+30+asp.net+vbscript

---->>>see kens code has  it a db...


'-=-=-=-=-=



Which specifically tells the OnClick procedure that it is to use a vbs function.



0
 
Kent OlsenData Warehouse Architect / DBACommented:
Hi GlobaLevel,

Can you clarify your question?  Showing a VB sample for a question that wants a recursive Fortran front-end to a DB2 database is a bit confusing.  :)

By the way, DB2 SQL handles recursion quite well.  You may be better served letting DB2 handle the recursion and returning a single result set to you.


Kent
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

Free Tool: Path Explorer

An intuitive utility to help find the CSS path to UI elements on a webpage. These paths are used frequently in a variety of front-end development and QA automation tasks.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now