<%@LANGUAGE="VBSCRIPT"%> <% set rcdPosts = Server.CreateObject("ADODB.Recordset") rcdPosts.ActiveConnection = MM_Discussion_STRING rcdPosts.Source = "SELECT * FROM tblPosts ORDER BY txtDateOfPost DESC" rcdPosts.CursorType = 0 rcdPosts.CursorLocation = 2 rcdPosts.LockType = 3 rcdPosts.Open() rcdPosts_numRows = 0 %> <% set rcdReply = Server.CreateObject("ADODB.Recordset") rcdReply.ActiveConnection = MM_Discussion_STRING rcdReply.Source = "SELECT * FROM tblReply ORDER BY txtDateOfReply DESC" rcdReply.CursorType = 0 rcdReply.CursorLocation = 2 rcdReply.LockType = 3 rcdReply.Open() rcdReply_numRows = 0 %> <% Dim Repeat1__numRows Repeat1__numRows = 10 Dim Repeat1__index Repeat1__index = 0 rcdPosts_numRows = rcdPosts_numRows + Repeat1__numRows %> <% ' *** Recordset Stats, Move To Record, and Go To Record: declare stats variables ' set the record count rcdPosts_total = rcdPosts.RecordCount ' set the number of rows displayed on this page If (rcdPosts_numRows < 0) Then rcdPosts_numRows = rcdPosts_total Elseif (rcdPosts_numRows = 0) Then rcdPosts_numRows = 1 End If ' set the first and last displayed record rcdPosts_first = 1 rcdPosts_last = rcdPosts_first + rcdPosts_numRows - 1 ' if we have the correct record count, check the other stats If (rcdPosts_total <> -1) Then If (rcdPosts_first > rcdPosts_total) Then rcdPosts_first = rcdPosts_total If (rcdPosts_last > rcdPosts_total) Then rcdPosts_last = rcdPosts_total If (rcdPosts_numRows > rcdPosts_total) Then rcdPosts_numRows = rcdPosts_total End If %> <% ' *** Recordset Stats: if we don't know the record count, manually count them If (rcdPosts_total = -1) Then ' count the total records by iterating through the recordset rcdPosts_total=0 While (Not rcdPosts.EOF) rcdPosts_total = rcdPosts_total + 1 rcdPosts.MoveNext Wend ' reset the cursor to the beginning If (rcdPosts.CursorType > 0) Then rcdPosts.MoveFirst Else rcdPosts.Requery End If ' set the number of rows displayed on this page If (rcdPosts_numRows < 0 Or rcdPosts_numRows > rcdPosts_total) Then rcdPosts_numRows = rcdPosts_total End If ' set the first and last displayed record rcdPosts_first = 1 rcdPosts_last = rcdPosts_first + rcdPosts_numRows - 1 If (rcdPosts_first > rcdPosts_total) Then rcdPosts_first = rcdPosts_total If (rcdPosts_last > rcdPosts_total) Then rcdPosts_last = rcdPosts_total End If %> <% ' *** Move To Record and Go To Record: declare variables Set MM_rs = rcdPosts MM_rsCount = rcdPosts_total MM_size = rcdPosts_numRows MM_uniqueCol = "" MM_paramName = "" MM_offset = 0 MM_atTotal = false MM_paramIsDefined = false If (MM_paramName <> "") Then MM_paramIsDefined = (Request.QueryString(MM_paramName) <> "") End If %> <% ' *** Move To Record: handle 'index' or 'offset' parameter if (Not MM_paramIsDefined And MM_rsCount <> 0) then ' use index parameter if defined, otherwise use offset parameter r = Request.QueryString("index") If r = "" Then r = Request.QueryString("offset") If r <> "" Then MM_offset = Int(r) ' if we have a record count, check if we are past the end of the recordset If (MM_rsCount <> -1) Then If (MM_offset >= MM_rsCount Or MM_offset = -1) Then ' past end or move last If ((MM_rsCount Mod MM_size) > 0) Then ' last page not a full repeat region MM_offset = MM_rsCount - (MM_rsCount Mod MM_size) Else MM_offset = MM_rsCount - MM_size End If End If End If ' move the cursor to the selected record i = 0 While ((Not MM_rs.EOF) And (i < MM_offset Or MM_offset = -1)) MM_rs.MoveNext i = i + 1 Wend If (MM_rs.EOF) Then MM_offset = i ' set MM_offset to the last possible record End If %> <% ' *** Move To Record: if we dont know the record count, check the display range If (MM_rsCount = -1) Then ' walk to the end of the display range for this page i = MM_offset While (Not MM_rs.EOF And (MM_size < 0 Or i < MM_offset + MM_size)) MM_rs.MoveNext i = i + 1 Wend ' if we walked off the end of the recordset, set MM_rsCount and MM_size If (MM_rs.EOF) Then MM_rsCount = i If (MM_size < 0 Or MM_size > MM_rsCount) Then MM_size = MM_rsCount End If ' if we walked off the end, set the offset based on page size If (MM_rs.EOF And Not MM_paramIsDefined) Then If (MM_offset > MM_rsCount - MM_size Or MM_offset = -1) Then If ((MM_rsCount Mod MM_size) > 0) Then MM_offset = MM_rsCount - (MM_rsCount Mod MM_size) Else MM_offset = MM_rsCount - MM_size End If End If End If ' reset the cursor to the beginning If (MM_rs.CursorType > 0) Then MM_rs.MoveFirst Else MM_rs.Requery End If ' move the cursor to the selected record i = 0 While (Not MM_rs.EOF And i < MM_offset) MM_rs.MoveNext i = i + 1 Wend End If %> <% ' *** Move To Record: update recordset stats ' set the first and last displayed record rcdPosts_first = MM_offset + 1 rcdPosts_last = MM_offset + MM_size If (MM_rsCount <> -1) Then If (rcdPosts_first > MM_rsCount) Then rcdPosts_first = MM_rsCount If (rcdPosts_last > MM_rsCount) Then rcdPosts_last = MM_rsCount End If ' set the boolean used by hide region to check if we are on the last record MM_atTotal = (MM_rsCount <> -1 And MM_offset + MM_size >= MM_rsCount) %> <% ' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters ' create the list of parameters which should not be maintained MM_removeList = "&index=" If (MM_paramName <> "") Then MM_removeList = MM_removeList & "&" & MM_paramName & "=" MM_keepURL="":MM_keepForm="":MM_keepBoth="":MM_keepNone="" ' add the URL parameters to the MM_keepURL string For Each Item In Request.QueryString NextItem = "&" & Item & "=" If (InStr(1,MM_removeList,NextItem,1) = 0) Then MM_keepURL = MM_keepURL & NextItem & Server.URLencode(Request.QueryString(Item)) End If Next ' add the Form variables to the MM_keepForm string For Each Item In Request.Form NextItem = "&" & Item & "=" If (InStr(1,MM_removeList,NextItem,1) = 0) Then MM_keepForm = MM_keepForm & NextItem & Server.URLencode(Request.Form(Item)) End If Next ' create the Form + URL string and remove the intial '&' from each of the strings MM_keepBoth = MM_keepURL & MM_keepForm if (MM_keepBoth <> "") Then MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1) if (MM_keepURL <> "") Then MM_keepURL = Right(MM_keepURL, Len(MM_keepURL) - 1) if (MM_keepForm <> "") Then MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1) ' a utility function used for adding additional parameters to these strings Function MM_joinChar(firstItem) If (firstItem <> "") Then MM_joinChar = "&" Else MM_joinChar = "" End If End Function %> <% ' *** Move To Record: set the strings for the first, last, next, and previous links MM_keepMove = MM_keepBoth MM_moveParam = "index" ' if the page has a repeated region, remove 'offset' from the maintained parameters If (MM_size > 0) Then MM_moveParam = "offset" If (MM_keepMove <> "") Then params = Split(MM_keepMove, "&") MM_keepMove = "" For i = 0 To UBound(params) nextItem = Left(params(i), InStr(params(i),"=") - 1) If (StrComp(nextItem,MM_moveParam,1) <> 0) Then MM_keepMove = MM_keepMove & "&" & params(i) End If Next If (MM_keepMove <> "") Then MM_keepMove = Right(MM_keepMove, Len(MM_keepMove) - 1) End If End If End If ' set the strings for the move to links If (MM_keepMove <> "") Then MM_keepMove = MM_keepMove & "&" urlStr = Request.ServerVariables("URL") & "?" & MM_keepMove & MM_moveParam & "=" MM_moveFirst = urlStr & "0" MM_moveLast = urlStr & "-1" MM_moveNext = urlStr & Cstr(MM_offset + MM_size) prev = MM_offset - MM_size If (prev < 0) Then prev = 0 MM_movePrev = urlStr & Cstr(prev) %> MIG and flux cored weld forum, GMAW and FCAW weld Questions, Weld Reality weld questions.
 
 
Home Page. The Welding Industry
The New TIP TIG Welding Process
All Welding / Steels Programs
Ed's Training Materials
MIG Welding
Steels   > 4mm
MIG Welding
Steels < 4mm
Pulsed MIG Welding
MIG Welding Gases
MIG Welders And Equipment
Robots & Weld Management
Robots and MIG
Welding Tips
MIG / Flux Cored
Pipe Welding
TIG Welding Tips
TIG/MIG Welding Welding Forum/Advice
Ed's Bio and Contact
Ed's Welding Projects
 
     
 
