Still celebrating National IT Professionals Day with 3 months of free Premium Membership. Use Code ITDAY17

x
?
Solved

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

Posted on 2010-09-03
3
Medium Priority
?
612 Views
Last Modified: 2013-11-15
I need to perform a recusive automation routine...
0
Comment
Question by:GlobaLevel
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
3 Comments
 
LVL 10

Author Comment

by:GlobaLevel
ID: 33600554
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
 
LVL 46

Accepted Solution

by:
Kent Olsen earned 2000 total points
ID: 33606874
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

Featured Post

Concerto Cloud for Software Providers & ISVs

Can Concerto Cloud Services help you focus on evolving your application offerings, while delivering the best cloud experience to your customers? From DevOps to revenue models and customer support, the answer is yes!

Learn how Concerto can help you.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

In this blog post, we’ll look at how using thread_statistics can cause high memory usage.
Instead of error trapping or hard-coding for non-updateable fields when using QODBC, let VBA automatically disable them when forms open. This way, users can view but not change the data. Part 1 explained how to use schema tables to do this. Part 2 h…
This video will show you how to get GIT to work in Eclipse.   It will walk you through how to install the EGit plugin in eclipse and how to checkout an existing repository.
In this fifth video of the Xpdf series, we discuss and demonstrate the PDFdetach utility, which is able to list and, more importantly, extract attachments that are embedded in PDF files. It does this via a command line interface, making it suitable …

722 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question