<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim rsDecoder__MMColParam rsDecoder__MMColParam = "1" If (Request("Engine1") <> "") Then rsDecoder__MMColParam = Request("Engine1") End If %> <% Dim rsDecoder__MMColParam2 rsDecoder__MMColParam2 = "1" If (Request("Engine2") <> "") Then rsDecoder__MMColParam2 = Request("Engine2") End If %> <% Dim rsDecoder__MMColParam3 rsDecoder__MMColParam3 = "1" If (Request("Engine3") <> "") Then rsDecoder__MMColParam3 = Request("Engine3") End If %> <% Dim rsDecoder Dim rsDecoder_cmd Dim rsDecoder_numRows Set rsDecoder_cmd = Server.CreateObject ("ADODB.Command") rsDecoder_cmd.ActiveConnection = MM_VCDS_STRING rsDecoder_cmd.CommandText = "SELECT * FROM VCDS.VAG_Engine WHERE Engine_Code = ? or Engine_Code = ? or Engine_Code = ?" rsDecoder_cmd.Prepared = true rsDecoder_cmd.Parameters.Append rsDecoder_cmd.CreateParameter("param1", 200, 1, 4, rsDecoder__MMColParam) ' adVarChar rsDecoder_cmd.Parameters.Append rsDecoder_cmd.CreateParameter("param2", 200, 1, 4, rsDecoder__MMColParam2) ' adVarChar rsDecoder_cmd.Parameters.Append rsDecoder_cmd.CreateParameter("param3", 200, 1, 4, rsDecoder__MMColParam3) ' adVarChar Set rsDecoder = rsDecoder_cmd.Execute rsDecoder_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 rsDecoder_numRows = rsDecoder_numRows + Repeat1__numRows %> AudiEnthusiasts Engine Code Decoder

.: Audi Engine Code Decoder

This tool will help you decode the Engine code found in your build sticker for Audi Cars. You may use this for other makes such as VW but the production model information will not be complete. Also only known Audi engine codes are used so if it's a VW/Skoda/Seat specific engine it may not show.


.: Instructions

Using the PR Decoder

Find your PR sticker or engine code and enter it in the boxes below. There are 3 boxes in total for you to use. They are set up to AutoTab for you so you can just enter the codes. Incorrect codes and duplicates will be ignored so you don't have to worry if you enter something invalid. Search up to 3 codes at one time.

*Note This database is and can grow. Currently the database contains over 1100 Entries. If you have a code that couldn't be found please contact me with your cars details and the code and I will try and get it entered.


Enter your 2-4 Digit Engine Code in one of the boxes below.





<% If Not rsDecoder.EOF Or Not rsDecoder.BOF Then %> <% End If ' end Not rsDecoder.EOF Or NOT rsDecoder.BOF %> <% If Not rsDecoder.EOF Or Not rsDecoder.BOF Then %> <% While ((Repeat1__numRows <> 0) AND (NOT rsDecoder.EOF)) %> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 rsDecoder.MoveNext() Wend %> <% End If ' end Not rsDecoder.EOF Or NOT rsDecoder.BOF %>
Code KW HP Displ. (ltr) # CYL Production Dates Audi Model Notes
<%=(rsDecoder.Fields.Item("Engine_code").Value)%> <%=(rsDecoder.Fields.Item("Engine_KW").Value)%> <%=(rsDecoder.Fields.Item("Engine_HP").Value)%> <%=(rsDecoder.Fields.Item("Engine_Size").Value)%> <%=(rsDecoder.Fields.Item("Engine_CYL").Value)%> <%=(rsDecoder.Fields.Item("Engine_Production").Value)%> <%=(rsDecoder.Fields.Item("Engine_Model").Value)%> <%=(rsDecoder.Fields.Item("Engine_Notes").Value)%>

Please note: AudiEnthusiast.com is in no way associated to Audi or VAG in any way shape or form. All brand names and manufacturers listed here are for informational purposes only and are in no way endorsed by AudiEnthusiasts.com unless stated other wise.

WARNING!! All modifications and changes are done at your own risk. This site in no way approves the modifications performed here for your vehicle. Please check with your dealer before performing any changes as they may void portions of your factory warranty.