ED CRAIGS TIG - MIG
WELDING FORUM . www.weldreality.com.


The world's largest website on MIG - Flux Cored - TIG Welding


Advanced TIP TIG Welders
TIP TIG Welding is 2 to 10 times faster than TIG with superior quality than TIG - MIG - FCAW.
 
 
   
 
<% While ((Repeat1__numRows <> 0) AND (NOT rcdPosts.EOF)) %> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 rcdPosts.MoveNext() Wend %>

www.weldreality.com.

Welcome to Ed Craig's Weld Forum.


Ed has 40 years experience in providing Weld Best Practices and Weld Process Controls.
He has provided process optimization training to over a 1000 manufactures in 13 different countries.

[] For 18 years Ed wrote the Weld QA section in Weld Design Fabrication.
[] Ed wrote the Weld and Cutting sections in the Machinery Handbook.
[] He rewrote the Thermal Cutting Section" on Laser-Plasma-Oxy Fuel Cutting
in the 1988.ASM Handbook, Ninth Edition.
[] Ed has had over 35 articles published on Manual and Robot Weld Process Controls
[] Ed has written five books on the subject of MIG and Flux Cored Weld Process Controls.
[] Ed was a key American Weld Society Committee member in the development
of the AWS MIG Weld Gas Specifications.
[] Ed developed the "Pocket Welder"
[] Ed has three weld and cladding patents in the Power Industry.
[] Ed bought the TIP TIG Welding process to North America.


