Plz give me the code?
Hi,
in a dialog screen - to attach a field that has functionality like Select-options fields?
And if so - how?
thanks in advance
regards
rachu
Use the FM :COMPLEX_SELECTIONS_DIALOG
data: begin of RAN_SP occurs 0,
SIGN type C length 1,
OPTION type C length 2,
LOW type KUNAG,
HIGH type KUNAG,
end of RAN_SP.
module USER_COMMAND_0100 input.
case SAVE_CODE.
when 'CANCL'.
leave program.
when 'BACK'.
leave program.
when 'MUL1'.
perform MULTIPLE_SELECTION_CUSTOMER.
G_MULTIPLE = 'T'.
endcase.
endmodule. " USER_COMMAND_0100 INPUT
*& Form multiple_selection_customer
* text
* --> p1 text
* <-- p2 text
form MULTIPLE_SELECTION_CUSTOMER .
call function 'COMPLEX_SELECTIONS_DIALOG'
exporting
TITLE = 'Multiple Selection for Sold-to-Party'
* TEXT =
* SIGNED = 'X'
LOWER_CASE = 'X'
* NO_INTERVAL_CHECK = ' '
* JUST_DISPLAY = ' '
* JUST_INCL = ' '
* EXCLUDED_OPTIONS =
* DESCRIPTION =
* HELP_FIELD =
* SEARCH_HELP =
* TAB_AND_FIELD =
tables
RANGE = RAN_SP
exceptions
* NO_RANGE_TAB = 1
* CANCELLED = 2
* INTERNAL_ERROR = 3
* INVALID_FIELDNAME = 4
others = 5
if SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
endif.
endform. " multiple_selection_customer
Regards
Gopi
Similar Messages
-
Plz send me the code of interctive ALV report
Hi
plz send me the code of interctive ALV report
thanks in advance
rachuHi
<u><b>For More alv report examples check these Tcodes <i>LIBS, BIBS</i>Here u can find more number of examples on alv reports of different kinds</b></u>
Check this sample code
TYPE-POOLS: SLIS.
*type declaration for values from ekko
TYPES: BEGIN OF I_EKKO,
EBELN LIKE EKKO-EBELN,
AEDAT LIKE EKKO-AEDAT,
BUKRS LIKE EKKO-BUKRS,
BSART LIKE EKKO-BSART,
LIFNR LIKE EKKO-LIFNR,
END OF I_EKKO.
DATA: IT_EKKO TYPE STANDARD TABLE OF I_EKKO INITIAL SIZE 0,
WA_EKKO TYPE I_EKKO.
*type declaration for values from ekpo
TYPES: BEGIN OF I_EKPO,
EBELN LIKE EKPO-EBELN,
EBELP LIKE EKPO-EBELP,
MATNR LIKE EKPO-MATNR,
MENGE LIKE EKPO-MENGE,
MEINS LIKE EKPO-MEINS,
NETPR LIKE EKPO-NETPR,
END OF I_EKPO.
DATA: IT_EKPO TYPE STANDARD TABLE OF I_EKPO INITIAL SIZE 0,
WA_EKPO TYPE I_EKPO .
*variable for Report ID
DATA: V_REPID LIKE SY-REPID .
*declaration for fieldcatalog
DATA: I_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV,
WA_FIELDCAT TYPE SLIS_FIELDCAT_ALV.
DATA: IT_LISTHEADER TYPE SLIS_T_LISTHEADER.
* declaration for events table where user comand or set PF status will
* be defined
DATA: V_EVENTS TYPE SLIS_T_EVENT,
WA_EVENT TYPE SLIS_ALV_EVENT.
* declartion for layout
DATA: ALV_LAYOUT TYPE SLIS_LAYOUT_ALV.
* declaration for variant(type of display we want)
DATA: I_VARIANT TYPE DISVARIANT,
I_VARIANT1 TYPE DISVARIANT,
I_SAVE(1) TYPE C.
*PARAMETERS : p_var TYPE disvariant-variant.
*Title displayed when the alv list is displayed
DATA: I_TITLE_EKKO TYPE LVC_TITLE VALUE 'FIRST LIST DISPLAYED'.
DATA: I_TITLE_EKPO TYPE LVC_TITLE VALUE 'SECONDRY LIST DISPLAYED'.
INITIALIZATION.
V_REPID = SY-REPID.
PERFORM BUILD_FIELDCATLOG.
PERFORM EVENT_CALL.
PERFORM POPULATE_EVENT.
START-OF-SELECTION.
PERFORM DATA_RETRIEVAL.
PERFORM BUILD_LISTHEADER USING IT_LISTHEADER.
PERFORM DISPLAY_ALV_REPORT.
*& Form BUILD_FIELDCATLOG
* Fieldcatalog has all the field details from ekko
FORM BUILD_FIELDCATLOG.
WA_FIELDCAT-TABNAME = 'IT_EKKO'.
WA_FIELDCAT-FIELDNAME = 'EBELN'.
WA_FIELDCAT-SELTEXT_M = 'PO NO.'.
APPEND WA_FIELDCAT TO I_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-TABNAME = 'IT_EKKO'.
WA_FIELDCAT-FIELDNAME = 'AEDAT'.
WA_FIELDCAT-SELTEXT_M = 'DATE.'.
APPEND WA_FIELDCAT TO I_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-TABNAME = 'IT_EKKO'.
WA_FIELDCAT-FIELDNAME = 'BUKRS'.
WA_FIELDCAT-SELTEXT_M = 'COMPANY CODE'.
APPEND WA_FIELDCAT TO I_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-TABNAME = 'IT_EKKO'.
WA_FIELDCAT-FIELDNAME = 'BUKRS'.
WA_FIELDCAT-SELTEXT_M = 'DOCMENT TYPE'.
APPEND WA_FIELDCAT TO I_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-TABNAME = 'IT_EKKO'.
WA_FIELDCAT-FIELDNAME = 'LIFNR'.
WA_FIELDCAT-NO_OUT = 'X'.
WA_FIELDCAT-SELTEXT_M = 'VENDOR CODE'.
APPEND WA_FIELDCAT TO I_FIELDCAT.
CLEAR WA_FIELDCAT.
ENDFORM. "BUILD_FIELDCATLOG
*& Form EVENT_CALL
* we get all events - TOP OF PAGE or USER COMMAND in table v_events
FORM EVENT_CALL.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
EXPORTING
I_LIST_TYPE = 0
IMPORTING
ET_EVENTS = V_EVENTS
* EXCEPTIONS
* LIST_TYPE_WRONG = 1
* OTHERS = 2
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM. "EVENT_CALL
*& Form POPULATE_EVENT
* Events populated for TOP OF PAGE & USER COMAND
FORM POPULATE_EVENT.
READ TABLE V_EVENTS INTO WA_EVENT WITH KEY NAME = 'TOP_OF_PAGE'.
IF SY-SUBRC EQ 0.
WA_EVENT-FORM = 'TOP_OF_PAGE'.
MODIFY V_EVENTS FROM WA_EVENT TRANSPORTING FORM WHERE NAME =
WA_EVENT-FORM.
ENDIF.
READ TABLE V_EVENTS INTO WA_EVENT WITH KEY NAME = 'USER_COMMAND'.
IF SY-SUBRC EQ 0.
WA_EVENT-FORM = 'USER_COMMAND'.
MODIFY V_EVENTS FROM WA_EVENT TRANSPORTING FORM WHERE NAME =
WA_EVENT-NAME.
ENDIF.
ENDFORM. "POPULATE_EVENT
*& Form data_retrieval
* retreiving values from the database table ekko
FORM DATA_RETRIEVAL.
SELECT EBELN AEDAT BUKRS BSART LIFNR FROM EKKO INTO TABLE IT_EKKO.
ENDFORM. "data_retrieval
*& Form bUild_listheader
* text
* -->I_LISTHEADEtext
FORM BUILD_LISTHEADER USING I_LISTHEADER TYPE SLIS_T_LISTHEADER.
DATA HLINE TYPE SLIS_LISTHEADER.
HLINE-INFO = 'this is my first alv pgm'.
HLINE-TYP = 'H'.
ENDFORM. "build_listheader
*& Form display_alv_report
* text
FORM DISPLAY_ALV_REPORT.
V_REPID = SY-REPID.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
I_CALLBACK_PROGRAM = V_REPID
* I_CALLBACK_PF_STATUS_SET = ' '
I_CALLBACK_USER_COMMAND = 'USER_COMMAND'
I_CALLBACK_TOP_OF_PAGE = 'TOP_OF_PAGE'
I_GRID_TITLE = I_TITLE_EKKO
* I_GRID_SETTINGS =
* IS_LAYOUT = ALV_LAYOUT
IT_FIELDCAT = I_FIELDCAT[]
* IT_EXCLUDING =
* IT_SPECIAL_GROUPS =
* IT_SORT =
* IT_FILTER =
* IS_SEL_HIDE =
* i_default = 'ZLAY1'
I_SAVE = 'A'
* is_variant = i_variant
IT_EVENTS = V_EVENTS
TABLES
T_OUTTAB = IT_EKKO
* EXCEPTIONS
* PROGRAM_ERROR = 1
* OTHERS = 2
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM. "display_alv_report
*& Form TOP_OF_PAGE
* text
FORM TOP_OF_PAGE.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
EXPORTING
IT_LIST_COMMENTARY = IT_LISTHEADER
* i_logo =
* I_END_OF_LIST_GRID =
ENDFORM. "TOP_OF_PAGE
*& Form USER_COMMAND
* text
* -->R_UCOMM text
* -->, text
* -->RS_SLEFIELDtext
FORM USER_COMMAND USING R_UCOMM LIKE SY-UCOMM
RS_SELFIELD TYPE SLIS_SELFIELD.
CASE R_UCOMM.
WHEN '&IC1'.
READ TABLE IT_EKKO INTO WA_EKKO INDEX RS_SELFIELD-TABINDEX.
PERFORM BUILD_FIELDCATLOG_EKPO.
PERFORM EVENT_CALL_EKPO.
PERFORM POPULATE_EVENT_EKPO.
PERFORM DATA_RETRIEVAL_EKPO.
PERFORM BUILD_LISTHEADER_EKPO USING IT_LISTHEADER.
PERFORM DISPLAY_ALV_EKPO.
ENDCASE.
ENDFORM. "user_command
*& Form BUILD_FIELDCATLOG_EKPO
* text
FORM BUILD_FIELDCATLOG_EKPO.
WA_FIELDCAT-TABNAME = 'IT_EKPO'.
WA_FIELDCAT-FIELDNAME = 'EBELN'.
WA_FIELDCAT-SELTEXT_M = 'PO NO.'.
APPEND WA_FIELDCAT TO I_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-TABNAME = 'IT_EKPO'.
WA_FIELDCAT-FIELDNAME = 'EBELP'.
WA_FIELDCAT-SELTEXT_M = 'LINE NO'.
APPEND WA_FIELDCAT TO I_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-TABNAME = 'I_EKPO'.
WA_FIELDCAT-FIELDNAME = 'MATNR'.
WA_FIELDCAT-SELTEXT_M = 'MATERIAL NO.'.
APPEND WA_FIELDCAT TO I_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-TABNAME = 'I_EKPO'.
WA_FIELDCAT-FIELDNAME = 'MENGE'.
WA_FIELDCAT-SELTEXT_M = 'QUANTITY'.
APPEND WA_FIELDCAT TO I_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-TABNAME = 'I_EKPO'.
WA_FIELDCAT-FIELDNAME = 'MEINS'.
WA_FIELDCAT-SELTEXT_M = 'UOM'.
APPEND WA_FIELDCAT TO I_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-TABNAME = 'I_EKPO'.
WA_FIELDCAT-FIELDNAME = 'NETPR'.
WA_FIELDCAT-SELTEXT_M = 'PRICE'.
APPEND WA_FIELDCAT TO I_FIELDCAT.
CLEAR WA_FIELDCAT.
ENDFORM. "BUILD_FIELDCATLOG_EKPO
*& Form event_call_ekpo
* we get all events - TOP OF PAGE or USER COMMAND in table v_events
FORM EVENT_CALL_EKPO.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
EXPORTING
I_LIST_TYPE = 0
IMPORTING
ET_EVENTS = V_EVENTS
* EXCEPTIONS
* LIST_TYPE_WRONG = 1
* OTHERS = 2
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM. "event_call_ekpo
*& Form POPULATE_EVENT
* Events populated for TOP OF PAGE & USER COMAND
FORM POPULATE_EVENT_EKPO.
READ TABLE V_EVENTS INTO WA_EVENT WITH KEY NAME = 'TOP_OF_PAGE'.
IF SY-SUBRC EQ 0.
WA_EVENT-FORM = 'TOP_OF_PAGE'.
MODIFY V_EVENTS FROM WA_EVENT TRANSPORTING FORM WHERE NAME =
WA_EVENT-FORM.
ENDIF.
ENDFORM. "POPULATE_EVENT
*& Form TOP_OF_PAGE
* text
FORM F_TOP_OF_PAGE.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
EXPORTING
IT_LIST_COMMENTARY = IT_LISTHEADER
* i_logo =
* I_END_OF_LIST_GRID =
ENDFORM. "TOP_OF_PAGE
*& Form USER_COMMAND
* text
* -->R_UCOMM text
* -->, text
* -->RS_SLEFIELDtext
*retreiving values from the database table ekko
FORM DATA_RETRIEVAL_EKPO.
SELECT EBELN EBELP MATNR MENGE MEINS NETPR FROM EKPO INTO TABLE IT_EKPO.
ENDFORM.
FORM BUILD_LISTHEADER_EKPO USING I_LISTHEADER TYPE SLIS_T_LISTHEADER.
DATA: HLINE1 TYPE SLIS_LISTHEADER.
HLINE1-TYP = 'H'.
HLINE1-INFO = 'CHECKING PGM'.
ENDFORM.
FORM DISPLAY_ALV_EKPO.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
* I_INTERFACE_CHECK = ' '
* I_BYPASSING_BUFFER = ' '
* I_BUFFER_ACTIVE = ' '
I_CALLBACK_PROGRAM = V_REPID
* I_CALLBACK_PF_STATUS_SET = ' '
* I_CALLBACK_USER_COMMAND = 'F_USER_COMMAND'
I_CALLBACK_TOP_OF_PAGE = 'TOP_OF_PAGE'
* I_CALLBACK_HTML_TOP_OF_PAGE = ' '
* I_CALLBACK_HTML_END_OF_LIST = ' '
* I_STRUCTURE_NAME =
* I_BACKGROUND_ID = ' '
I_GRID_TITLE = I_TITLE_EKPO
* I_GRID_SETTINGS =
* IS_LAYOUT =
IT_FIELDCAT = I_FIELDCAT[]
* IT_EXCLUDING =
* IT_SPECIAL_GROUPS =
* IT_SORT =
* IT_FILTER =
* IS_SEL_HIDE =
* I_DEFAULT =
I_SAVE = 'A'
* IS_VARIANT =
IT_EVENTS = V_EVENTS
TABLES
T_OUTTAB = IT_EKPO
EXCEPTIONS
PROGRAM_ERROR = 1
OTHERS = 2
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM.
Try this links...
http://www.****************/Tutorials/ALV/ALVMainPage.htm
Simple ALV report
http://www.sapgenie.com/abap/controls/alvgrid.htm
http://wiki.ittoolbox.com/index.php/Code:Ultimate_ALV_table_toolbox
ALV
1. Please give me general info on ALV.
http://www.sapfans.com/forums/viewtopic.php?t=58286
http://www.sapfans.com/forums/viewtopic.php?t=76490
http://www.sapfans.com/forums/viewtopic.php?t=20591
http://www.sapfans.com/forums/viewtopic.php?t=66305 - this one discusses which way should you use - ABAP Objects calls or simple function modules.
2. How do I program double click in ALV?
http://www.sapfans.com/forums/viewtopic.php?t=11601
http://www.sapfans.com/forums/viewtopic.php?t=23010
3. How do I add subtotals (I have problem to add them)...
http://www.sapfans.com/forums/viewtopic.php?t=20386
http://www.sapfans.com/forums/viewtopic.php?t=85191
http://www.sapfans.com/forums/viewtopic.php?t=88401
http://www.sapfans.com/forums/viewtopic.php?t=17335
4. How to add list heading like top-of-page in ABAP lists?
http://www.sapfans.com/forums/viewtopic.php?t=58775
http://www.sapfans.com/forums/viewtopic.php?t=60550
http://www.sapfans.com/forums/viewtopic.php?t=16629
5. How to print page number / total number of pages X/XX in ALV?
http://www.sapfans.com/forums/viewtopic.php?t=29597 (no direct solution)
6. ALV printing problems. The favourite is: The first page shows the number of records selected but I don't need this.
http://www.sapfans.com/forums/viewtopic.php?t=64320
http://www.sapfans.com/forums/viewtopic.php?t=44477
7. How can I set the cell color in ALV?
http://www.sapfans.com/forums/viewtopic.php?t=52107
8. How do I print a logo/graphics in ALV?
http://www.sapfans.com/forums/viewtopic.php?t=81149
http://www.sapfans.com/forums/viewtopic.php?t=35498
http://www.sapfans.com/forums/viewtopic.php?t=5013
9. How do I create and use input-enabled fields in ALV?
http://www.sapfans.com/forums/viewtopic.php?t=84933
http://www.sapfans.com/forums/viewtopic.php?t=69878
10. How can I use ALV for reports that are going to be run in background?
http://www.sapfans.com/forums/viewtopic.php?t=83243
http://www.sapfans.com/forums/viewtopic.php?t=19224
11. How can I display an icon in ALV? (Common requirement is traffic light icon).
http://www.sapfans.com/forums/viewtopic.php?t=79424
http://www.sapfans.com/forums/viewtopic.php?t=24512
12. How can I display a checkbox in ALV?
http://www.sapfans.com/forums/viewtopic.php?t=88376
http://www.sapfans.com/forums/viewtopic.php?t=40968
http://www.sapfans.com/forums/viewtopic.php?t=6919
Reward all helpful answers
Regards
Pavan
Message was edited by:
Pavan praveen -
Hello Apple, Plz give us the classic look option like iOS 6. We miss that appearance which shew all icons as a gems but now in ios 7 all icons look like a cheap stickers and worst than android look. Plz think about it, heartily request to You dear Apple.
There is no Apple in this forum this is a user to user forum.
send your feedback here http://www.apple.com/feedback/ -
Is there a way to purchase itunes books for someone else as a gift (Christmas) and give them the codes or printout receiptwithout automatically downloading the purchase for me? Or is an itunes giftcard the only way to go?
TV shows will only appear in the cloud if you are in a country where they can be re-downloaded from the store (you can't add them yourself), in which case they will appear in the Purchased tab in the iTunes store app for re-downloading. But they will only appear there if you are in a country where they can be re-downloaded, and then only as long as the TV company leaves them in the store (content providers occasionally remove their items).
-
i having apple 8 GB ipod nano , i need saving my pictures ipod to my computer, plz give me the method or solution............!
You'll likely need the assistance of some third party software such as the one below to get the job done. Keep in mind that your photos will no longer be in their full resolution, but instead will be the scaled down thumbnail versions that were optimized for viewing on your iPod.
http://www.macroplant.com/phonetopc/
Google "copy photos from iPod" for more possible software solutions.
B-rock -
Pls give me the code to load method only once in JVM.
Hi all,
Pls give me the code to execute method only once in JVM.Even if we create more than one instance to call the method.
Thanks & Regards,
Vinodh[How to ask a question on these forums|http://catb.org/~esr/faqs/smart-questions.html]
-
the lan setting does niot configure in my mac os x 10.8.2...plz give me the clue that i configure my setting easily.
How to set up Outlook.com with IMAP
Outlook.com or Hotmail.com IMAP setup
Getting Hotmail IMAP to Work on a Mac -
Plz provide me the code for TreeExpensionListener mehod's
Hello all,
I am trying to write the code for TreeExpensionListener methods treeExpanded(TreeExpansionEvent evt) and treeCollapsed(TreeExpansionEvent event) i want whole code for when i open the window i ll get a perticular node would be expanded.
Waiting for replys,
brijeshm_pmTableModel = new JTreeTableModel("root");
m_pmListTable = new JTreeTable(m_pmTableModel);
m_pmListTable.getTree().addTreeSelectionListener(this);
m_pmListTable.getTree().addTreeExpansionListener(this);
JScrollPane scrollPane = new JScrollPane();
scrollPane.getViewport().add(m_pmListTable);
This is the piece of code i am using there is a treetable, i just want like, whenver sommething got change on server site that table would be update, actallu its updating but...if node is open and any child of that node is get updat then that node is getting close, means again to see the changes i have to open that node, thats i dont want. With updating it should expend the node......
thanks for reply.....plz share the idea
brijesh -
URGENT - PLEASE READ MY MIND AND GIVE ME THE CODE
I AM DOING AN URGENT PROJECT AND I NEED SOME CODE. PLEASE PROVIDE THE CODE WITHOUT DELAY.
I AM SENDING DETAILS OUT ON MIND FREQUENCY 42 GigaHz at 10 GigaWatt.
STOP WHATEVER ELSE YOU ARE DOING AND SEND ME THE CODE NOW!I am not happy with the service from Sun. Please me the solution NOW!Sun wishes to let you know that it feels truly sorry about your unpleasant experience and installs a new
24/7 competence call center immediately. Please hold the line while the building is being constructed.
ERRATA Sun apologizes for the actual inconvenience, but in the constant objective of satisfying the most, and due to the peculiar context of the stated problem,
the 24/7 competence call center will be replaced with a 42 Ghz English/Swahili mind-reading center. Please keep your mind opened until Sun finds the needed brains. -
The code:
<pre><nowiki><!-- This Script is from www.htmlfreecodes.com, Coded by: Krishna Eydat-->
<SCRIPT language=JavaScript>
var NS4 = (document.layers);
var IE4 = (document.all);
var win = window;
var n = 0;
function findInPage(str) {
var txt, i, found;
if (str == "")
return false;
if (NS4) {
if (!win.find(str))
while(win.find(str, false, true))
n++;
else
n++;
if (n == 0)
alert("Not found.");
if (IE4) {
txt = win.document.body.createTextRange();
for (i = 0; i <= n && (found = txt.findText(str)) != false; i++) {
txt.moveStart("character", 1);
txt.moveEnd("textedit");
if (found) {
txt.moveStart("character", -1);
txt.findText(str);
txt.select();
txt.scrollIntoView();
n++;
else {
if (n > 0) {
n = 0;
findInPage(str);
else
alert("Sorry, we couldn't find.Try again");
return false;
</SCRIPT>
<FORM name=search onsubmit="return findInPage(this.string.value);">
<P align=center><FONT size=4; COLOR=#ffffff;>
<INPUT style="BORDER-RIGHT: #ffffff 1px solid; BORDER-TOP: #ffffff 1px solid; FONT-SIZE: 8pt; BORDER-LEFT: #ffffff 1px solid; BORDER-BOTTOM: #ffffff 1px solid"
onchange="n = 0;" size=16 name=string><INPUT style="BORDER-RIGHT: #ffffff 1px solid; BORDER-TOP: #ffffff 1px solid; FONT-SIZE: 8pt; FONT-COLOR: #ffffff; BORDER-LEFT: #ffffff 1px solid; BORDER-BOTTOM: #ffffff 1px solid; FONT-FAMILY: Tahoma; FONT-COLOR: #ffffff; BACKGROUND-COLOR: #16ADE6; color:#FFFFFF" type="submit" id="Button1" name="" value="Sök ID Kod" style="position:absolute;width:96px;height:25px;border:0px #000000 solid;background-color:#17AFE7;color:#FFFFFF;font-family:Arial;font-size:13px;">
</center></font></nowiki></pre>Try posting at the Web Development / Standards Evangelism forum at MozillaZine. The helpers over there are more knowledgeable about web page development issues with Firefox. <br />
http://forums.mozillazine.org/viewforum.php?f=25 <br />
You'll need to register and login to be able to post in that forum. -
Can anyone tell me how to sync my new ipad with my keyboard as it doesn't recognise it even after I put in the code given when trying to pair it. I have tried to reboot the ipad but that didn't work either. Very frustrated. ,
It was given to me by someone that spilt a drink on it and they dried it but went and bought a new one. It finds the ipad but won't sync once I put the code in. I have looked at support etc and they recommend unsnycing from the original computer. But as I have no access for this is there any way I can reset the keyboard to pair my ipad?
Thanks -
I want to increase the number reduce the number specified in the textbox2
Dim ip1 As Integer = TextBox1.Text
Dim ip2 As Integer = TextBox2.Text
'Dim ip3 As Integer = TextBox1.Text
'Dim ip4 As Integer = TextBox2.Text
For i = ip1 To ip2
ListBox1.Items.Add(i)
nextI don't know what "scan ip range" means. Also I haven't worked with IP addresses in a long time.
So if you mean you want to get all IP addresses between 1.5.7.6 and 1.0.0.1 then do the match for that. Get the integer from 1.0.0.1 then get the integer for 1.5.7.6. Reduce the integer for 1.5.7.6 by one and get the IP address for that integer and so on
until that integer equals the integer for 1.0.0.1. Unless that is not what you mean. And whatever "ip range" you come up with may contain invalid IP addresses since broadcast and network addresses may be included in the mix for all I know.
La vida loca
I want an example bro
You want because that is simpler than learning through research.
Also I am not your Bro. And I live in the desert now so I no longer hang out at the beach or windsurf so the word bro is unecessary as most people do not use it unless you are around a certain crowd which talks like they're hip or something. So don't call
me bro.
Here is an example.
A ListBox can not apparently display all of the results without becoming unstable which I will not attempt to explain what occurs. You can try a ListBox if you want.
Although with the previous code I provided you should have had the willpower and thoughtfulness to research on your own on how to use it rather than saying you want anybody else (specifically bro) to write the code for you. Which by doing so shows no effort
on your part to learn. As if rather than writing code you are only capable of copying and pasting code and can not learn how code works in order to use it to perform what you want to do. So either you are attempting to program outside of your skillset range
meaning you need to increase your scope of knowledge in various areas or perhaps you don't have the capability to program if you are unwilling to increase your scope of knowledge to raise your skillset to where it needs to be for what you want to program for.
Also because of the time it takes this code to run for the two IP addresses you provided it would be a good idea to use threading to offload various code into a separate thread as this freezes the UI until the code ends after displaying the result.
I will not do this for you.
Option Strict On
Imports System.Net
Imports System.IO
Imports System.Text
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Me.Location = New Point(CInt((Screen.PrimaryScreen.WorkingArea.Width / 2) - (Me.Width / 2)), CInt((Screen.PrimaryScreen.WorkingArea.Height / 2) - (Me.Height / 2)))
Label1.Text = "Waiting"
Label2.Text = "Waiting"
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
If ParseIP(TextBox1.Text) = True Then
If ParseIP(TextBox1.Text) = True Then
Label1.Text = "Waiting"
Label2.Text = "Waiting"
Dim SB As New StringBuilder
Dim TBox1IPLong As Long = ConvertIPToLong(TextBox1.Text)
Dim TBox2IPLong As Long = ConvertIPToLong(TextBox2.Text)
If TBox1IPLong > TBox2IPLong Then
Label1.Text = "Nr IP Addresses is " & (TBox1IPLong - TBox2IPLong).ToString & "."
Label2.Text = "IP scan results for ip address" & _
vbCrLf & TextBox1.Text & " to " & TextBox2.Text & "."
TBox1IPLong -= 1
Do Until TBox1IPLong = TBox2IPLong
SB.Append(ConvertLongToIP(TBox1IPLong) & vbCrLf)
TBox1IPLong -= 1
Loop
Else
Label1.Text = "Nr IP Addresses is " & (TBox2IPLong - TBox1IPLong).ToString & "."
Label2.Text = "IP scan results for ip address" & _
vbCrLf & TextBox2.Text & " to " & TextBox1.Text & "."
TBox2IPLong -= 1
Do Until TBox2IPLong = TBox1IPLong
SB.Append(ConvertLongToIP(TBox2IPLong) & vbCrLf)
TBox2IPLong -= 1
Loop
End If
RichTextBox1.Text = SB.ToString
Else
MessageBox.Show("TextBox2 contains invalid IP address. Try again.")
Exit Sub
End If
Else
MessageBox.Show("TextBox1 contains invalid IP address. Try again.")
Exit Sub
End If
End Sub
Private Function ParseIP(Item As String) As Boolean
Dim TestIP As IPAddress
Dim Result As Boolean = IPAddress.TryParse(Item, TestIP)
Return Result
End Function
Private Function ConvertIPToLong(Item As String) As Long
Dim BinaryOctet As String = ""
Dim CompleteBinary As String = ""
Dim ItemSplit() As String = Item.Split("."c)
For i = 0 To ItemSplit.Count - 1
BinaryOctet = Convert.ToString(CLng(ItemSplit(i)), 2)
If BinaryOctet.Count < 8 Then
Do Until BinaryOctet.Count = 8
BinaryOctet = BinaryOctet.Insert(0, "0")
Loop
End If
CompleteBinary &= BinaryOctet
Next
Dim Result As Long = Convert.ToInt64(CompleteBinary, 2)
Return Result
End Function
Private Function ConvertLongToIP(Info As Long) As String
Dim Temp As String = Convert.ToString(Info, 2)
If Temp.Count <> 32 Then
Do Until Temp.Count = 32
Temp = Temp.Insert(0, "0")
Loop
End If
Dim Result As String = CStr(CInt(Convert.ToInt32(Temp.Substring(0, 8), 2))) & "." & _
CStr(CInt(Convert.ToInt32(Temp.Substring(8, 8), 2))) & "." & _
CStr(CInt(Convert.ToInt32(Temp.Substring(16, 8), 2))) & "." & _
CStr(CInt(Convert.ToInt32(Temp.Substring(24, 8), 2)))
Return Result
End Function
End Class
La vida loca -
HT204204 i cannot restore my iphone 6 it start downloading half way stop and give me the code 53
i cannot restore my iphone 6 it download half way and give me code 53
It sounds like your phone needs to be restored to complete the unlocking process. The device is unlocked, so restoring it in iTunes on a computer will be your best option. To avoid the error occurred message you will need to do a factory restore.
You can restore the iPhone by completing a DFU restore.
DFU Restore:
1. Connect your iPhone to a computer with internet connection
2. Open iTunes
3. Press and Hold the Sleep/Wake button and Home buttons simultaneously for approximately 9-10 seconds
4. When the screen goes blank, release the Sleep/Wake button and continue holding the Home button
5. the screen MUST remain black. If the Apple logo appears while still holding the Home button you did not time it properly (either you released Sleep/Wake too soon or too late)
6. iTunes will pop up with a small window indicating you have connected an iphone in recovery mode and can Restore it to recover it.
7. If the apple logo appears due to incorrect timing the Recovery mode message may still appear in iTunes, but you should simply dismiss it and try again from step 3. -
Plz give me the sugg. in this scenarion
hi ,
i m explaining my scenario
my company is maintaining car details based on carno(kfznr), kostentraeger (costcenter), kmstand( kilometers)
someof the cars which belongs to my company , somebody r using these cars with in the organisation i need to update the information. this is the scenario.
i have two ztables one is
zfm_kfz(fields r kfznr, geraet,kostentraeger, bezeichnung(carname), tuvdatum,asudatum, kmstand, histo, reifen, username
othe table is zfm_kmvrg fields r kfznr, kostentraeger, kmstand
first table is maintained by using table maintenance genarator(sm30)
for second table i m creating tablecontrol(se51)and assigning this ine to transaction bacause users r entering this trasaction in se93 they r directly going to that screen.in that screen u the user enter the data and press update button the data is updated in the screen and last kmstand is updated in the first table maintenance(zfm_kfz)
the kmstand is updated like this
kfznr(carno) kostentreger kmstand
nd-gr_456 p2309029033 15000
p8734292112 16000
s9329843840 16500
this 16500(lastkmstand is updated in the first table zfm_kfz)if u have only one cost center
nd-de_6784 rj12352677 12000
this 12000 is updated in the first first table (zfm_kfz)
this is the scenario plz help me in this problemkfznr kostentraeger kmstand
ND-AB_123 <b>P928392132</b> <u>10000</u>
<b>P9239189111</b> <u>12000</u>
HERE I M SENDING KFZNR WITH CAPS, KOSTENTRAEGER WITH BOLD AND KMSTAND WITH UNDELINE -
Any one can plz give me the Solution for this problem
select country ----text field
select states ---------text field
select country is one text field and select states is another text field .
By using ajax if i select country like india states belonging to the india should be displayed in select states text field -----
like if i select any country , belonging states should be displayed in selected states text field.
can any one plz suggest me for this problem by using ajax with step by step solution.
thanks in advance.....nareshannam wrote:
can any one plz suggest me for this problem by using ajax with step by step solution.
thanks in advance.....Well my Idea is to look for another Forum ,This is not a Ajax Forum
maybe try [http://www.dynamicdrive.com/] or [http://www.webdeveloper.com/]
Maybe you are looking for
-
Problem with Math In Calculated Fields
I am calculating a group incident rate for data returned from a query. The formula is Number of cases multiplied by 200000 divided by number of hours worked. Cases in my report is the calculated field: calc.CaseSum (the sum of cases for the group) Ho
-
Com.sap.tc.webdynpro.sessionmanagement
Hi, Iam getting the below error only for 2 users not the all users ansd also when ther are opening portal it is comming please help me in this.... 5 #001E0B5C65C200790000032C000022D3000465D7A7BC66F0#1237876813354#com.sap.tc.webdynpro.sessionmanagemen
-
CS6 Photoshop Wacom Tablet Help!
Obviously heading an IT department, I know I am not a graphics designer nor would I ever claim to know enough to be even dangerous. We are finalizing a monster PC build with all the bessl and whistles for our Marketing Director who lives by Adobe Cre
-
Adobe PDF printer 'printing' garbage characters
Acrobat Professional v9.5.0 (Acrobat reports there are no updates available) Windows 7 Home Premium 64-bit I print from various applications and web pages to my 'Adobe PDF' printer to save things as PDF files. Over the last several months, I have beg
-
I have a Blue Snowball Mic that I can't get to work with Logic Express (and I want to think it worked before). It works wonderfully in Garageband. I plug it in and then go to Audio Preferences, and the mic doesn't show up. The only devices that show