How to get the version(major,minor,revision ) of VB6.0
delphi code .I am able to fetch dll file of vb6.0 but not
vba file .Can u send me the code snippet in delphi to get
the value for vb6.0.
- 0 Answers
- 3447 Views
- I also Faced
- E-Mail Answers
No Answer is Posted For this Question
Be the First to Post Answer
Write a Program to find the number of words in a sentence.
Write code to make an object work like a 2-d array?
what full form name of B.K.U.
Design a timer circuit using VHDL which has the following: input : start_timer(ST) output: long_time(LT) short_time(ST) when the timer is triggered by the ST(either 0 or 1) signal the timer should generate two timing signals accordingly.While the long time is going ON the other should be OFF and vice versa.
Write a program to Print the Pascal triangle
What is the coding about how to recognize color in fuzzy logic using Matlab R2009b?
DAL in oracle
Write a Program to find the reverse of a given number.
1.What type of material can be sent from a Java servlet to a browser ? How does the browser know how to deal with the material? 2.Explain what happens to a servlet when a servlet engine is sent a GET request.
Write a program that will convert an integer pointer to an integer and vice-versa.
plzzzzzzzzz xplain this code import java.awt.*; import java.awt.event.*; import java.awt.MenuItem.*; import java.sql.*; import java.util.Date; import sun.jdbc.odbc.*; import java.io.*; public class RefillBooking extends Frame implements ActionListener { Label l1,l2,l3,l4,l5,l6,l7,l8,l9,l10,l11,l12,l13; Button exit,save,next,top,prev,botm,ad,show; TextField txtBookingNo,txtConsNo,txtBookingDt,txtConsName,txtAddr1,txt PhNo,txtBookDtold,txtPrintDt,txtCMemoNo,txtOldDlryDt,adr2,ad r3,tot,stnry,rmrk; Date date=new Date(); String ConsName; String Addr1; public static void main(String sr[]) { new RefillBooking().setVisible(true); } public RefillBooking() { super("Refill Booking"); Statement stmt; ResultSet rs; //PreparedStatement pst; Connection con; try { Class.forName ("sun.jdbc.odbc.JdbcOdbcDriver"); con=DriverManager.getConnection("jdbc:odbc:Agency"); if (con!=null); System.out.println ("connected"); stmt =con.createStatement (); } catch(Exception e1) { System.out.println (e1); } setSize(1280,800); setBackground(Color.lightGray); setLayout(null); l1=new Label("Booking No"); l1.setBounds(260,60,90,30); l1.setFont(new Font ("TimesRoman",Font.PLAIN,15)); l1.setAlignment(Label.CENTER); add(l1); l2=new Label("CONSMR NO"); l2.setBounds(30,60,90,30); l2.setFont(new Font("TimesRoman",Font.PLAIN,15)); l2.setAlignment(Label.CENTER); add(l2); l3=new Label("Book DATE (mm/dd/yyyy)"); l3.setBounds(520,60,190,30); l3.setFont(new Font ("TimesRoman",Font.PLAIN,15)); l3.setAlignment(Label.CENTER); add(l3); l4=new Label("NAME"); l4.setBounds(30,150,45,30); l4.setFont(new Font ("TimesRoman",Font.PLAIN,15)); l4.setAlignment(Label.CENTER); add(l4); l5=new Label("ADRS"); l5.setBounds(30,220,45,30); l5.setFont(new Font ("TimesRoman",Font.PLAIN,15)); l5.setAlignment(Label.CENTER); add(l5); l6=new Label("PH NO"); l6.setBounds(500,150,45,30); l6.setFont(new Font ("TimesRoman",Font.PLAIN,15)); l6.setAlignment(Label.CENTER); add(l6); l7=new Label("OldBkDt"); l7.setBounds(30,390,55,30); l7.setFont(new Font ("TimesRoman",Font.PLAIN,15)); l7.setAlignment(Label.CENTER); add(l7); l8=new Label("Print Date"); l8.setBounds(320,390,65,30); l8.setFont(new Font("TimesRoman",Font.PLAIN,15)); l8.setAlignment(Label.CENTER); add(l8); l9=new Label("CMemo No"); l9.setBounds(700,390,65,30); l9.setFont(new Font ("TimesRoman",Font.PLAIN,15)); l9.setAlignment(Label.CENTER); add(l9); l10=new Label("Del Date"); l10.setBounds(550,390,55,30); l10.setFont(new Font ("TimesRoman",Font.PLAIN,15)); l10.setAlignment(Label.CENTER); add(l10); l13=new Label("REMARKS"); l13.setBounds (30,630,85,30); l13.setFont(new Font ("TimesRoman",Font.PLAIN,15)); l13.setAlignment (Label.CENTER); add(l13); txtBookingNo=new TextField(); txtBookingNo.setBounds(375,60,80,30); txtBookingNo.setBackground(Color.white); add(txtBookingNo); txtConsNo=new TextField(); txtConsNo.setBounds(130,60,80,30); txtConsNo.setBackground(Color.white); add(txtConsNo); txtBookingDt=new TextField(); txtBookingDt.setBounds(750,60,80,30); txtBookingDt.setBackground(Color.white); add(txtBookingDt); txtConsName=new TextField(); txtConsName.setBounds(100,150,200,30); txtConsName.setBackground(Color.white); add(txtConsName); txtAddr1=new TextField(); txtAddr1.setBounds(100,220,350,30); txtAddr1.setBackground(Color.white); add(txtAddr1); adr2=new TextField(); adr2.setBounds(100,250,350,30); adr2.setBackground(Color.white); add(adr2); adr3=new TextField(); adr3.setBounds(100,280,350,30); adr3.setBackground(Color.white); add(adr3); txtPhNo=new TextField(); txtPhNo.setBounds(570,150,150,30); txtPhNo.setBackground(Color.white); add(txtPhNo); txtBookDtold=new TextField(); txtBookDtold.setBounds(30,440,60,30); txtBookDtold.setBackground(Color.white); add(txtBookDtold); txtPrintDt=new TextField(); txtPrintDt.setBounds(320,440,60,30); txtPrintDt.setBackground(Color.white); add(txtPrintDt); txtCMemoNo=new TextField(); txtCMemoNo.setBounds(700,440,60,30); txtCMemoNo.setBackground(Color.white); add(txtCMemoNo); txtOldDlryDt=new TextField(); txtOldDlryDt.setBounds(550,440,60,30); txtOldDlryDt.setBackground(Color.white); add(txtOldDlryDt); rmrk=new TextField(); rmrk.setBounds(140,630,600,30); rmrk.setBackground(Color.white); add(rmrk); exit=new Button("EXIT"); exit.setBackground(Color.orange); exit.setBounds(760,700,40,40); exit.addActionListener(this); add(exit); save=new Button("SAVE"); save.setBackground(Color.orange); save.setBounds(715,700,40,40); save.addActionListener(this); add(save); next=new Button("NEXT"); next.setBackground(Color.orange); next.setBounds(90,700,40,40); next.addActionListener(this); add(next); top=new Button("TOP"); top.setBackground(Color.orange); top.setBounds(0,700,40,40); top.addActionListener(this); add(top); prev=new Button("PREV"); prev.setBackground(Color.orange); prev.setBounds(45,700,40,40); prev.addActionListener(this); add(prev); botm=new Button("BOTM"); botm.setBackground (Color.orange); botm.setBounds (135,700,40,40); botm.addActionListener (this); add(botm); ad=new Button("ADD"); ad.setBackground (Color.orange); ad.setBounds (300,700,40,40); ad.addActionListener (this); add(ad); show=new Button("SHOW"); show.setBackground (Color.orange); show.setBounds (345,700,40,40); show.addActionListener (this); add(show); } public void actionPerformed(ActionEvent e) { if(e.getSource()==exit) { this.dispose(); System.exit(0); } if(e.getSource()==save) { int bkflag=1; try { Connection con=DriverManager.getConnection("jdbc:odbc:Agency"); PreparedStatement pst=con.prepareStatement("INSERT INTO RefillBooking VALUES (?,?,?,?)"); pst.setInt (1,Integer.parseInt(txtBookingNo.getText())); pst.setInt (2,Integer.parseInt(txtConsNo.getText())); pst.setString (3,txtBookingDt.getText()); pst.setInt(4,bkflag); /* pst.setString (4,txtConsName.getText()); pst.setString (6,txtAddr1.getText()); pst.setString(7,adr2.getText ()); pst.setString(8,adr3.getText ()); pst.setInt(9,Integer.parseInt (txtCylQty.getText())); pst.setInt (10,Integer.parseInt(txtCylDep.getText())); pst.setInt (11,Integer.parseInt(txtRegQty.getText())); pst.setInt (12,Integer.parseInt(txtRegDep.getText())); pst.setInt (13,Integer.parseInt(tot.getText())); pst.setInt (14,Integer.parseInt(stnry.getText())); pst.setString(15,rmrk.getText ());*/ pst.executeUpdate(); con.close(); } catch(Exception e2) {System.out.println(e2);} } if(e.getSource()==show) { System.out.println("entered if body"); try { //to bring consumer's details Connection con2=DriverManager.getConnection("jdbc:odbc:Agency"); int consumer=Integer.parseInt (txtConsNo.getText()); PreparedStatement ps2=con2.prepareStatement("SELECT * FROM NewCon WHERE Cons_No=?"); ps2.setInt(1,consumer); ResultSet rs2= ps2.executeQuery(); while(rs2.next()) { System.out.print ("entered while"+rs2.getString(2)); txtConsName.setText (rs2.getString("Cons_Name")); txtAddr1.setText (rs2.getString("Adress1")); txtPhNo.setText (""+rs2.getInt("Ph_No")); adr2.setText (rs2.getString("Adress2")); adr3.setText (rs2.getString("Adress3")); rmrk.setText(""); } //Statement stmt3=con2.createStatement(); //ResultSet rs3=stmt3.executeQuery("SELECT CMemoNo,CMemo_Date,DeliveryDate FROM CashMemo where Cons_No="+consumer); con2.close(); } catch(Exception e2) {System.out.println(e2);} } if(e.getSource()==ad) { int newbkno=0; System.out.println("entered if body"); try { //to clear textboxes txtConsName.setText(""); txtAddr1.setText(""); txtBookingNo.setText(""); txtPhNo.setText(""); adr2.setText(""); adr3.setText(""); rmrk.setText(""); txtConsNo.setText(""); txtBookingDt.setText("" + date); txtBookDtold.setText(""); txtPrintDt.setText(""); txtCMemoNo.setText(""); txtOldDlryDt.setText(""); //to generate bookin no System.out.println("entered the try:"); Connection con1=DriverManager.getConnection("jdbc:odbc:Agency"); Statement stmt1=con1.createStatement(); ResultSet rs1=stmt1.executeQuery ("SELECT BookingNo FROM RefillBooking "); while(rs1.next()) { txtBookingNo.setText (""+rs1.getInt(1)); } newbkno=Integer.parseInt (txtBookingNo.getText()); System.out.println(newbkno); newbkno=newbkno+1; txtBookingNo.setText(""+newbkno); } catch(Exception e4){System.out.println(e4);} } } }
i want run following code on button click of view. i am trying to retrieve data from isc_order_details table and isc_product table. but after retriaval of data i m getting error like FIELD MUST BE ENTERED!! DECLARE m number; n number; CURSOR order_details IS SELECT PRODUCT_ORDER_QUAN,PRODUCT_ID FROM isc_order_details WHERE order_id=:isc_order_master.order_id; amount NUMBER (8,2):=0.0; alert number; BEGIN go_block('isc_order_details'); first_record; m:=:system.cursor_record; last_record; n:=:system.cursor_record; OPEN order_details; --for i in m..n loop FETCH order_details INTO :ISC_ORDER_DETAILS.PRODUCT_ORDER_QUAN,:ISC_ORDER_DETAIL S.PRODUCT_ID; IF order_details%FOUND THEN SELECT order_value,order_date INTO :ISC_ORDER_MASTER.ORDER_VALUE,:ISC_ORDER_MASTER.ORDER_D ATE FROM isc_order_master WHERE order_id=:ISC_ORDER_MASTER.ORDER_ID; SELECT product_desc,product_price INTO :ISC_ORDER_DETAILS.PRODUCT_DESC,:ISC_ORDER_DETAILS.PROD UCT_PRICE FROM isc_product WHERE product_id=:ISC_ORDER_DETAILS.PRODUCT_ID; next_record; END IF; EXIT WHEN order_details%NOTFOUND; END LOOP; last_record; CLOSE order_details; EXCEPTION when NO_DATA_FOUND then alert:=SHOW_ALERT('ENTER_DATA'); Go_Item('isc_order_master.order_id'); END;
C Code 