Please note: This weld Forum is intended for legitimate weld related questions and content.
This is not a location for weld sales persons to provide more weld industry Bovine Fecal Matter.

 

If you have to Ask Lincoln or Miller, How!
you are not a weld process control expert.


Welding Books

If you "play around" with weld controls
what does that say about your weld process expertise?



For decades, MIG and Flux Cored weld process confusion and the common reliance by global weld shops on weld sales advice, has distracted the global weld industry from the establishment of fundamental MIG and Flux Cored, Best Weld Practices and the implementation of cost effective Weld Process Controls.


1988: The above was from a speech provided by Ed at a seminar he gave to the Brazilian Engineering Society, in Rio Brazil..

 




As a weld decision maker, your value to your organization has to
come from "your weld process control - best practice knowledge".


In contrast, your value to your wife, is how quickly you
apologize and say "Yes Dear", (something I never learnt)
.



2014: Instead of providing an antiquated SMAW - oxy fuel - TIG weld education based on a 1960's weld curriculum, the majority of global weld education facilities need to wake up and provide the weld industry with the MIG - FCAW - TiP TiG and SAW weld practices along with the process control education the industry really needs.


The Missing Link from most global Weld Education Facilities:

While numerous educational facilities offer weld education diplomas, during the last four decades, the majority of these institutions have failed to educate their engineers, technicians and welders on the fundamentals necessary to establish effective Best Weld Practices and Weld Process Controls with the weld processes most utilized..



[] The global weld industry needs "hands on engineers, supervisor and technicians" that understand Best Weld Practices and are Process Control experts in the bread and butter processes.


