<%@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 Welding Forum, TIG, <%=(rcdPosts_first)%> to <%=(rcdPosts_last)%>,Stainless Steel,FCAW,ARC | Weld Reality
 
 
TIG/MIG Welding Welding Forum
Home Page. The Welding Industry
The New TIP TIG Welding Process
All Welding / Steels Programs
Ed's Welding Training Materials & Books
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
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 - MIG 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 %>

Welcome to Ed Craig's www.weldreality.com
Welding Forum.



Ed has 40 years experience in providing Weld Best Practices and Weld Process Controls. He has provided training on these subjects to over a thousand manufactures in twelve 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.


This MIG Welding Forum is intended for legitimate weld related questions and content. This is not a location for welding industry sales persons to
tout their weld products, generate sales leads or saturate the welding industry with more biased weld product advice.

 

If you have to Ask Lincoln 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 on weld salesmanship has distracted the global weld industry from the establishment of fundamental Best Weld Practices and the implementation of cost effective Weld Process Controls.

1988: From a speech provided by Ed at a seminar given to the Brazilian Engineering Society. Rio.

Your value to your welding organization has to
come from "your weld process control knowledge".


Your value to your wife is how quickly
you apologize and say "Yes Dear"

Instead of providing an SMAW - OXY FUEL weld education based on a 1960's weld curriculum, the majority of weld global weld education facilities need to wake up and provide the weld industry with the MIG - FCAW - TIG, Best Weld Practices and Process Control Training Programs it really needs.



The Missing Link from global Weld Education Facilities:

While numerous educational facilities offer weld education diplomas, during the last three decades, the majority of these institutions have failed to educate their engineers, technicians and welders on the fundamentals necessary to establish effective MIG - TIP TIG and Flux cored Best Weld Practices and Weld Process Controls.


Welding Training Videos[] The global welding industry needs hands on Engineers and Technicians that 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 cost effective, optimum quality MIG - TIG - FCAW manual and robot welds.

[] The global welding industry
needs Engineers and Technicians that can optimize both manual and automated MIG - 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 salesmanship that daily saturates the weld industry.

[] The global welding industry
need Weld Decision makers willing to take on process ownership people who have the ability to establish cost effective Weld Best Practices and Weld Process Controls.

It takes less than two weeks to train a "none welder" to be able to produce optimum MIG or Flux Cored code quality welds on any application, yet too many weld educational facilities spend months or years focused on weld skills and place minimal focus on the two components that optimize welds, Best Weld Practices and Process Control Training. The finished product at most global weld educational institutions is weld personnel that will daily "play around" with weld controls and managers, engineers, supervisors and technicians that rely on weld salesmen for weld advice

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 Ed's Best Weld Practices and Weld Process
Control, Self Teaching or Training resources click here.

WELDING FORUM.

Please keep your weld or cutting questions and answers to the point. If looking for MIG - FCAW - TIG welding or steel data first look in the main MIG - FCAW - TIG sections of this web site, or in this section use "key words" in the Search Discussion. The Search Discussion will bring up the history of over a 1000 weld questions.

Weld Data Search


WELD QUESTIONS: If asking 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, travel speed, amps and the 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 process ownership in this industry. Understand the influence of weld salesmanship on this self taught industry. Focus on the root causes of your daily weld issues and then use weld process control logic and knowledge to provide cost effective, practical solutions

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

 


TIP TIG Welding
100 to 400 faster than TIG and provides better weld
quality than regular TIG, Pulsed MIG and flux cored


POST A NEW WELDING 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.

 


Welding Books and Process Control Training Materials.

(Click on pictures for more information)
MIG Welding Books, Management
A Management and Engineers Guide to MIG Weld Quality, Productivity and Costs
Gas Metal Arc Welding Book
Robotic MIG Welding
Process Control Book
MIG and Flux Core Welding Book
Flux Cored and MIG weld process controls
Manual MIG Welding Books
Manual MIG Welding
Process Control


Welding Training CD's

Robot Welding CD
Robot MIG welding. Best Weld Practices and Process Controls
MIG Welding CD
Manual MIG Welding. Best Weld Practices and Process Controls
Flux Core Welding CD
Flux Cored Welding. Best Weld Practices and Process Controls
MIG Welding Process Controls
DVD Film "MIG Process Controls Made Simple"

 
    
   
   

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