[] The global welding industry needs weld decision makers that can "without playing around" instantly produce optimum weld quality with MIG - TIP TIG - FCA manual and robot welds.

[] The global welding industry
needs managers, engineers and technicians that can optimize both manual and automated MIG - Tip TiG and Flux Cored weld production efficiency.

[] The global welding industry
needs managers - supervisors - engineers and technicians that have the ability to cut through the useless, costly, bells, whistles and biased salesmanship that saturates the weld industry.

[] The global welding industry
needs managers - engineers that are willing to take on process - ownership with the equipment that is essential to their manufacturing needs.

It would take less than two weeks to train a "none welder" to be able to produce optimum MIG or Flux Cored code quality welds on any code. all position application, yet too many weld educational facilities spend months and sometimes years focused on weld skills. Educational facilities including the two leading universities in the USA place minimal focus on the two important components necessary to optimize welds. These cimponents are Best Weld Practices and Process Controls.

The finished weld education product at most global weld educational institutions, is weld personnel and decision makers that typically will "play around with weld controls" that have hardly changed in decades. This industry is full of university and college trained managers, engineers, supervisors and technicians that in 2013 have to rely on weld salesmen for weld advice, and in most instances that advice is simply BS.

One day in North America we will have weld educators who hopefully can responded to an industry that daily looses hundreds of millions of dollars from weld rework, weld rejects and poor weld productivity. Imagine the impact on the welding industry from properly trained weld engineers, managers, supervisors, technicians and welders. These individuals would have ability to daily generate hundreds of millions of dollars in weld cost savings through improved manual and automated weld productivity and quality.

For those interested in improving their level of weld process expertise, take a visit to Ed's Best Weld Practices and Weld Process Control, Self Teaching or Training Resources, click here. For those interested in maintaining the staus quo, keep reading.


ED'S WELD FORUM RULES:


Please keep your weld or cutting questions and answers to the point. If looking for MIG - FCAW - TIG weld or steel data, first look in the main MIG - FCA - TIG sections at this site. If you use "key words" in the Weld Data Search, you will have acess to over a 1000 weld questions.

Weld Data Search


Asking a Weld Questions: If you ask a weld question, when relevant, please provide the manual or automated weld transfer mode, the material type, the weld surface conditions, the part thickness, the weld consumable type and size, the weld gas, the wire feed speed, the weld travel speed, amps and voltage.

Again I remind the readers at this site, don't get angry at the messenger. Examine the strong message of lack of management / engineering weld process ownership in this industry. Understand the influence of weld salesmanship on this self taught industry and focus your energy and expertise on the root causes of your daily weld issues. The weld process control knowledge at this site will provide many cost effective, practical solutions for both weld quality and productivity issues.

The Current Password to Post a
Weld Question is "weldreality".


Post a new weld question.





[<<prev 10]
Viewing <%=(rcdPosts_first)%> to <%=(rcdPosts_last)%> of <%=(rcdPosts_total)%> total posts.
Contents:
"><%=(rcdPosts.Fields.Item("txtPostSubject").Value)%> - <%=(rcdPosts.Fields.Item("txtDateOfPost").Value)%> - "><%=(rcdPosts.Fields.Item("txtUserName").Value)%>
<% FilterParam = rcdPosts.Fields.Item("numPostID").Value rcdReply.Filter = "numPostIDFK = " & FilterParam While (NOT rcdReply.EOF) %>        "><%=(rcdReply.Fields.Item("txtReplySubject").Value)%> - <%=(rcdReply.Fields.Item("txtDateOfReply").Value)%> - "><%=(rcdReply.Fields.Item("txtReplyName").Value)%>
<% rcdReply.MoveNext() Wend %>
--------------------------------------------------------------------
 
[<<prev 10]
Viewing <%=(rcdPosts_first)%> to <%=(rcdPosts_last)%> of <%=(rcdPosts_total)%> total posts.




POST NEW WELD QUESTION.




Key Words search 1000 plus weld questions:

Search Forum:

 


Welding Books and Process Control Training Materials here

 

 
    
   
   

<% rcdPosts.Close() %> <% rcdReply.Close() %>